在vb連接mysql資料庫查詢

『壹』 vb.net遠程連接mysql資料庫的問題

Dim ADOrs AS RecordsetADOrs.Open "select * from {你的抄表名} where name='"+text1+"'" '把textbox1作為檢索的對象即用來輸入查找的條件 if NOT ADOrs.EOF then '開始查找(用了取么操作沒有找到到指針即找到了記錄)那麼執行下面的語句 ADOrs("name")=trim(text1) '把欄位name顯示給textbox1 ADOrs("year")=trim(text2） '把欄位year顯示給textbox2 else msgbox "資料庫沒有檢索到你要搜索的記錄！"，vbokonly,"提示" end if ADOrs.close '最後記得把剛才打開的記錄集給關閉掉或則會給資料庫添加負荷的。

『貳』 如何用VB連接遠程的mysql資料庫

Dim cn As New ADODB.Connection '創建鏈接對象
Dim rs As New ADODB.Recordset '創建指針集
Private Sub Form_Load()
cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Users\lbj\Desktop\test.mdb" '連接字元串
End SubPrivate Sub Form_Unload(Cancel As Integer)
cn.Close '關閉資料庫對象
End SubPrivate Sub Text1_Change()
c = "select year from info where name='" & Text1.Text & "'" '查詢語句
rs.Open c, cn, 3, 3 '查詢
Text2.Text = rs.Fields(0) '賦值過去
rs.Close '關閉對象
End Sub
實時查詢 只有輸入到相應的名字才會顯示年齡

『叄』 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資料庫的管理器

『肆』 如何使用VB2010連接網路mysql資料庫

必須安裝MYSQL的驅動才行，不管是VB還是c++都需要這個驅動。代碼如下： Public Function exemysql(ByVal sql As String) As ADODB.Recordset sql = Trim$(sql) Set conn = New ADODB.Connection Set rs = New ADODB.Recordset conn.Open "Driver=MySQL ODBC 3.51 Driver;" & _ "Server=伺服器地址;" & _ "Port=3306;" & _ "Database=資料庫名;" & _ "Uid=用戶名;" & _ "Pwd=密碼" conn.DefaultDatabase = "資料庫名" conn.CursorLocation = adUseClient Set rs.ActiveConnection = conn rs.LockType = adLockBatchOptimistic rs.CursorType = adOpenKeyset rs.Open sql Set exesql = rs Set rs = Nothing Set conn = Nothing End Function

『伍』 在VB中，如何連接MYSQL

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

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

無需設置ODBC,就可以使用.

注意MYSQL的帳戶登錄是根據主機的,設置好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資料庫 報錯 未發現數據源名稱且未指定默認驅動程序 求解～～感謝！！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上的中小型網站中。

『柒』 求一個vb.net鏈接mysql資料庫的增刪改查程序，求速度。。。

1. 首先你本地要安裝MySQL Connector Net

2. 工程引用mysql.data

3. 連接資料庫：

   
   

Imports MySql.Data

Imports MySql.Data.MySqlClient

『連接字元串dbServerName 是ip,下面的英文應該懂得吧。

dim sA as string

sA = "server=" & Me.dbServerName & "; port=3306; database=" & Me.dbDataBaseName & _

"; user id=" & Me.dbUserName & "; password=" & Me.dbPassWord & "; "

dim mvardbConnectionMysql As MySqlConnection

With mvardbConnectionMysql

.ConnectionString = sA

.Open()

End With

4. 讀取數據

dim xx As MySqlDataReader

Dim oC As MySqlCommand = New MySqlCommand(sSql, Me.mvardbConnectionMysql)

oC.CommandType = CommandType.Text

xx= oC.ExecuteReader()

if xx.HasRows

do while xx.read() 』一次讀取一行

msgbox xx.item(2) '取出當前行的第三個欄位的值顯示。

loop

end if

5. 寫入數據

Dim oT As MySqlTransaction = Me.mvardbConnectionMysql.BeginTransaction()

Try

Dim oC As MySqlCommand

'下面的commandtext是執行的更新語句，例如Insert into 語句。

oC = New MySqlCommand(CommandText, Me.mvardbConnectionMysql, oT)

oC.CommandType = CommandType.Text

oC.ExecuteNonQuery()

oT.Commit()

oC = Nothing

oT = Nothing

Catch oe As Exception

oT.Rollback()

End Try

『捌』 vb的ADO控制項如何連接操作MYSQL資料庫啊

由於ADO對象不直接支持MySQL,所以必須先安裝MyODBC, 後者也是一個免費產品，在 www.mysql.org上有下載，安裝好了, 就可以在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

『玖』 如何用VB連接MySQL資料庫求解答

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

『拾』 VB6.0使用什麼方法連接mysql資料庫比較好且不需要再每台客戶端機器上安裝程序

在VB中可以使用ADO數據控制項實現對MySQL資料庫的訪問，但ADO控制項不能直接訪問MySQL，需要安裝MyODBC(可以在網上下載)並在ODBC中注冊一個用戶DSN(控制面板/管理工具/數據源)，這樣就能使VB順利連接到MySQL資料庫了。
連接上了還需要執行SQL查詢操作並能取得查詢結果，可以使用ADODB的Command對象和RecordSet對像。