vb6.0如何連接MYSQL數(shù)據(jù)庫？

最簡單的辦法是：在VB里添加一個ADO部件，將其放到窗體中，然后右鍵選擇屬性，在其屬性頁的下面有個生成連接字符串的項，點擊其后的按鈕，然后一步步的來做（很簡單的），然后連接字符串就會在那里生成，只要拷貝這個字符串，就可以用ADODB來連接了。。。

成都創(chuàng)新互聯(lián)公司基于成都重慶香港及美國等地區(qū)分布式IDC機房數(shù)據(jù)中心構(gòu)建的電信大帶寬，聯(lián)通大帶寬，移動大帶寬，多線BGP大帶寬租用,是為眾多客戶提供專業(yè)服務(wù)器托管報價，主機托管價格性價比高，為金融證券行業(yè)達州服務(wù)器托管，ai人工智能服務(wù)器托管提供bgp線路100M獨享，G口帶寬及機柜租用的專業(yè)成都idc公司。

在VB中，如何連接MYSQL

樓上講的是VB2005的連接方法，不知道你用的是什么版本的VB,我給你一個VB6.0的連接方法吧

先在本機上安裝最新的ODBC CONNECTER/mysql

無需設(shè)置ODBC,就可以使用.

注意MYSQL的帳戶登錄是根據(jù)主機的,設(shè)置好MYSQL的帳戶后再做測試.

測試代碼:

Dim conn As ADODB.Connection

Dim rs As ADODB.Recordset

Dim fld As ADODB.Field

Dim sql As String

'connect to MySQL server using MySQL ODBC 3.51 Driver

Set conn = New ADODB.Connection

conn.ConnectionString = "DRIVER={MySQL ODBC 3.51 Driver};" _

"SERVER=192.168.0.1;" _

" DATABASE=db_name;" _

"UID=username;PWD=password; OPTION=3"

conn.Open

'create table

conn.Execute "DROP TABLE IF EXISTS my_ado"

conn.Execute "CREATE TABLE my_ado(id int not null primary key, name varchar(20)," _

"txt text, dt date, tm time, ts timestamp)"

'direct insert

conn.Execute "INSERT INTO my_ado(id,name,txt) values(1,100,'venu')"

conn.Execute "INSERT INTO my_ado(id,name,txt) values(2,200,'MySQL')"

conn.Execute "INSERT INTO my_ado(id,name,txt) values(3,300,'Delete')"

Set rs = New ADODB.Recordset

rs.CursorLocation = adUseServer

'fetch the initial table ..

rs.Open "SELECT * FROM my_ado", conn

Debug.Print rs.RecordCount

rs.MoveFirst

Debug.Print String(50, "-") "Initial my_ado Result Set " String(50, "-")

For Each fld In rs.Fields

Debug.Print fld.name,

Next

Debug.Print

Do Until rs.EOF

For Each fld In rs.Fields

Debug.Print fld.value,

Next

rs.MoveNext

Debug.Print

Loop

rs.Close

conn.Close

vb如何連接操作MYSQL數(shù)據(jù)庫啊

用mysql odbc connector，然后建立數(shù)據(jù)源，vb里用SqlDataResouce空控件置dsn連就可以了~

如何在VB中執(zhí)行mysql命令

用如下語句即可

dim con

set con=createobject("ADODB.Connection")

con.open "driver={sql server};Driver={sql server};uid=用戶名;pwd=用戶密碼;database=數(shù)據(jù)庫名稱;server=(local)"

con.execute("你想執(zhí)行的SQL語句")

當(dāng)前名稱：vb怎么執(zhí)行mysql,VB代碼怎么運行
鏈接地址：http://chinadenli.net/article45/dseopei.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供網(wǎng)站設(shè)計、網(wǎng)站營銷、網(wǎng)站建設(shè)、網(wǎng)站設(shè)計公司、網(wǎng)站維護、微信公眾號

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場，如需處理請聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時需注明來源： 創(chuàng)新互聯(lián)