您的位置:

ado链接mysql数据库,ado怎么连接数据库连接

本文目录一览:

在vc中使用ADO访问MYSQL数据库怎样设置?

Driver={SQL

Server};Server=主机名;Database=数据库名;Uid=sa;Pwd=sa;

还有一个比较简单方法确定连接字符串:

1.建立一个.udl的文件。

2.双击打开,将里面相关项进行设置,保存,关闭。

3.有记事本打开这个udl文件,里面的字符串就是连接字符串!

DELPHI 如何用ADO连接MYSQL数据库

sql设置好用户名跟密码以后比如sa 密码123

打开delphi放一个按钮,然后在控件栏那里选datacontrol,选第一个dbgrid放到form上,选dataaccess里面的第一个datasource,然后选ado——adoconnection放到form上,再选ado——adoquery放到form上。点选adoconnection左边的框体有个connectionstring点"…":弹出来的对话框中点Build,然后选择从下数上来第五个,双击或者下一步,填入用户名跟密码(sa 123),在“3.选择数据库”那里选择要打开的数据库,选上保存密码,点一下“测试连接”,点OK退出。出来以后继续在左边框体里面找LoginPrompt改成False。到adoquery了,点上它然后在左边框体的Connection那里下拉选择ADOConnection1,然后点选datasource,在左边框体找到dataset下拉选择adoquery1,然后再点选dbgrid,在左边框体找到datasource,下拉选择datasource1。双击刚才创建的按钮,假设你要打开的数据表名叫“销售订单”,输入

adoquery1.close;

adoquery1.sql.clear;

adoquery1.sql.add('select * from 销售订单 ');

adoquery1.open;

运行,按按钮如果dbgrid有数据显示表示连接成功了,以上所有功能实现均可通过代码或者手工设置。

如何正确获取MYSQL的ADO连接字符串

首先你正确安装了MYSQL的数据库驱动程序(mysql-connector-odbc-5.3.2-win32.msi )

1.在桌面上新建一个空的文本文件mysql.txt,重命名为mysql.udl;

2.双击这个mysql.udl文件,打开“数据库连接属性”对话框,在“提供程序”页选择”Micrsoft Ole DB Provider for ODBC Drivers“, 点击下一步;

3.在“连接”页的,"指定数据源"选择"使用连接字符串";

4.点击“编译”,弹出“选择数据源”,在“文件数据源”页中点击”新建“,在创建新数据源选择MYSQL的驱动程序”MySQL ODBC 5.1 Driver";

5.点击“下一步”,点击"浏览",在”另存为“对话框中文件名称写入“mysql",点击”下一步“,点击”完成“

vb的ADO控件如何连接操作MYSQL数据库啊

由于ADO对象不直接支持MySQL,所以必须先安装MyODBC, 后者也是一个免费产品,在 上有下载,安装好了MyODBC, 就可以在ODBC数据源管理中配置一个数据源名称,把它指向你想连接的MySQL数据库。代码如下:Sub connectMySQL() '通过MyODBC去连接MySQL数据库,并将Microsoft SQL Server 7 '的数据转进mysql中 Dim sConnect As String, sSql As String, i As Long Dim cnMSSQL As New ADODB.Connection Dim cnMySQL As New ADODB.Connection '声明并创建对象 连接 Dim rs As New ADODB.Recordset '声明并创建对象 记录集 Dim cm As New ADODB.Command '声明并创建对象 命令 sConnect = "dsn=mysql1" '指定MySQL的数据源名称 cnMySQL.Open sConnect '连接到 mysql sConnect="Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;pwd=123456;Initial Catalog=softdown;Data Source=ntserver" '连接到 ms sql server 7 cnMSSQL.Open sConnect 'sSql = "create table softinfo (softNum smallint,softname varchar(70),softdesc blob," _ "softpath varchar(30),softleng varchar(10),softclass varchar(10),softsugest tinyint(1)," _ "softdown smallint(4))" '创建新的MySQL数据表语句 sSql = "select * from softinfo order by softnum" rs.Open sSql, cnMSSQL, 1, 1 While Not rs.EOF sSql = "insert into softinfo values (" Trim(rs(0).Value) ",'" Trim(rs(1).Value) _ "','" Trim(rs(2).Value) "','" Trim(rs(3).Value) "','" Trim(rs(4).Value) _ "','" Trim(rs(5).Value) "'," Trim(rs(6).Value) "," Trim(rs(7).Value) ")" cm.ActiveConnection = cnMySQL cm.CommandType = adCmdText cm.CommandText = sSql cm.Execute rs.MoveNext Wend rs.Close Set rs = Nothing cnMySQL.Close Set cnMySQL = Nothing cnMSSQL.Close Set cnMSSQL = Nothing End Sub

ADO连接SQL数据库的几种方式

一、使用DSN连接。使用ODBC DSN 连接数据库有两种方式,一种为SYSTEM DSN、一种为DSN文件,因此在使用DSN连接方式之前必段创建一个SYSTEM DSN或DSN FILE.1、ODBC - DSN oConn.Open "DSN=AdvWorks;" _ "Uid=Admin;" _ "Pwd=;2、ODBC - File DSNoConn.Open "FILEDSN=c:\somepath\mydb.dsn;" _ "Uid=Admin;" _ "Pwd=;"二、不使用DSN连接方式1、ODBC Driver for MySQL (via MyODBC)---连接一个本地数据库 oConn.Open "Driver={mySQL};" _ "Server=MyServerName;" _ "Option=16834;" _ "Database=mydb;"---连接一个远程数据库 oConn.Open "Driver={mySQL};" _ "Server=db1.database.com;" _ "Port=3306;" _ "Option=131072;" _ "Stmt=;" _ "Database=mydb;" _ "Uid=myUsername;" _ "Pwd=myPassword;"2、OLE DB Provider for SQL Server 连接这个链接只需写好连接字符串,格式:conn.ConnectionString = "Driver={sql server};server=服务器名;uid=登录名;pwd=密码;database=数据源" 使用无源连接优点较多:可以不创建 DSN,这样就能简化客户应用程序的设置和安装。 不必在系统注册表中查找 DSN,加快连接速度。 更有效到控制服务器及其它连接参数,从而提高应用程序和系统的安全性。当然还有其他的连接方式,以后遇到了再补充。

VB6怎么使用ADO控件连接MYSQL 数据库?我看了网上的说的,还是不行

DIM CN AS NEW ADODB.CONNECTION

Set cn = New ADODB.Connection

cn.Provider = "MSDASQL"

cn.ConnectionString = "driver={mysql odbc 5.1 driver};server=" _

Text1.Text ";port=" _

Text4.Text ";uid=" _

Text2.Text ";pwd=" _

Text3.Text ";database=db_account;OPTION=3"

cn.Open

If cn.State = adStateOpen Then _

MsgBox "连接成功", vbOKOnly, "提示"

cn.Close

要安装MYsql odbc 驱动 ODBC CONNECTER/mysql

不要设置 直接用 如下面大括号里面的

driver={mysql odbc 5.1 driver}

然后 输入 账号uid 密码pwd 端口port 数据库名database

你应该能看懂的 如果不懂加我