UC知道连接数据库时（ACCESS）至少一个参数没有被指定值怎么解决啊？
来源：百度知道 编辑：UC知道 时间：2024/06/22 22:02:57
Dim BookNo As String
BookNo = TextBox1.Text
Dim conn As New System.Data.OleDb.OleDbConnection()
Dim Strconn As String
Strconn = "provider=Microsoft.Jet.OLEDB.4.0;data source=DATA.mdb"
conn.ConnectionString = Strconn
conn.Open()
Dim cmd As New System.Data.OleDb.OleDbCommand()
cmd.CommandText = "SELECT * FROM booksaver WHERE ISBN=BookNo"
'cmd.CommandText = "select * from booksaver"
cmd.Connection = conn
Dim ada As New System.Data.OleDb.OleDbDataAdapter(cmd)
Dim ds As New DataSet()
ada.Fill(ds, "booksaver")/运行时出错，至少一个参数没有被指定值
DataGridView1.DataSource = ds.Tables("booksaver")
BookNo = TextBox1.Text
Dim conn As New System.Data.OleDb.OleDbConnection()
Dim Strconn As String
Strconn = "provider=Microsoft.Jet.OLEDB.4.0;data source=DATA.mdb"
conn.ConnectionString = Strconn
conn.Open()
Dim cmd As New System.Data.OleDb.OleDbCommand()
cmd.CommandText = "SELECT * FROM booksaver WHERE ISBN=BookNo"
'cmd.CommandText = "select * from booksaver"
cmd.Connection = conn
Dim ada As New System.Data.OleDb.OleDbDataAdapter(cmd)
Dim ds As New DataSet()
ada.Fill(ds, "booksaver")/运行时出错，至少一个参数没有被指定值
DataGridView1.DataSource = ds.Tables("booksaver")
可能是三个参数当中其中一个没有值，试试看用
shbSqlStr="select sum([Money]) as [Money] from PeiJianManage where Provider = @Provider ......这种传参数的方法。。
或者 使用断点调试，查找一下哪些参数没有值！
cmd.CommandText = "SELECT * FROM booksaver WHERE ISBN=BookNo"
改成
cmd.CommandText = "SELECT * FROM booksaver WHERE ISBN='" & BookNo & "'"
这个专家回答的。。。等于没回答。专家果然牛啊。