包含vb.net连接mysql的词条

怎么在VB.net中为连接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 】

相关问答

Q1: 求一个vb.net链接mysql数据库的增删改查程序，求速度。。。

首先你本地要安装MySQL Connector Net

工程引用mysql.data

连接数据库：

     Imports MySql.Data

    Imports MySql.Data.MySqlClient

 ‘连接字符串dbServerName 是ip,下面vb.net连接mysql的英文应该懂得吧。

dim sA as string

sA = "server=" Me.dbServerName "; port=3306; database=" Me.dbDataBaseName _

                      "; user id=" Me.dbUserName "; password=" Me.dbPassWord "; "

dim mvardbConnectionMysql As MySqlConnection

              With mvardbConnectionMysql

                     .ConnectionString = sA

                  .Open()

              End With

4. 读取数据

dim xx As MySqlDataReader

Dim oC As MySqlCommand = New MySqlCommand(sSql, Me.mvardbConnectionMysql)

 oC.CommandType = CommandType.Text

xx= oC.ExecuteReader()

if xx.HasRows

do while xx.read()   ’一次读取一行

 msgbox xx.item(2)   '取出当前行的第三个字段的值显示。

loop

end if

5. 写入数据

      Dim oT As MySqlTransaction = Me.mvardbConnectionMysql.BeginTransaction()

      Try

          Dim oC As MySqlCommand

   '下面的commandtext是执行的更新语句vb.net连接mysql，例如Insert into 语句。

          oC = New MySqlCommand(CommandText, Me.mvardbConnectionMysql, oT)

          oC.CommandType = CommandType.Text

          oC.ExecuteNonQuery()

          oT.Commit()

          oC = Nothing

          oT = Nothing

      Catch oe As Exception

          oT.Rollback()

      End Try

Q2: vb.net远程连接mysql数据库的问题

Dim ADOrs AS RecordsetADOrs.Open "select * from {你的表名} where name='"+text1+"'" '把textbox1作为检索的对象即用来输入查找的条件 if NOT ADOrs.EOF then '开始查找(用了取么操作没有找到到指针即找到了记录)那么执行下面的语句 ADOrs("name")=trim(text1) '把字段name显示给textbox1 ADOrs("year")=trim(text2） '把字段year显示给textbox2 else msgbox "数据库没有检索到你要搜索的记录！"，vbokonly,"提示" end if ADOrs.close '最后记得把刚才打开的记录集给关闭掉或则会给数据库添加负荷的。

Q3: 我想把VB.NET连接MYSQL数据库，代码怎么写啊？

和SQL数据库差不多的，下面是我用vb6.0连接本地mysql数据库的连接字符串

"driver={MySQL ODBC 3.51 Driver};server=127.0.0.1;database=mysql;uid=root;pwd=sasa"

关于vb.net连接mysql和的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站。