This is a class library written in VB.net to connect to MySql. You can use this class library to directly operate MySql databases.
Before using this class library, you must install
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
There are three classes in this library:
ManipStringForMySQL: This class modifies the SGBD string
MySQL_Requettes: send a request
MySQL_Utils: test SGBD data
The following is an example of using this library to operate MySql.
// Perform DataSet operations
Public Shared Function mydbcdataset (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
'Xxion à 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 mydbcconnexion 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)
Mydbcconnexion. Close ()
Return ds
Catch mydbcexception As OdbcException
'
HttpContext. Current. Response. Write (mydbcexception. ToString)
Catch MyException As Exception
'
HttpContext. Current. Response. Write (MyException. ToString)
End Try
End Function
// Call a function
Dim MonDatasetTemp As DataSet = mysql_requettes.mydbcdataset (
SQL,
Constantes. ODBCBase,
Constantes. ODBCServer,
Constantes. ODBCPwd,
Constantes. ODBCUser,
"MonDataset ")
The class library used by this program can be downloaded at the address below: http://www.codeproject.com/dotnet/MySQLConnexion/MySQLConnexion.zip