SQL获取依赖于第一列的整行
我正在制作一个VB6程序,我想从数据库中获取信息 但是我只需要表中一行的信息 目前我将此作为我的查询SQL获取依赖于第一列的整行,sql,vb6,Sql,Vb6,我正在制作一个VB6程序,我想从数据库中获取信息 但是我只需要表中一行的信息 目前我将此作为我的查询 SELECT CertNo FROM STICKER 这将使用CertNo中的所有项目填充列表框, 有没有一种方法可以获取依赖于变量的信息,比如 SELECT CertNo FROM STICKER WHERE CertNo = 10000 它将从CertNo=10000的行中获取所有列 获取数据的代码: Dim cn As ADODB.Connection, rs As ADODB.Rec
SELECT CertNo FROM STICKER
这将使用CertNo中的所有项目填充列表框,
有没有一种方法可以获取依赖于变量的信息,比如
SELECT CertNo FROM STICKER WHERE CertNo = 10000
它将从CertNo=10000的行中获取所有列
获取数据的代码:
Dim cn As ADODB.Connection, rs As ADODB.Recordset, r As Long
Datalist.Clear
Set cn = New ADODB.Connection
cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=C:\Users\User\Desktop\test\dbAdd.mdb;"
Set rs = New ADODB.Recordset
rs.Open "SELECT CertNo FROM STICKER WHERE CertNo = '10303';", cn, adOpenStatic, adLockOptimistic
rs.MoveFirst
While Not rs.EOF
Datalist.AddItem rs.Fields(0)
rs.MoveNext
Wend
Set rs = Nothing
Set cn = Nothing
如果您需要获取字段的结果,如
Data1
rs.Open "SELECT CertNo FROM STICKER WHERE CertNo = '"& Data1 &"';", cn, adOpenStatic, adLockOptimistic
如果希望从sql返回多个列,请执行以下操作
rs.Open "SELECT CertNo, IssueDate FROM STICKER WHERE CertNo = '"& Data1 &"';", cn, adOpenStatic, adLockOptimistic
在循环中
While Not rs.EOF
Datalist.AddItem rs.Fields(0) & rs.Fields(1)
rs.MoveNext
Wend
缺少运算符我不认为
从贴纸中选择CertNo,其中CertNo=10000
是正确的尝试从贴纸中选择CertNo,其中CertNo='10000'
如果CertNo字段存储为string有效,但我认为它只会得到CertNo列,我怎么能将'10000'作为变量,如Data1?我已经更新了我的原始帖子,谢谢,谢谢!快速提问,这是否只会从CertNo中获取结果?理想情况下,我可以从该行中的不同列中获取结果,例如,我有另一个名为IssueDate的列,这是否也可以包括在内?@user2341069是的,选择您想要的列。检查我的最新答案