Question

用VB连接SQL里的表是用ADO控件吗?具体怎么用呢?谢谢.

我用VB建立一个command控件,想点击此控件连接SQL中的一个表,如何连接呢?
如果方便能否留下QQ.希望请教更多问题.谢谢

Answer 1

Dim conn As ADODB.Connection
Dim rs As ADODB.Recordset

Set conn = New ADODB.Connection
conn.Open Provider = "SQLOLEDB.1;Password=SQL Server密码;Persist Security Info=True;User ID=SQL Server用户名;Initial Catalog=数据库名;Data Source=服务器名或IP"
Set rs = New ADODB.Recordset
rs.CursorLocation = adUseClient
rs.Open "select * from 你的表", conn, adOpenDynamic, adLockBatchOptimistic
If Not (rs.BOF And rs.EOF) Then
text1.Text = rs.Fields("字段1")
...
End If

Set rs = Nothing
Set conn = Nothing