在vb里怎么连SQL SERVER数据库
2个回答
展开全部
'工程→引用,选择Microsoft ActiveX Data Objects 2.5 Library
'在你需要连接数据库的地方贴上下面的代码
Dim Cnn As New ADODB.Connection
Dim Rst As New ADODB.Recordset
rst.CursorLocation = adUseClient
Cnn.ConnectionString = "Provider=SQLOLEDB.1;Network=DBMSSOCN;Persist Security Info=False;User ID=sa;pwd=;Initial Catalog=;Data Source=."
Cnn.Open
Rst.Open "SQL语句",Cnn,1,1
''此处操作Rst游标实现功能
Rst.Close
Cnn.Close
'在你需要连接数据库的地方贴上下面的代码
Dim Cnn As New ADODB.Connection
Dim Rst As New ADODB.Recordset
rst.CursorLocation = adUseClient
Cnn.ConnectionString = "Provider=SQLOLEDB.1;Network=DBMSSOCN;Persist Security Info=False;User ID=sa;pwd=;Initial Catalog=;Data Source=."
Cnn.Open
Rst.Open "SQL语句",Cnn,1,1
''此处操作Rst游标实现功能
Rst.Close
Cnn.Close
追问
我引用的是2.8的,方法都是一样么?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询