＋设为首页 ＋添加到收藏夹
我想读出sql库里aaa表内,bbb字段的新最近n(为可变量)个内容,该怎么写语句?(用vb!!)
select top n bbb from aaa order by 你的最新标准 desc
rs.open "select .....",con,1,3
aa=rs.fields("bbb")
strCon = "Provider=SQLOLEDB.1;Password=;Persist Security Info=True;User ID=sa;Initial Catalog=sms;Data Source=192.168.1.57
Dim Conn As New ADODB.Connection
Conn.Open strCon
Dim ss
Set ss=Conn.Execute("select top n bbb from aaa order by ...")
Do While Not ss.EOF
theRe = theRe & ss(0)
ss.MoveNext
Loop
Set ss= Nothing
strCon = "Provider=SQLOLEDB.1;Password=;Persist Security Info=True;User ID=sa;Initial Catalog=sms;Data Source=192.168.1.57
Dim Conn As New ADODB.Connection
Dim Rs As New ADODB.Recordset
Dim aa as Variant
Conn.Open strCon
Rs.Open "select top n bbb from aaa order by ...", Conn, adOpenKeyset, adLockOptimistic
Do While Not Rs.EOF
aa= Rs(0)
Rs.MoveNext
Loop
Rs.Close
