VB連接MYSQL數據的方法
博客分類：
VB
VBMySQLSQLServerSQLSocket
第一步：上網http://dev.mysql.com/downloads/connector/odbc/下載mysql-connector-odbc-5.1.6-win32.msi
第二步：安裝mysql-connector-odbc-5.1.6-win32.msi
第三步：運行VB並新建一標准EXE工程, 通過菜單工程->引用 打開」引用」對話框, 找到 MicrosoftActiveX Data Objects x.x Library , 其中 x.x 是版本號, 可能會有很多個, 這里我選擇的是2.5
第四步：打開代碼窗口, 在 Form_Load 過程中輸入下面的代碼(具體說明在代碼的注釋中):
Vb代碼
' 定義並創建資料庫連接和訪問對象
Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
' 定義資料庫連接字元串變數
Dim strCn As String
' 定義資料庫連接參數變數
Dim db_host As String
Dim db_user As String
Dim db_pass As String
Dim db_data As String
' 定義 SQL 語句變數
Dim sql As String
' 初始化資料庫連接變數
db_host = "localhost"
db_user = "root"
db_pass = ""
db_data = "erqiuda"
' MySQL ODBC 連接參數
'+------------+---------------------+----------------------------------+
'| 參數名 | 默認值 | 說明 |
'+------------+------------------------------------------------------–+
'| user | ODBC (on Windows) | MySQL 用戶名 |
'| server | localhost | MySQL 伺服器地址 |
'| database | | 默認連接資料庫 |
'| option | 0 | 參數用以指定連接的工作方式 |
'| port | 3306 | 連接埠 |
'| stmt | | 一段聲明, 可以在連接資料庫後運行 |
'| password | | MySQL 用戶密碼 |
'| socket | | (略) |
'+------------+---------------------+----------------------------------+
' 詳細查看官方說明
' http://dev.mysql.com/doc/refman/5.0/en/myodbc-configuration-connection-parameters.html
strCn = "DRIVER={MySQL ODBC 5.1 Driver};" & _
"SERVER=" & db_host & ";" & _
"DATABASE=" & db_data & ";" & _
"UID=" & db_user & ";PWD=" & db_pass & ";" & _
"OPTION=3;stmt=SET NAMES GB2312"
' stmt=SET NAMES GB2312
' 這句是設置資料庫編碼方式
' 中文操作系統需要設置成 GB2312
' 這樣中文才不會有問題
' 版本要求 mysql 4.1+
' 連接資料庫
cn.Open strCn
' 設置該屬性, 使 recordcount 和 absolutepage 屬性可用
cn.CursorLocation = adUseClient
' 訪問表users
sql = "select * from users"
rs.Open sql, cn
MsgBox rs.RecordCount
B. VB6.0使用什麼方法連接mysql資料庫比較好且不需要再每台客戶端機器上安裝程序
在VB中可以使用ADO數據控制項實現對MySQL資料庫的訪問，但ADO控制項不能直接訪問MySQL，需要安裝MyODBC(可以在網上下載)並在ODBC中注冊一個用戶DSN(控制面板/管理工具/數據源)，這樣就能使VB順利連接到MySQL資料庫了。
連接上了還需要執行SQL查詢操作並能取得查詢結果，可以使用ADODB的Command對象和RecordSet對像。
C. vb訪問mysql
需要安裝MYSQL ODBC驅動程序.下載地址: http://dev.mysql.com/downloads/ Application Programming Interfaces (APIs) Official APIs: The C API is included with the server, above. Connector/ODBC - MySQL ODBC driver Connector/ODBC 3.52 -- development release Connector/ODBC 3.51 -- proction release Connector/ODBC 2.50 -- old release //呵,我用的是這個,內有9X/NT版本的驅動 裝成功以後,在ODBC數據源建一個MYSQL的ODBC(一般在最下面):輸入ODBC名,用戶,密碼,資料庫名等. 接下來就用這個ODBC進行聯接就可以了.(當然你要先啟動MYSQL)
D. 如何用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:
E. VB 連接MySQL資料庫 報錯 未發現數據源名稱且未指定默認驅動程序 求解～～感謝！！MySQL是8.0版本的
《MySQL 8.0.17》網路網盤資源免費下載:
鏈接: https://pan..com/s/1PQdVY20q0er1aX7mgxu-QQ
MySQL 8.0.17是一種開放源代碼的關系型資料庫管理系統，使用最常用的資料庫管理語言–結構化查詢語言SQL進行資料庫管理。MySQL 8.0.17優化了SQL查詢演算法，有效地提高查詢速度；支持多線程，充分利用CPU資源，支持多用戶；提供用於管理、檢查、優化資料庫操作的管理工具。由於其體積小、速度快、總體擁有成本低，目前被廣泛地應用在Internet上的中小型網站中。
F. VB 怎麼讀取 mysql 資料庫
ServerIP
=
SQL的伺服器IP
也可以是
伺服器的名稱
DB_PWD
=
"sa"
DB_User
=
"sa"
DB_Name
=
SQL資料庫表名
SqlStr
=
"Provider
=
SQLOLEDB.1;Password
="
&
DB_PWD
&
";Persist
Security
Info
=
True;User
ID
="
&
DB_User
&
";Initial
Catalog="
&
DB_Name
&
";Data
Source="
&
ServerIP
Public
DBCnn
As
New
ADODB.Connection
DBCnn.Open
SqlStr
DBCnn就可以做連接字元串了
G. vb的ADO控制項如何連接操作MYSQL資料庫啊
由於ADO對象不直接支持MySQL,所以必須先安裝MyODBC, 後者也是一個免費產品，在 www.mysql.org上有下載，安裝好了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
H. vb6.0如何連接MYSQL資料庫
最簡單的辦法是：在VB里添加一個ADO部件，將其放到窗體中，然後右鍵選擇屬性，在其屬性頁的下面有個生成連接字元串的項，點擊其後的按鈕，然後一步步的來做（很簡單的），然後連接字元串就會在那裡生成，只要拷貝這個字元串，就可以用ADODB來連接了。。。
I. VB查詢MYSQL數據
源碼名稱:
查詢MySQL資料庫的管理器
資源語言
英文
資源類型
VB源碼 資料庫
資源環境:
VB
/
Windows
資源大小:
163
整理時間:
2009-6-23
4:53:22
下載次數:
0
資源標簽:
MySQL
資源上傳:
VB中國團隊 資源簡介
Explorer
for
MySQL
Data
Base.You
can
retrieve
and
execute
your
query.
查詢MySQL資料庫的管理器
J. 我想用vb操作mysql資料庫，可行否
可以的，這個沒有問題。
參考：
Option Strict On
Imports MySql.Data.MySqlClient
Mole Example
Sub Main()
Dim cs As String = "Database=testdb;Data Source=localhost;" _
& "User Id=testuser;Password=test623"
Dim conn As New MySqlConnection(cs)
Try
conn.Open()
Console.WriteLine("MySQL version : {0}", conn.ServerVersion)
Catch ex As MySqlException
Console.WriteLine("Error: " & ex.ToString())
Finally
conn.Close()
End Try
End Sub
End Mole