[VB.NET]数据库表的初始化问题
发布时间:2020-12-16 23:45:31 所属栏目:大数据 来源:网络整理
导读:数据库表的初始化问题 数据库数据初始化(清空表中数据,恢复空表),库中有one two three三个表,窗体上可使用Checkbox选择为哪些表初始化数据,请问初始化按钮的代码怎么写,谢谢。 _______________________________________________________________________
数据库表的初始化问题 数据库数据初始化(清空表中数据,恢复空表),库中有one two three三个表,窗体上可使用Checkbox选择为哪些表初始化数据,请问初始化按钮的代码怎么写,谢谢。 __________________________________________________________________________ 该回复于2008-08-05 03:39:54被管理员或版主删除 __________________________________________________________________________ Private Sub Button2_Click(ByVal sender As System.Object,ByVal e As System.EventArgs) Handles Button2.Click If CheckBox1.Checked = True Then Conn = New OleDbConnection(Provider & "; " & Database) Conn.Open() SQL = "Delete From one " Cmd = New OleDbCommand(SQL,Conn) Cmd.ExecuteReader() Conn.Close() MessageBox.Show( "one已经清空! ") End If If CheckBox2.Checked = True Then Conn = New OleDbConnection(Provider & "; " & Database) Conn.Open() SQL = "Delete From two " Cmd = New OleDbCommand(SQL,Conn) Cmd.ExecuteReader() Conn.Close() MessageBox.Show( "two已经清空! ") End If If CheckBox3.Checked = True Then Conn = New OleDbConnection(Provider & "; " & Database) Conn.Open() SQL = "Delete From three " Cmd = New OleDbCommand(SQL,Conn) Cmd.ExecuteReader() Conn.Close() MessageBox.Show( "three已经清空! ") End If End Sub __________________________________________________________________________ fish__net谢谢,虽然我用的是SQlconnection但差不多 __________________________________________________________________________ 有用就好! __________________________________________________________________________ (编辑:李大同) 【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容! |