vb连接数据库VB连接数据库

vb连接sql数据库方法

使用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如何连接数据库？

很简单，引用microsoft ado 2.1(2.5,2.6,2.7,2.8都行），然后写

dim conn as new adodb.connection

conn.open "连接字符串，看你连接哪种数据库了"

这就连上了

vb 与数据库有几种连接方式

可以用ADO的数据库连接方式，连接不同类型的数据库用法不太一样 一楼的给的是连接ess数据库的，还有连接SQL Server的和Oracel，用法不太一样

VB中如何连接一个数据库

可以用Data或者用ADODC。

用data控件的话，连接格式为： Data1.DatabaseName = "E:Visual Basic123.mdb" Data1.RecordSource = "select * from表1 用Adodc控件的话，连接格式为： Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "IDESIEMENS.mdb;Persist Security Info=False" Adodc1.CommandType = adCmdText Adodc1.RecordSource = "select * from 表1" Adodc1.Refresh 当然用ADO也可以 Dim con As New ADODB.Connection Dim rs As New ADODB.Recordset con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "IDESIEMENS.mdb;Persist Security Info=False" rs.Open "select * from表1 在使用这些代码之前，请先“引用”数据库控件，步骤如：单击VB菜单栏“工程”，选择引用，然后勾选Microsoft Activex Data Objects 2.8 library……点确定保存。

然后在“引用”下面，选择“部件”，找到Microsoft Data Control 6.0，勾选，点确定保存，就可以使用ADO和ADODC控件连接数据库了。

VB连接数据库

首先如果你用的如果是sqlserver 或者oracle等数据库的话就可以远程连接，如果是ess就不要折腾了，只要修改连接字符串中的路径就可以了，用ip地址或者域名来定位数据库的位置，还有就是确保数据库所在的计算机开启了数据库相关网络服务，要不然是怎么样也连不上的。

如果你们是在一个局域网就可以用ip来直接访问，你可以先用可视化工具测试下能否连接，如果能连接再去修改你的程序的连接字符串，会连接本机的话，这个修改你应该也会；如果不在同一局域网，由于现在的adsl上网都没有固定ip，那就装个花生壳，再搞个免费域名，这样就能通过域名访问你数据库所在计算机了、、