在vb连接mysql数据库_VB连接Mysql数据库
然后下載安裝MysqL,odbc驅(qū)動
需要添加ado'菜單"工程"->"引用" 找 Microsoft ActiveX Data Object.... 或者簡單點(diǎn)找到ado控件 扔到窗口上 再刪除 也行
在vb中連接數(shù)據(jù)庫的代碼:
Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
' 定義數(shù)據(jù)庫連接字符串變量
Dim strCn As String
' 定義數(shù)據(jù)庫連接參數(shù)變量
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
' 初始化數(shù)據(jù)庫連接變量
db_host = "localhost"
db_user = "root" ‘用戶名
db_pass = "root" ’用戶密碼
db_data = "radio" '數(shù)據(jù)庫名
' MysqL ODBC 連接參數(shù)
'+------------+---------------------+----------------------------------+
'| 參數(shù)名 | 默認(rèn)值 | 說明 |
'+------------+------------------------------------------------------–+
'| user | ODBC (on Windows) | MysqL 用戶名 |
'| server | localhost | MysqL 服務(wù)器地址 |
'| database | | 默認(rèn)連接數(shù)據(jù)庫 |
'| option | 0 | 參數(shù)用以指定連接的工作方式 |
'| port | 3306 | 連接端口 |
'| stmt | | 一段聲明,可以在連接數(shù)據(jù)庫后運(yùn)行 |
'| password | | MysqL 用戶密碼 |
'| socket | | (略) |
'+------------+---------------------+----------------------------------+
' 詳細(xì)查看官方說明
' http://dev.MysqL.com/doc/refman/5.0/en/myodbc-configuration-connection-parameters.html
strCn = "DRIVER={MysqL ODBC 3.51 Driver};" & _
"SERVER=" & db_host & ";" & _
"DATABASE=" & db_data & ";" & _
"UID=" & db_user & ";PWD=" & db_pass & ";" & _
"OPTION=3;stmt=SET NAMES GB2312"
' stmt=SET NAMES GB2312
' 這句是設(shè)置數(shù)據(jù)庫編碼方式
' 中文操作系統(tǒng)需要設(shè)置成 GB2312
' 這樣中文才不會有問題
' 版本要求 MysqL 4.1+
' 連接數(shù)據(jù)庫
cn.Open strCn
' 設(shè)置該屬性,使 recordcount 和 absolutepage 屬性可用
cn.CursorLocation = adUseClient
' 訪問表 table1
sql = "select nicheng,xinqing from nichengandxinqing where uid='1'"
rs.Open sql,cn
Dim nicheng As String
Dim xinqing As String
'加載用戶昵稱
nicheng = rs.Fields(0)
Label1.Caption = nicheng
'加載用戶心情短語
xinqing = rs.Fields(1)
Label2.Caption = xinqing
'鼠標(biāo)放在心情短語提示短語詳細(xì)信息
Label2.ToolTipText = xinqing
'加載網(wǎng)絡(luò)圖片
Image1.Picture = LoadPicture("http://hi.csdn.net/attachment/201201/5/8747069_1325751084ZiD4.jpg")
總結(jié)
以上是編程之家為你收集整理的VB連接Mysql數(shù)據(jù)庫全部內(nèi)容,希望文章能夠幫你解決VB連接Mysql數(shù)據(jù)庫所遇到的程序開發(fā)問題。
如果覺得編程之家網(wǎng)站內(nèi)容還不錯(cuò),歡迎將編程之家網(wǎng)站推薦給程序員好友。
本圖文內(nèi)容來源于網(wǎng)友網(wǎng)絡(luò)收集整理提供,作為學(xué)習(xí)參考使用,版權(quán)屬于原作者。
如您喜歡交流學(xué)習(xí)經(jīng)驗(yàn),點(diǎn)擊鏈接加入交流1群:1065694478(已滿)交流2群:163560250
總結(jié)
以上是生活随笔為你收集整理的在vb连接mysql数据库_VB连接Mysql数据库的全部內(nèi)容,希望文章能夠幫你解決所遇到的問題。
- 上一篇: 利用MentoHUST在路由器上使用锐捷
- 下一篇: 前端学习(2680):注意看位置 少加注