怎么用控件连接mysql 控件数据绑定

.net winform怎么连接mysql

方法/步骤1

创新互联建站是一家专业从事成都网站建设、网站建设的网络公司。作为专业网站制作公司,创新互联建站依托的技术实力、以及多年的网站运营经验,为您提供专业的成都网站建设、营销型网站及网站设计开发服务！

先从左侧的工具栏拖进控件Button和RichTextBox。

接着在RichTextBox中写上连接数据库的字符串。

Data Source=AH;Initial Catalog=DS20;User ID=sa;password=xxxxxxx;

Data Source：数据库服务器名称。

Initial Catalog：数据库名称。

User ID：数据库用户名。

password：数据库连接密码。

双击Button按钮，进入按钮点击事件，添加访问数据库的代码。这里代码的意思是，尝试连接SQL数据库，如果连接成功则显示“OK”，如果连接失败则显示失败信息。

SqlConnection：表示数据库SQL连接的类。

Open()：打开数据库。

Exception i：获取连接失败SQL的信息。

接下来分别演示“连接成功”和“连接失败”的效果。

高分求怎样在delphi7中用database这个控件连接mysql数据库的方法

我是用ADO连接的，BDE没尝试过。如果是ADO连接的话需要做如下设置：

第一步：下载安装mysql-connector-odbc-5.1.12-win32.msi驱动程序,该驱动程序可以从mysql官方网站下载：。

第二步：在电脑上配置MYSQL ODBC驱动程序，如下：

1、打开“我的电脑”-“控制面板”-“管理工具”-“数据源 (ODBC)”-“驱动程序”标签页，检查mysql驱动安装情况。如出现“Mysql ODBC 5.1 Driver”则表示ODBC驱动已完成安装。

2、在“ODBC 数据源管理器”的“用户DSN”标签页添加MYSQL的选项，并配置mysql的ODBC属性。选择“添加”—“mysql ODBC 5.1 DRIVER”-“完成”。

第三步：在DELPHI上连接MYSQL数据库：

1、 在程序添加TADOconnection控件，并对TADOConnection控件属性进行设置。

（1）、配置ConnectionString属性

“提供程序”-“MicorosoftOLE DB Provider for ODBC Driver”-“下一步”。

在“使用数据源名称”的下拉菜单中选择mysql配置的选项。输入用户名和密码后选择“测试连接”进行连接测试。如果出现“测试成功”则代表已连接上数据库。注：“输入要使用的初始目录”必须留空，否则会出错。

（2）、配置“LoginPrompt”属性为false，“Connected”为true。

至此，delphi通过ODBC连接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