ADO连接SQL Sever的ConnectionString的格式

Question

ConnectString = "Provider=MSDASQL.1;Password=sa;Persist Security Info=True;User ID=sa;Data Source=database",自己验证罗

Answer 1

Dim CN As New ADODB.Connection
Dim RsInfo As New ADODB.RecordsetPrivate Sub Form_Load()    CN.ConnectionString = "Provider=sqloledb;Data Source=pmserver;Initial Catalog=test;User Id=sa;Password=sa;"
    CN.Open
    RsInfo.CursorLocation = adUseClient
    RsInfo.Open "select * from user", CN, adOpenDynamic, adLockBatchOptimistic
    MsgBox (RsInfo.RecordCount)
    Set CN = Nothing
    Set RsInfo = Nothing
End Sub

Answer 2

dim con as adodb.connection
set con =new adodb.connection
con.connectionstring="driver={sql server};server=ip地址;database=数据库名;uid=用户
;pwd=密码"
con.open

Answer 3

你不用自己写的，ADO控件可以自己动生成的，你只要在它的属性设置页面中进行相关设置就可以了。Form1.Adodc1.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=boolean_pd;User ID=" & string_dlyh & ";password=" & string_kl & ";Initial Catalog=" & string_sjk & ";Data Source=" & string_fwq & ""
看不出有什么错误，对不对你可以运行一下你的程序，看运行时有没有错误就知道有没有错了。