vb连接数据库 VB怎么连接SQL Server数据库
这篇文章给大家聊聊关于vb连接数据库，以及VB怎么连接SQL Server数据库对应的知识点，希望对各位有所帮助，不要忘了收藏本站哦。
在VB里怎么连接sql数据库
一、配置ODBC数据源
1、在控制面板中，双击管理工具，然后打开ODBC数据源管理器。
2、在“系统DSN”选项卡中，单击“添加”按钮，打开“创建新数据源”对话框，在“名称”列表框中选择“SQL Server”。选好单击完成
3、在打开“建立新的数据源到SQL Server”对话框，在“名称”文本框输入新数据源的名称，描述数据源按你理解的方式来写(随意)。“服务器”就选择你要连接到的服务器。
4、选择使用用户输入登录的ID和密码的SQL验证
。选连接SQL默认设置
5、再下一步下一步，完成。测试数据源看连接是否成功就行了。成功后按确定。
二、VB中设置连接
1、添加部件Mircrosoft ADO Data Control 6.0(OLEDB),把部件拖到窗体。
2、对ADO部件点右键选属性，选择使用连接字符串，按生成。
3、选择Mircosoft OLE DB Providar for SQL Server
按下一步
4、
1、输入服务器名称
2、使用指定的服务器信息
3、在服务器上选择数据库
这时就选择你在SQL Server建好的数据库就行了
5、测试连接可以看到连接是否成功！
VB怎么连接SQL Server数据库
VB连接数据库方式主要有两种，一是通过ODBC接口，ODBC是windows系统里提供的接口，专门连接数据库的，可以连接多种数据库，在应用电脑的设置ODBC，也就DSN数据源（下面说到的），连接到服务器。
第二种就是ADO方式，
VB使用ADO数据库可以分为有源数据库和无源数据库，即是否使用了DSN数据源，如下例：
1、在连接数据库前首先要在VB菜单中“工程”-“引用”从中选择 microsoft activeX Data objects 2.6 library和 microsoft activeX Data objects recordset 2.6两个组件，这是在连接数据前所必做的工作。
2、接下来定义ADO的连接对象，如下所示：
Set conn= New ADODB.Connection
Set rs= New ADODB.Recordset
第一种方法采用的是无源的数据库连接方法
conn.ConnectionString="Driver={sql server};server=JSZX3-11;uid=sa;pwd=;database=wzc"
conn.ConnectionTimeout= 30
conn.Open
rs.Open"select用户名,密码 from login where用户名='"& Trim(Combo1.Text)&"' And密码='"& Trim(Text1.Text)&"'", conn, adOpenStatic, adLockReadOnly, adCmdText
If rs.EOF= True And rs.BOF Then
m= MsgBox("请重新登录", vbExclamation)
Text1.Text=""
Text1.SetFocus
Else
Form1.Hide
End If
rs.Close
这是第二种方法连接数据库的方法，这一种方法是采用有源的方法与数据库连接的方法，代码如下所示：
Set conn= New ADODB.Connection
Set rs= New ADODB.Recordset
conn.ConnectionString="DSN=login;uid=sa;pwd=;"
conn.ConnectionTimeout= 30
conn.Open
rs.Open"select用户名 from login", conn, adOpenStatic, adLockReadOnly, adCmdText
Dim i As String
For t= 0 To Val(rs.RecordCount)- 1
i= Trim(rs.Fields("用户名").Value)
rs.MoveNext
Combo1.AddItem i
Next t
rs.Close
连接数据库的方法很多很多，只要各位去勇敢的偿试一下，就可以感觉数据库的方法并不是很难，本人以前也很想做这方法的工作，只是学识不深，未能完成胸中大志，如今对这些方法的多少有一些了解，特意为那些初学者以供学习之用。
VB使用ADO数据库可以分为有源数据库和无源数据库，即是否使用了DSN数据源，如下例：
1、在连接数据库前首先要在VB菜单中“工程”-“引用”从中选择 microsoft activeX Data objects 2.6 library和 microsoft activeX Data objects recordset 2.6两个组件，这是在连接数据前所必做的工作。
2、接下来定义ADO的连接对象，如下所示：
Set conn= New ADODB.Connection
Set rs= New ADODB.Recordset
第一种方法采用的是无源的数据库连接方法
conn.ConnectionString="Driver={sql server};server=JSZX3-11;uid=sa;pwd=;database=wzc"
conn.ConnectionTimeout= 30
conn.Open
rs.Open"select用户名,密码 from login where用户名='"& Trim(Combo1.Text)&"' And密码='"& Trim(Text1.Text)&"'", conn, adOpenStatic, adLockReadOnly, adCmdText
If rs.EOF= True And rs.BOF Then
m= MsgBox("请重新登录", vbExclamation)
Text1.Text=""
Text1.SetFocus
Else
Form1.Hide
End If
rs.Close
这是第二种方法连接数据库的方法，这一种方法是采用有源的方法与数据库连接的方法，代码如下所示：
Set conn= New ADODB.Connection
Set rs= New ADODB.Recordset
conn.ConnectionString="DSN=login;uid=sa;pwd=;"
conn.ConnectionTimeout= 30
conn.Open
rs.Open"select用户名 from login", conn, adOpenStatic, adLockReadOnly, adCmdText
Dim i As String
For t= 0 To Val(rs.RecordCount)- 1
i= Trim(rs.Fields("用户名").Value)
rs.MoveNext
Combo1.AddItem i
Next t
rs.Close
连接数据库的方法很多很多，只要各位去勇敢的偿试一下，就可以感觉数据库的方法并不是很难，本人以前也很想做这方法的工作，只是学识不深，未能完成胸中大志，如今对这些方法的多少有一些了解，特意为那些初学者以供学习之用。
如何用vb连接mysql数据库
VB连接MYSQL数据的方法
博客分类：
VB
VBMySQLSQLServerSQLSocket
第一步：上网http://dev.mysql.com/downloads/connector/odbc/下载mysql-connector-odbc-5.1.6-win32.msi
第二步：安装mysql-connector-odbc-5.1.6-win32.msi
第三步：运行VB并新建一标准EXE工程,通过菜单工程->引用打开”引用”对话框,找到 MicrosoftActiveX Data Objects x.x Library,其中 x.x是版本号,可能会有很多个,这里我选择的是2.5
第四步：打开代码窗口,在 Form_Load过程中输入下面的代码(具体说明在代码的注释中):
Vb代码
'定义并创建数据库连接和访问对象
Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
'定义数据库连接字符串变量
Dim strCn As String
'定义数据库连接参数变量
Dim db_host As String
Dim db_user As String
Dim db_pass As String
Dim db_data As String
'定义 SQL语句变量
Dim sql As String
'初始化数据库连接变量
db_host="localhost"
db_user="root"
db_pass=""
db_data="erqiuda"
' MySQL ODBC连接参数
'+------------+---------------------+----------------------------------+
'|参数名|默认值|说明|
'+------------+------------------------------------------------------–+
'| user| ODBC(on Windows)| MySQL用户名|
'| server| localhost| MySQL服务器地址|
'| database||默认连接数据库|
'| option| 0|参数用以指定连接的工作方式|
'| port| 3306|连接端口|
'| stmt||一段声明,可以在连接数据库后运行|
'| password|| MySQL用户密码|
'| socket||(略)|
'+------------+---------------------+----------------------------------+
'详细查看官方说明
' http://dev.mysql.com/doc/refman/5.0/en/myodbc-configuration-connection-parameters.html
strCn="DRIVER={MySQL ODBC 5.1 Driver};"& _
"SERVER="& db_host&";"& _
"DATABASE="& db_data&";"& _
"UID="& db_user&";PWD="& db_pass&";"& _
"OPTION=3;stmt=SET NAMES GB2312"
' stmt=SET NAMES GB2312
'这句是设置数据库编码方式
'中文操作系统需要设置成 GB2312
'这样中文才不会有问题
'版本要求 mysql 4.1+
'连接数据库
cn.Open strCn
'设置该属性,使 recordcount和 absolutepage属性可用
cn.CursorLocation= adUseClient
'访问表users
sql="select* from users"
rs.Open sql, cn
MsgBox rs.RecordCount
vb如何连接sql数据库
一、配置ODBC数据源
1、在控制面板中，双击管理工具，然后打开ODBC数据源管理器。
2、在“系统DSN”选项卡中，单击“添加”按钮，打开“创建新数据源”对话框，在“名称”列表框中选择“SQL Server”。选好单击完成
3、在打开“建立新的数据源到SQL Server”对话框，在“名称”文本框输入新数据源的名称，描述数据源按你理解的方式来写(随意)。“服务器”就选择你要连接到的服务器。
4、选择使用用户输入登录的ID和密码的SQL验证
。选连接SQL默认设置
5、再下一步下一步，完成。测试数据源看连接是否成功就行了。成功后按确定。
二、VB中设置连接
1、添加部件Mircrosoft ADO Data Control 6.0(OLEDB),把部件拖到窗体。
2、对ADO部件点右键选属性，选择使用连接字符串，按生成。
3、选择Mircosoft OLE DB Providar for SQL Server
按下一步
4、
1、输入服务器名称
2、使用指定的服务器信息
3、在服务器上选择数据库
这时就选择你在SQL Server建好的数据库就行了
5、测试连接可以看到连接是否成功！
好了，本文到此结束，如果可以帮助到大家，还望关注本站哦！