怎样用vb连接sql!!急

Question

怎样用vb连接sql

Answer 1

参考：'引用ADO("工程"/"引用"/Microsoft ActiveX Data Objects 2.X Library)
Private Sub Command1_Click()    Dim cn As New ADODB.Connection, rs As New ADODB.RecordSet
    '混合验证方式的连接：
    'cn.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=登陆用户名;Password=登录密码;Initial Catalog=数据库名;Data Source=服务器别名/IP"
    '集成验证的连接：
    cn.ConnectionString = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=数据库名;Data Source=服务器别名/IP"
    cn.Open
    rs.CursorLocation=adUseClient'设置客户端游标
    rs.Open "select * from 表1", cn, 3, 2
    ......End Sub

Answer 2

Option ExplicitDim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
工程-》引用 Microsoft ActiveX Object 2.x Library
Dim strSQL As Stringcn.ConnectionString = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;User ID=sa;Initial Catalog=Êý¾Ý¿âÃû;Data Source=·þÎñÆ÷Ãû"
cn.OpenstrSQL = "Select * From table1 "rs.Open strSQL, cn, adOpenDynamic, adLockOptimistic

Answer 3

谢谢您!
那您知道怎么把access连接vb的怎样改成用sql连接vb 的么?

Answer 4

其实获取连接字符串完全可以用 ADODC控件来获取，无需记这么多东西的