三分钟掌握VB.NET操作MySql数据库-mysql数据库操作

VB.NET经过长时间的发展，很多用户都很了解VB.NET操作MySql数据库了，这里我发表一下个人理解，和大家讨论讨论。这是在VB.NET中为连接MySql中编写的一个类库。你可以使用这个类库直接VB.NET操作MySql数据库。

在使用这个类库之前，你必须安装
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

在这个库中有三个类：
◆ManipStringForMySQL: 此类修改SGBD的字符串
◆MySQL_Requettes: 发送请求
◆MySQL_Utils : 对SGBD数据进行测试

下面是使用VB.NET操作MySql的一个例子

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 
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.

【编辑推荐】