VB连接SQL数据库实例

概述Dim Cmd As New ADODB.CommandDim conn As ADODB.ConnectionDim rs As New ADODB.RecordsetSet conn = New ADODB.Connectionconn.ConnectionString = "Provider=SQLOLEDB;server=192.168.3.51;uid=sa;pwd=sa;I

Dim Cmd As New ADODB.CommandDim conn As ADODB.ConnectionDim rs As New ADODB.RecordsetSet conn = New ADODB.Connectionconn.ConnectionString = "ProvIDer=sqlolEDB;server=192.168.3.51;uID=sa;pwd=sa;Initial Catalog=MyERP"conn.ConnectionTimeout = 50conn.OpenDim str_0 As String  '第一列Dim str_1 As String  '第二列Dim str_2 As String  '第三列Set rs = conn.Execute("select * from SystemSettingInfo where SettingInfo_name = '视窗卡'")If rs(0) <> "" Then    str_0 = rs(0)    str_1 = rs(1)    str_2 = rs(2)End Ifconn.Close

其中，ADODB.Command、ADODB.Connection、ADODB.Recordset可能刚装好的环境声明时没有这些对象，添加这些对象的方法：

选择 “Project（即项目）” --> " References...（即引用）" 打开 References窗口，在列表中找到 “Microsoft ActiceX Data Objects 2.8 library”项，添加。再声明前面那三个对象就可以找到了。名称中的“2.8”应该是一个版本。还有2.6、2.2等。（我是做项目临时用到了VB。只供新手查看，一般学VB的这些应该都知道。）

总结

以上是内存溢出为你收集整理的VB连接SQL数据库实例全部内容，希望文章能够帮你解决VB连接SQL数据库实例所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错，欢迎将内存溢出网站推荐给程序员好友。