通过对VB.NET的学习,大家可能会对这款功能强大的编程语言有些爱不释手。尤其是在数据库的操作上,体现了简便灵活的特性。下面我们就来看看有关VB.NET操作MySql数据库的一些应用技巧。#t#
创新互联公司是创新、创意、研发型一体的综合型网站建设公司,自成立以来公司不断探索创新,始终坚持为客户提供满意周到的服务,在本地打下了良好的口碑,在过去的十年时间我们累计服务了上千家以及全国政企客户,如铜雕雕塑等企业单位,完善的项目管理流程,严格把控项目进度与质量监控加上过硬的技术实力获得客户的一致赞誉。
这是在VB.NET中为连接MySql中编写的一个类库。你可以使用这个类库直接操作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数据库的一个例子
对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数据库实现程序用到的类库可在如下地址下载:http://www.codeproject.com/dotnet/MySQLConnexion/MySQLConnexion.zip
网站名称:VB.NET操作MySql数据库代码范例解读
文章路径:http://www.36103.cn/qtweb/news37/38137.html
网站建设、网络推广公司-创新互联,是专注品牌与效果的网站制作,网络营销seo公司;服务项目有等
声明:本网站发布的内容(图片、视频和文字)以用户投稿、用户转载内容为主,如果涉及侵权请尽快告知,我们将会在第一时间删除。文章观点不代表本网站立场,如需处理请联系客服。电话:028-86922220;邮箱:631063699@qq.com。内容未经允许不得转载,或转载时需注明来源: 创新互联