为何查询时总是说“至少一个参数没有被指定”??????

vbcrack 2004-10-15 11:56:05
查询的源代码为:

Private Sub Command3_Click()
conn.CursorLocation = adUseClient
conn.Open "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\xldx.mdb;"

'nPageSize = Text2.Text
'建立Recordset对象
Set RS = New ADODB.Recordset
strSql = "select * from xldx材料 where 电算代号 like " & Text2.Text & " order by 电算代号" '以电算代号为序排列
RS.Open strSql, conn, adOpenStatic, adLockOptimistic
', 1 '因为要分页显示,所以用键盘指针
End Sub
...全文
47 点赞 收藏 2
写回复
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
tztz520 2004-10-15
'要加上引号,如下面

strSql = "select * from xldx材料 where 电算代号 like '" & Text2.Text & "' order by 电算代号" '以电算代号为序排列
回复
junki 2004-10-15
Dim str1 As String
Like 'str1' '需要单引号

str1为数值类型时,不需要单引号
回复
发动态
发帖子

1180

社区成员

VB 数据库(包含打印,安装,报表)
申请成为版主
社区公告
暂无公告