您当前位置: 圣才学习网首页 >> IT类 >> MySQL专题

在VB.net中连接MySql

扫码手机阅读
用圣才电子书APP或微信扫一扫,在手机上阅读本文,也可分享给你的朋友。
评论(0
   
来源:网络 作者:未知
 
  这是在VB.net中为连接MySql中编写的一个类库。你可以使用这个类库直接操作MySql数据库。
 
  在使用这个类库之前,你必须安装
 
  ODBC MYSQL 3.51
 
  Driver ODBC.NET
 
  在这个库中有三个类:
 
  ManipStringForMySQL: 此类修改SGBD的字符串
 
  MySQL_Requettes: 发送请求
 
  MySQL_Utils : SGBD数据进行测试
 
  下面是使用此类库操作MySql的一个例子
 
  //DataSet进行操作
 
  Public Shared Function MyODBCDatasetByVal 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 & "OPTION3"
 
  Dim MyODBCConnexion As New OdbcConnectionMyConString
 
  Try
 
  Dim ds As New DataSet()
 
  Dim cmd As OdbcDataAdapter New
 
  OdbcDataAdapterReqSQL MyConString
 
  Dim MyCommand As New OdbcCommand()
 
  Dim MyDataReader As OdbcDataReader
 
  cmd.Fillds NomDataSet
 
  MyODBCConnexion.Close()
 
  Return ds
 
  Catch MyOdbcException As OdbcException
 
  '
 
  HttpContext.Current.Response.WriteMyOdbcException.ToString
 
  Catch MyException As Exception
 
  '
 
  HttpContext.Current.Response.WriteMyException.ToString
 
  End Try
 
  End Function
 
  //对函数的调用
 
  Dim MonDatasetTemp As DataSet MySQL_Requettes.MyODBCDataset
 
  SQL
 
  constantes.ODBCBase
 
  constantes.ODBCServer
 
  constantes.ODBCPwd
 
  constantes.ODBCUser
 
  "MonDataset"
 

小编工资已与此挂钩!一一分钱!求打赏↓ ↓ ↓

如果你喜欢本文章,请赐赏:

已赐赏的人
最新评论(共0条)评论一句