DOTNET零碎总结---VB.NET修改数据存在多个txtbox时,SQL语句的操作

2.DOTNET零碎总结---VB.NET修改数据存在多个txtbox时,SQL语句的操作
1. 一个Button1的text为查询和一个DataGridView1,点击查询按钮的代码
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim strConn = "Data Source=192.168.1.110/orcl;User ID=test;Password=orcl"
Dim dbcmd As OracleCommand
Dim dt = New DataTable("ds")
Dim dbConnection As OracleConnection
Try
dbConnection = New OracleConnection(strConn)
dbConnection.Open()
dbcmd = dbConnection.CreateCommand
dbcmd.CommandText = "select * from student"
Dim da As OracleDataAdapter = New OracleDataAdapter(dbcmd)
da.Fill(dt)
DataGridView1.DataSource = dt '这时候可以把dt的值直接赋值给DataGridview1控件
Catch ex As Exception
MsgBox("查询数据库出错")
End Try
End Sub

2.存在两个TextBox1.TextBox2,文本框和一个按钮, Button2,按钮text为修改,点击后的代码
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim username, password As String
Dim temp, temp3 As String
If Len(TextBox1.Text.Trim) <> 0 Then
username = "sname=" + "'" + TextBox1.Text.Trim + "'" + " , "
Else
username = ""
End If
If Len(TextBox2.Text.Trim) <> 0 Then
password = "spwd=" + "'" + TextBox2.Text.Trim + "'" + " , "
Else
password = ""
End If
If Len(username) <> 0 And Len(password) <> 0 Then
temp = username + password
MsgBox(temp.Length)
temp = Mid(temp, 1, temp.Length - 3)
MsgBox("temp" + temp)
MsgBox("current" + DataGridView1.CurrentRow.Cells(1).Value)
Else

temp = ""
End If

Dim strConn = "Data Source=192.168.1.110/orcl;User ID=test;Password=orcl"
Dim dbcmd As OracleCommand
Dim dbConnection As OracleConnection
'If username.Length = 0 And password = 0 Then
Try
dbConnection = New OracleConnection(strConn)
dbConnection.Open()
dbcmd = dbConnection.CreateCommand
Dim temp2 As String
temp2 = "update student set " + temp + " where sname=" + "'" + DataGridView1.CurrentRow.Cells(1).Value + "'"
dbcmd.CommandText = temp2
MsgBox(temp2)
'dbConnection.BeginTransaction()
dbcmd.ExecuteNonQuery() '返回改动的row行数
Catch ex As Exception
MsgBox("修改失败")
Exit Sub
End Try
' Else
' MsgBox("请填入要修改的参数")
'End If
End Sub

DOTNET零碎总结---VB.NET修改数据存在多个txtbox时,SQL语句的操作相关推荐

thinkphp5基本的一些操作/API友好/获取请求信息（Request）/判断请求类型（GET...）/验证参数数据（Validate）/连接数据库/原生sql语句查询
文章目录一.API友好 1.举两个thinkphp5关于API友好的例子 (1)数据输出 (2)错误调试Trace 二.获取请求信息(Request) 1.获取URL信息 2.获取模块/控制器/操 ...
苹果cms数据.php,苹果cms数据库常用sql语句对照及使用方法
这篇文章主要为大家详细介绍了苹果cms数据库常用sql语句对照及使用方法,具有一定的参考价值,感兴趣的小伙伴们可以参考一下,有需要的朋友可以收藏方便以后借鉴. 苹果cms v10常用sql语句使用方 ...
mysql查询某一时间段之后数据的sql_mysql进阶(十九)SQL语句如何精准查找某一时间段的数据...
SQL语句如何精准查找某一时间段的数据在项目开发过程中,自己需要查询出一定时间段内的交易.故需要在sql查询语句中加入日期时间要素,sql语句如何实现? SELECT * FROM lmapp.lm ...
MySQL中修改表结构的关键字_下列SQL语句中,修改表结构的关键字是
[单选题]对<将进酒>全诗分析不正确的是 [单选题]下列划线词语的解释有误的一项是 [多选题]下列食品属于不完全蛋白质的是 ( ) . [单选题]下列聚合函数中属性列必须是数值型的是 [单 ...
sql 两表数据合并_多表查询SQL语句
本篇文章中主要讲述以下内容: 一.表的加法合并两张表的过程: 然后运用sql语句: select 课程号,课程名称 from course union select 课程号,课程名称 from co ...
SQL查询重复数据，只显示一条sql语句
2种方法, 1.在select后面加 distinct 可以过滤重复的数据, 点评:在海量数据下效率低 2.利用group by ,把查询到的字段都放在group by后面,点评:效率比distinc ...
数据库面试题：常见面试SQL语句
常见面试SQL语句 1. 创建一个表: 创建语法为 CREATE TABLE table_name (column_name column_type); 实例如下: create TABLE stud ...
mysql 删除表数据但不删除表结构SQL语句
当一份数据乱糟糟的时候,想把数据删除掉,重新来过,但是又觉得太懒,不想重新定义一些表字段什么的,索性就把数据库内容给全部删掉,重新导入一遍数据. 我是在mysql客户端,使用SQL语句进行删除的. 下 ...
DOTNET零碎要点---vb.net获取combox的选中值,删除Datagridview,选中值,处理提示框...
1.ComboBox.SelectedValue属性值转化到相应的类型就行注意ComboBox.SelectedValue==null时的空指针异常 3.str = ComboBox1.Select ...

DOTNET零碎总结---VB.NET修改数据存在多个txtbox时,SQL语句的操作

DOTNET零碎总结---VB.NET修改数据存在多个txtbox时,SQL语句的操作相关推荐

最新文章

热门文章