如何用VB連接遠程的mysql數據庫

1、顯示密碼

創(chuàng)新互聯專注于雁山企業(yè)網站建設,響應式網站,商城網站建設。雁山網站建設公司,為雁山等地區(qū)提供建站服務。全流程按需設計，專業(yè)設計，全程項目跟蹤，創(chuàng)新互聯專業(yè)和態(tài)度為您提供的服務

如：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.

要想創(chuàng)建一個指定的數據庫，點“添加按鈕”，將出現數據源類型選擇對話框，

在這一部中，你一定要寫明連接的是sql

server

還是aceess。

4.點完成，進入到建立不同數據源的配置項或配置向導，注意，不同的數據庫，配置界面有所不同。我介紹的是sql

，首先要輸入數據源的名稱，描述信息和指定服務器

5.

下一部，進入到sql連接的安全驗證，可以選擇以windows

nt驗證方式或者sql登陸的方式。

6.再點擊下一部，安全通過后，進行sql數據庫的連接。

7.

繼續(xù)進行下一部操作，進行一些系統消息語言，日志等配置，一般保持為默認方式。

8.點完成按鈕，將提示一些總結信息，并可以執(zhí)行數據與數據庫的連接測試。

這是建立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 '聲明并創(chuàng)建對象 連接 Dim rs As New ADODB.Recordset '聲明并創(chuàng)建對象 記錄集 Dim cm As New ADODB.Command '聲明并創(chuàng)建對象 命令 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))" '創(chuàng)建新的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