如何用VB连接远程的mysql数据库
1、显示密码
创新互联专注于雁山企业网站建设,响应式网站,商城网站建设。雁山网站建设公司,为雁山等地区提供建站服务。全流程按需设计,专业设计,全程项目跟踪,创新互联专业和态度为您提供的服务
如:MySQL
连接远程数据库(192.168.5.116),端口“3306”,用户名为“root”,密码“123456”
C:/mysql -h
192.168.5.116 -P 3306 -u root -p123456
2、隐藏密码
如:MySQL 连接本地数据库,用户名为“root”
C:/mysql -h
localhost -u root -p
Enter password:
如何使vb与mysql连接,并且在其他电脑上不用安装和设置odbc
首先得建立odbc数据源!步骤如下:
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,有现成的代码吗跪求
和SQL数据库差不多的,下面是我用vb6.0连接本地mysql数据库的连接字符串
"driver={MySQL
ODBC
3.51
Driver};server=127.0.0.1;database=mysql;uid=root;pwd=sasa"
VB怎么连接mysql
用ODBC!
先到下载mysql 的 odbc驱动,装上以后 ,再配置数据源,再在vb里面编程连接!
vb6.0如何连接MYSQL数据库?
最简单的办法是:在VB里添加一个ADO部件,将其放到窗体中,然后右键选择属性,在其属性页的下面有个生成连接字符串的项,点击其后的按钮,然后一步步的来做(很简单的),然后连接字符串就会在那里生成,只要拷贝这个字符串,就可以用ADODB来连接了。。。
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
网站栏目:mysql怎么用vb连接 vb和mysql如何连接
文章来源:http://scgulin.cn/article/hhccpj.html