在VB.net 中连接MySql的类库

在VB.net 中连接MySql的类库,第1张

概述这是在VB.net中为连接MySql中编写的一个类库。你可以使用这个类库直接 *** 作MySql数据库。 在使用这个类库之前,你必须安装 在这个库中有三个类: ManipStringForMySQL: 此类修改SGBD的字符串 MySQL_Requettes: 发送请求 MySQL_Utils : 对SGBD数据进行测试 下面是使用此类库 *** 作MySql的一个例子 //对DataSet进行 *** 作   Pub 这是在VB.net中为连接MysqL中编写的一个类库。你可以使用这个类库直接 *** 作MysqL数据库。

在使用这个类库之前,你必须安装

在这个库中有三个类:

ManipStringForMysqL: 此类修改SGBD的字符串

MysqL_Requettes: 发送请求

MysqL_Utils : 对SGBD数据进行测试

下面是使用此类库 *** 作MysqL的一个例子

//对DataSet进行 *** 作

  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

//对函数的调用

Dim MonDatasetTemp As DataSet = MysqL_Requettes.MyODBcdataset( sql,constantes.ODBCBase,constantes.ODBCServer,constantes.ODBCPwd,constantes.ODBCUser,"MonDataset") 总结

以上是内存溢出为你收集整理的在VB.net 中连接MySql的类库全部内容,希望文章能够帮你解决在VB.net 中连接MySql的类库所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错,欢迎将内存溢出网站推荐给程序员好友。

欢迎分享,转载请注明来源:内存溢出

原文地址: http://www.outofmemory.cn/langs/1289242.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2022-06-09
下一篇 2022-06-09

发表评论

登录后才能评论

评论列表(0条)

保存