日本综合一区二区|亚洲中文天堂综合|日韩欧美自拍一区|男女精品天堂一区|欧美自拍第6页亚洲成人精品一区|亚洲黄色天堂一区二区成人|超碰91偷拍第一页|日韩av夜夜嗨中文字幕|久久蜜综合视频官网|精美人妻一区二区三区

VB.NET經(jīng)過長時(shí)間的發(fā)展，很多用戶都很了解VB.NET操作MySql數(shù)據(jù)庫了，這里我發(fā)表一下個(gè)人理解，和大家討論討論。這是在VB.NET中為連接MySql中編寫的一個(gè)類庫。你可以使用這個(gè)類庫直接VB.NET操作MySql數(shù)據(jù)庫。

成都創(chuàng)新互聯(lián)公司是專業(yè)的廈門網(wǎng)站建設(shè)公司，廈門接單;提供網(wǎng)站設(shè)計(jì)制作、網(wǎng)站制作,網(wǎng)頁設(shè)計(jì),網(wǎng)站設(shè)計(jì),建網(wǎng)站,PHP網(wǎng)站建設(shè)等專業(yè)做網(wǎng)站服務(wù);采用PHP框架,可快速的進(jìn)行廈門網(wǎng)站開發(fā)網(wǎng)頁制作和功能擴(kuò)展;專業(yè)做搜索引擎喜愛的網(wǎng)站,專業(yè)的做網(wǎng)站團(tuán)隊(duì),希望更多企業(yè)前來合作!

在使用這個(gè)類庫之前，你必須安裝
ODBC MYSQL 3.51下載地址：http://www.mysql.com/downloads/api-myodbc-3.51.html
Driver ODBC.NET下載地址：http://www.microsoft.com/downloads/details.aspx?FamilyId=6CCD8427-1017-4F33-A062-D165078E32B1&displaylang=en

在這個(gè)庫中有三個(gè)類：
◆ManipStringForMySQL: 此類修改SGBD的字符串
◆MySQL_Requettes: 發(fā)送請(qǐng)求
◆MySQL_Utils : 對(duì)SGBD數(shù)據(jù)進(jìn)行測(cè)試

下面是使用VB.NET操作MySql的一個(gè)例子

 
 
 

  
  
  
Public Shared Function MyODBCDataset(ByVal ReqSQL As String, _ByVal LaBase As String, 
ByVal Server As String, _ByVal Password As String, 
ByVal User As String, _ByVal NomDataSet As String) As DataSet  
  
  
  
'Connexion à un server MySQL  
  
  
  
'avec le Driver ODBC 3.51 avec requette qui renvoie un dataset  
  
  
  
Dim MyConString As String = _ 
  
  
  
"DRIVER={MySQL ODBC 3.51 Driver};SERVER=" & Server _& ";DATABASE=" & LaBase & ";
  
  
  
UID=" & User _& ";PASSWORD=" & Password & ";OPTION=3;"  
  
  
  
 
  
  
  
Dim MyODBCConnexion As New OdbcConnection(MyConString)  
  
  
  
Try  
  
  
  
Dim ds As New DataSet()  
  
  
  
Dim cmd As OdbcDataAdapter = New 
  
  
  
OdbcDataAdapter(ReqSQL, MyConString)  
  
  
  
Dim MyCommand As New OdbcCommand()  
  
  
  
Dim MyDataReader As OdbcDataReader  
  
  
  
cmd.Fill(ds, NomDataSet)  
  
  
  
MyODBCConnexion.Close()  
  
  
  
Return ds  
  
  
  
Catch MyOdbcException As OdbcException  
  
  
  
'  
  
  
  
HttpContext.Current.Response.Write(MyOdbcException.ToString)  
  
  
  
Catch MyException As Exception  
  
  
  
'  
  
  
  
HttpContext.Current.Response.Write(MyException.ToString)  
  
  
  
End Try  
  
  
  
End Function 
 
 
 

分享文章：三分鐘掌握VB.NET操作MySql數(shù)據(jù)庫
當(dāng)前URL：http://www.dlmjj.cn/article/copsgjh.html