vb mysql_VB连接MYSQL实例

VB连接MYSQL实例

电脑需安装数据库'mysql server'和'mysql connector net'相关版本软件。

在工程的‘项目’-‘添加引用’中添加引用‘mysql.data’

实现代码如下:

Imports System.IO

Imports System

Imports System.Data

Imports System.Windows.Forms

Imports MySql.Data.MySqlClient

Public Class Form1

Dim conn As MySqlConnection

Dim data As DataTable

Dim da As MySqlDataAdapter

Dim cb As MySqlCommandBuilder

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

If Not conn Is Nothing Then conn.Close()

Dim connStr As String

Dim reader As MySqlDataReader

connStr = String.Format("server={0};user id={1}; password={2}; database=mysql; pooling=false", "localhost", "root", "root")  '登录mysql数据库 为本机,用户名:root 密码:root

Try

conn = New MySqlConnection(connStr)

conn.Open()

reader = Nothing

Dim cmd As New MySqlCommand("use db", conn)      '进入存储数据所用的数据库

reader = cmd.ExecuteReader()

While (reader.Read())

End While

If Not reader Is Nothing Then reader.Close()

Catch ex As MySqlException

'MessageBox.Show(ex.ToString)

MessageBox.Show("程序出现错误!请重启,或联系维护人员。", "抱歉")

Finally

If Not reader Is Nothing Then reader.Close()

End Try

End Sub

Private Sub btnconn_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnconn.Click

Dim temp_int, int_lrow, int_rrow As Integer

data = New DataTable

Try

da = New MySqlDataAdapter("select * from db_table where name='lady_gaga'", conn)            '在相关表中查找数据 db_table 为表名,name 为列名

cb = New MySqlCommandBuilder(da)

da.Fill(data)

int_rrow = data.Rows.Count              '返回查找后的数据行数,返回0行则表示没有找到记录,返回大于0行,则表示找到了相关记录

If int_rrow = 0 Then

MessageBox.Show("无记录")

Else

MessageBox.Show("data.Rows.Item(0).Item(3).ToString")   'Item(0).Item(3) 表示返回的第1条记录(第一条的下标为0)中的第4列值

End If

Catch ex As Exception

MessageBox.Show(ex.ToString)

End Try

End Sub

End Class

本文来自互联网用户投稿,该文观点仅代表作者本人,不代表本站立场。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如若转载,请注明出处:http://www.mzph.cn/news/526483.shtml

如若内容造成侵权/违法违规/事实不符,请联系多彩编程网进行投诉反馈email:809451989@qq.com,一经查实,立即删除!

相关文章

c web mysql数据库_C连接Mysql数据库代码

//vc工具中添加E:\WAMP\BIN\MYSQL\MYSQL5.5.8\LIB 路径//在工程设置-》链接》库模块中添加 libmysql.lib#include #include #include #include #include "E:\wamp\bin\mysql\mysql5.5.8\include\mysql.h"void main(){MYSQL *conn;MYSQL_RES *res;MYSQL_ROW row;char …

ext 如何判断是否是整数_Excel表格技巧—如何用ISNUMBER判断是否是数值

在EXCEL的单元格中,有些单元格为填写的不是数值,在某些情况下,会影响计算结果,例如,以下的表格中,红框内的单元格一个是输入了一个空格,另一个“—”符号,后面平均值的计算未将该单元…

ensp安装对电脑配置要求高吗_直线导轨有哪些安装方法?为什么直线导轨安装精度要求高?...

要点:1、为什么直线导轨安装精度要求高;2、直线导轨的安装流程;3、直线导轨不同安装方法介绍。点击链接加入群聊【solidworks机械设计学习】:正在跳转​jq.qq.comhttps://www.zhihu.com/video/1197242052088516608

mysql查看版本号_十分钟了解MySQL事务机制

读书百遍其义自现。MySQL数据库在我们平时工作学习中的使用频率是相当之高,彻底掌握MySQL的事务机制对我们平时工作会有非常大的帮助,仔细回忆一下,你是否对MySQL事务相关的知识是否完全掌握?是否感觉有的地方有些模糊&#xff1f…

mysql 字符串类型 分区_MySQL分区类型

博文大纲:1、RANGE分区2、LIST分区3、HASH分区4、key分区5、MySQL分表和分区的区别6、附加:如何实现将分区放在不同的目录下进行存储MySQL分区类型如下:RANFGE分区LIST分区HASH分区key分区上面的四种分区的条件必须是整形,如果不是…

h5获取http请求头_nodejs 中http请求头,响应头

-------------------- 1.request常见的属性 -----------------------var httprequire("http");var serverhttp.createServer(); //创建服务器server.on("request",function(req,res){// request.headers 打印全部请求头信息--对象形式// request.rawHeader…

mysql邮箱认证_邮件服务系列postfix+sasl+mysql实现用户认证功能

1、卸载bind[rootmail ~]# rpm -e bind-utils2、安装bind97-utils bind97-libs bind97[rootmail ~]# yum install bind97 bind97-utils #bind97-libs依赖于utils3、启动dns服务[rootmail ~]# service named start4、编写配置文件和区域数据文件[rootmail ~]# vim /etc/named.…

python多进程队列中的队列_python 多进程队列数据处理详解

我就废话不多说了,直接上代码吧!# -*- coding:utf8 -*-import paho.mqtt.client as mqttfrom multiprocessing import Process, Queueimport time, random, osimport camera_person_numMQTTHOST "172.19.4.4"MQTTPORT 1883mqttClient mqtt.…

UOS nginx

 安装 nginx 软件包;  配置文件名为 ispweb.conf,放置在/etc/nginx/conf.d/目录下;  网站根目录为/mut/crypt(目录不存在需创建);  启用 FastCGI 功能,让 nginx 能够解析 php 请求&a…

mysql数据库重做日志文件_mysql数据库重做日志

{"moduleinfo":{"card_count":[{"count_phone":1,"count":1}],"search_count":[{"count_phone":4,"count":4}]},"card":[{"des":"阿里云数据库专家保驾护航,为用户…

mysql免安装如何改密码_mysql免安装版配置与修改密码的教程

第一步:配置环境变量(我的解压路径:G:\mysql\mysql-5.7.21-winx64 )MYSQL_HOME你解压的路径PATH ;%MYSQL_HOME %\bin;PATH变量是在原来的基础上多添加的,不要把其它的设置给删掉了第二步在解压的目录下添加my.ini 文件(如果已经有了这个文件&#xff0c…

unix 登录mysql_实例分析mysql用户登录。

今天,在学习mysql授权认证时,遇到了一个问题,看下,我是如何分析的:我在数据库内添加了一个帐号:create databases firstdb;grant all on firstdb.* to ‘firstdb’’’ identified by ‘xxxxx’;flush priv…

拉普拉斯时域卷积定理_如何证明频域卷积定理

展开全部设抄IF表示傅立叶逆变换,则因此有袭故频域卷积定2113理5261得证。4102扩展资料频域卷积定理频域卷积定理表明两信号1653在时域的乘积对应于这两个信号傅立叶变换的卷积除以2π。卷积定理揭示了时间域与频率域的对应关系。这一定理对Laplace变换、Z变换、Mel…

suse查看mysql内存使用情况_MySQL 慢查询日志(Slow Query Log)

4、格式化慢查询日志结构化慢查询日志就是把慢查询日志中的重要信息按照便于阅读以及按照特定的排序方式来提取SQL。这种方式有点类似于Oracle中有个tkprof来格式化oracle的trace文件。对于前面的慢查询日志我们使用MySQLdumpslow来提取如下:SUSE11b:~ # mysqldumps…

mysql按照学生分组查询_将student表按照gender字段值进行分组查询,并计算每个分组中有多少名学生_学小易找答案...

【简答题】查询student表中一共有多少条记录【简答题】在department表和employee表之间分别使用where查询、自连接查询【简答题】使用DESC查看学生表和班级表【简答题】在表student和表grade中添加外键约束,建立两个表的关联关系【简答题】在department表和employee表之间使用右…

python 解方程 sympy_用Python和Sympy求解方程并得到数值答案

我正试图用sympy来解决方程,但我想得到一个直接的数字答案 . 我的脚本是这样的:from sympy import *A,B,Vsymbols(A,B,V)eq1Eq(630.26*(V-39.0)*V*(V39)-AB,0)eq2Eq(B,1.36*10**8*(V-39))eq3Eq(A,5.75*10**5*V*(V39.0))solve([eq1,eq2,eq3], [A,B,V], di…

mysql 分析服务_MySQL分析服务器状态_MySQL

概述文章简单介绍了通过一些查询命令分析当前服务器的状态。目录概述获取服务器整体的性能状态SQL操作计数总结步骤获取服务器整体的性能状态首先对一个数据库服务器进行性能优化需要先知道服务器当前主要的性能问题出现在哪里,在这点sql server也是类似&#xff0c…

apache启服务命令_Linux系统重启apache服务命令详解

Linux系统中apache是重要的一个服务,掌握基本操作尤其重要。下面由学习啦小编为大家整理了Linux系统重启apache服务命令详解,希望对大家有帮助!Linux系统重启apache服务命令详解基本的操作方法:本文假设你的apahce安装目录为/usr/local/apach…

python 接口测试 如何写配置文件_python接口自动化测试 - configparser配置文件解析器详细使用...

configparser简介ConfigParser模块已在Python 3中重命名为configparser该模块定义了ConfigParser类。 ConfigParser类实现一种基本的配置文件解析器语言,该语言提供的结构类似于 .ini 文件中的结构ini文件相关知识键值对可用 或者 : 进行分隔section 的名字是区分大…

case是java关键字吗_Java关键字

3. 程序控制语句1) break 跳出,中断break 关键字用于提前退出 for、while 或 do 循环,或者在 switch 语句中用来结束 case 块。break 总是退出最深层的 while、for、do 或 switch 语句。2) continue 继续continue 关键字用来跳转到 for、while 或 do 循环…