vb和mysql怎么连接 vb和数据库怎么连接

如何使vb与mysql连接,并且在其他电脑上不用安装和设置odbc

首先得建立odbc数据源!步骤如下:

多端合一成都响应式网站建设公司:PC+平板+手机,同一后台修改数据多端同步更新提交您的需求,获取网站建设与营销策划方案报价,我们会在1小时内与您联系!

1.

在资源管理器或者

我的电脑中,进入到控制面板-管理工具,可以看到“数据库odbc项”。

2.

双击“数据源(odbc)”项,进入到数据源的配置。

3.

要想创建一个指定的数据库,点“添加按钮”,将出现数据源类型选择对话框,

在这一部中,你一定要写明连接的是sql

server

还是aceess。

4.点完成,进入到建立不同数据源的配置项或配置向导,注意,不同的数据库,配置界面有所不同。我介绍的是sql

,首先要输入数据源的名称,描述信息和指定服务器

5.

下一部,进入到sql连接的安全验证,可以选择以windows

nt验证方式或者sql登陆的方式。

6.再点击下一部,安全通过后,进行sql数据库的连接。

7.

继续进行下一部操作,进行一些系统消息语言,日志等配置,一般保持为默认方式。

8.点完成按钮,将提示一些总结信息,并可以执行数据与数据库的连接测试。

这是建立odbc数据源的步骤,下面还得在模块里面把ado连接的代码写好,才能真正连上,代码如下:

private

sub

command_click()

dim

a

as

connection

set

a

=

new

connection

a.connectstring="dsn=pubs;uid=sa;psw"

a.open

end

sub

这有的地方你得自己改改,因为我和你机子不一样!

自己调试吧,好的程序都是调试出来的!

在VB中,如何连接MYSQL

楼上讲的是VB2005的连接方法,不知道你用的是什么版本的VB,我给你一个VB6.0的连接方法吧

先在本机上安装最新的ODBC CONNECTER/mysql

无需设置ODBC,就可以使用.

注意MYSQL的帐户登录是根据主机的,设置好MYSQL的帐户后再做测试.

测试代码:

Dim conn As ADODB.Connection

Dim rs As ADODB.Recordset

Dim fld As ADODB.Field

Dim sql As String

'connect to MySQL server using MySQL ODBC 3.51 Driver

Set conn = New ADODB.Connection

conn.ConnectionString = "DRIVER={MySQL ODBC 3.51 Driver};" _

"SERVER=192.168.0.1;" _

" DATABASE=db_name;" _

"UID=username;PWD=password; OPTION=3"

conn.Open

'create table

conn.Execute "DROP TABLE IF EXISTS my_ado"

conn.Execute "CREATE TABLE my_ado(id int not null primary key, name varchar(20)," _

"txt text, dt date, tm time, ts timestamp)"

'direct insert

conn.Execute "INSERT INTO my_ado(id,name,txt) values(1,100,'venu')"

conn.Execute "INSERT INTO my_ado(id,name,txt) values(2,200,'MySQL')"

conn.Execute "INSERT INTO my_ado(id,name,txt) values(3,300,'Delete')"

Set rs = New ADODB.Recordset

rs.CursorLocation = adUseServer

'fetch the initial table ..

rs.Open "SELECT * FROM my_ado", conn

Debug.Print rs.RecordCount

rs.MoveFirst

Debug.Print String(50, "-") "Initial my_ado Result Set " String(50, "-")

For Each fld In rs.Fields

Debug.Print fld.name,

Next

Debug.Print

Do Until rs.EOF

For Each fld In rs.Fields

Debug.Print fld.value,

Next

rs.MoveNext

Debug.Print

Loop

rs.Close

conn.Close

vb存数据到mysql

在VB中存储数据到MySQL数据库的过程非常简单,只需要建立一个数据库连接,然后使用SQL语句将数据写入数据库即可。

如何用VB连接MySQL数据库求解答

最简单的办法是:在VB里添加一个ADO部件,将其放到窗体中,然后右键选择属性,在其属性页的下面有个生成连接字符串的项,点击其后的按钮,然后一步步的来做(很简单的),然后连接字符串就会在那里生成,只要拷贝这个字符串,就可以用ADODB来连接了。。。


分享题目:vb和mysql怎么连接 vb和数据库怎么连接
浏览地址:http://abwzjs.com/article/doggpgd.html