求救!关于在vb程序中sqlserver数据库的连接！

Question

Dim conMainMdb As New ADODB.ConnectionDim rstMainMdb As New ADODB.Recordset
conMainMdb.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source= " & App.Path & "\MainMDB.mdb;Persist Security Info=False"
    conMainMdb.Open
    With rstMainMdb     
        .CursorLocation = adUseClient
        .CursorType = adOpenDynamic
        .LockType = adLockOptimistic
        .ActiveConnection = conMainMdb
        .Open "SELECT * FROM [check] order by 编号 "
        
    End With

Answer 1

set conn=new adodb.connection
set rs=new adodb.recordset
strconn="Provider=sqloledb;Data Source=192.168.1.78;Initial Catalog=Rdbbs;User ID=sinolaws;Password=1488sinolaws;Auto Translate=false;"
conn.open strconn
conn.execute sql语句
rs.open sql语句，strconn,1,3
,,,,,,,,,,,,,,,,,,,,
,,,,,,,,,,,,,,,,,,,,

Answer 2

同意ganzhiruogy(方竹)所说！没有经验，可以先找找电子书看看，
网上很多啦。
^_^