锐客网

  1. 首页 > 睿知 > it技术 > >

vb.net删除页面 vb删除命令

IT技术删除

VB.net求一个简单的增删改页面 。VS+access数据库的 ， MSSQL数据库的话你改下 ， 反正就2种链接方式，书上都有 。
下面是代码和解释，另外我会把文件发到你邮箱里的，你把文件复制到自己的站点文件夹里面运行就可以看到效果了 。
Imports System.Data.OleDb
Imports System.Data
Partial Class baidu
Inherits System.Web.UI.Page
'下面是添加记录
Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
'定义“连接数据库”和“执行SQL”变量
Dim myConnection As OleDbConnection
Dim myCommand As OleDbCommand
Dim dbname As String
dbname = Server.MapPath("baidu.mdb")
myConnection = New OleDbConnection("PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA Source="dbname)
myConnection.Open()
'INSERT INTO "表格名" ("栏位1", "栏位2", ...) VALUES ("值1", "值2", ...)
'这里可以加上 昵称 是否已经存在的判断语句，就是SELECT "栏位名" FROM "表格名" WHERE "条件"
myCommand = New OleDbCommand("Insert INTO a1(昵称) Values('"TextBox1.Text"')", myConnection)
myCommand.ExecuteNonQuery()
Response.AddHeader("Refresh", "0")
'关闭连接()
myConnection.Close()
'释放资源
myCommand.Dispose()
End Sub
'下面是删除记录
Protected Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.Click
'定义“连接数据库”和“执行SQL”变量
Dim myConnection As OleDbConnection
Dim myCommand As OleDbCommand
Dim dbname As String
dbname = Server.MapPath("baidu.mdb")
myConnection = New OleDbConnection("PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA Source="dbname)
myConnection.Open()
'DELETE FROM "表格名" WHERE {条件}
myCommand = New OleDbCommand("DELETE FROM a1 WHERE 昵称 = '"TextBox1.Text"'", myConnection)
myCommand.ExecuteNonQuery()
Response.AddHeader("Refresh", "0")
'关闭连接()
myConnection.Close()
'释放资源
myCommand.Dispose()
End Sub
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
'定义“连接数据库”和“执行SQL”变量
Dim myConnection As OleDbConnection
Dim myCommand As OleDbCommand
Dim dbname As String
dbname = Server.MapPath("baidu.mdb")
myConnection = New OleDbConnection("PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA Source="dbname)
myConnection.Open()
myCommand = New OleDbCommand("select * FROM a1", myConnection)
GridView1.DataSource = myCommand.ExecuteReader()
GridView1.DataBind()
'关闭连接()
myConnection.Close()
'释放资源
myCommand.Dispose()
End Sub
End Class
邮件已经发生，请查收 。记得给分哈
在VB.NET环境下,如果要删除一条记录,需要弹出一个提示语句,点"是"就删除,否则就不删除,怎么写代码在前台删除处写js代码
if(confim("确定删除？"))
{ //确定删除的页面？isdel=yes }
然后在后台page_load获取isdel的值，若为yes，则进行删除操作即可！
vb.net清空所有窗口清空所有窗口的话，直接就是把所有的东西都划掉就可以了 ， 很简单的 。
VB.net怎样全部删除DataGridView的内容？【vb.net删除页面 vb删除命令】方法有多种 。
可以dataAdapter.Fill到数据表应该，设置几个command，再通过dataAdapter.Update就可以更新数据了 。不过表要有一个关键的key吧 。
另外一种直观一点：
也需要表有个关键key有就是关键字段 。
你datagridview.reomveAt(index)同时执行sqlcommand("delete * From table where keyFild='"key"'")就可以 。
参考一个实例，如下：
Private Sub bitDelete_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bitDelete.Click

推荐阅读


上一篇：go语言安全吗，安全寄语言

下一篇：如何回访新媒体，如何接待媒体采访