专栏首页VB小源码vb.net 连接MYSQL数据库,需要MySql.Data.dll连接控件!

vb.net 连接MYSQL数据库,需要MySql.Data.dll连接控件!

vb.net 连接MYSQL数据库,需要MySql.Data.dll连接控件!


Imports MySql.Data.MySqlClient

Imports System.Data.SqlClient

Public Class cls_MySql

'-------------------------------------------------------------------------------------------------------------------------------------------

'数据库连接字符串

Private 服务器 = "127.0.0.1"

Private 用户名 = "test"

Private 密码 = "test"

Private 数据库 = "test"

'-------------------------------------------------------------------------------------------------------------------------------------------

Public cnStr As String = "server=" & 服务器 & ";Uid=" & 用户名 & ";Pwd=" & 密码 & ";database=" & 数据库 & ";"

Public cn As New MySqlConnection(cnStr)

'-------------------------------------------------------------------------------------------------------------------------------------------

' 执行查询

Public Function 数据库查询(ByVal 执行语句 As String, ByVal 执行语句类型 As CommandType) As DataTable

Dim 适配器 As New MySqlDataAdapter(执行语句, cn)

Dim 数据表 As New DataSet

Try

适配器.Fill(数据表)

Return 数据表.Tables(0)

Catch ex As Exception

Return Nothing

Finally

cn.Close()

End Try

End Function

'-------------------------------------------------------------------------------------------------------------------------------------------

' 执行增删改

Public Function 数据库增删改(ByVal 执行语句 As String, ByVal 执行语句类型 As CommandType) As Integer

Dim 执行命令 As MySqlCommand = New MySqlCommand(执行语句, cn)

Try

cn.Open()

Return 执行命令.ExecuteNonQuery()

Catch ex As Exception

Return 0

Finally

cn.Close()

End Try

End Function

End Class

本文分享自微信公众号 - VB小源码(vb_xym),作者:巴西_prince

原文出处及转载信息见文内详细说明,如有侵权,请联系 yunjia_community@tencent.com 删除。

原始发表时间:2018-09-11

本文参与腾讯云自媒体分享计划,欢迎正在阅读的你也加入,一起分享。

我来说两句

0 条评论
登录 后参与评论

相关文章

  • vb.net 获取CPU序列号

    巴西_prince
  • VB.NET 仿spy++拖拽图标获取窗体句柄

    巴西_prince
  • VB.NET 纯代码生成code39条形码

    ode39是条形码的一种,也被称为3 of 9 code、USD-3或者LOGMARS,由于编制简单、能够对任意长度的数据进行编码、支持设备广泛等特性而被广泛采...

    巴西_prince
  • .NET中的密钥加密

    本教程将演示如何通过System.Security.Cryptography在.NET Framework 1.1中实现对称加密/密钥加密。

    MelodyS
  • 类模块——举例

    前面使用Open 进行的文件操作,使用起来不是很方便,但是FileSystemObject里的TextStream使用起来就比较方便了,知道了类之后,就可以使用...

    xyj
  • VBA实战技巧06: 复制文本到剪贴板

    注意,上述代码运行前需要添加对“Microsoft Forms 2.0 Object Library”库的引用,方法是在VBE中单击菜单“工具——引用”,在“引...

    fanjy
  • VB6.0用GDI+保存图像为BMP\JPG\PNG\GIF格式终结版。

    鉴于之前在http://blog.csdn.net/laviewpbt/article/details/756547发布的代码很匆忙,也存在不少错误,现发布比较...

    用户1138785
  • SqlServer 获取数据库全部字段

    用户2657851
  • MD5的介绍,算法和C、VB、Delphi实现

    http://download.winzheng.com/infoView/Article_861.htm

    阿敏总司令
  • VB.NET 纯代码生成code39条形码

    ode39是条形码的一种,也被称为3 of 9 code、USD-3或者LOGMARS,由于编制简单、能够对任意长度的数据进行编码、支持设备广泛等特性而被广泛采...

    巴西_prince

扫码关注云+社区

领取腾讯云代金券