<script type="text/javascript">
</script> <script type="text/javascript" src="http://pagead2.googlesyndication.com/pagead/show_ads.js"> </script>
数据插入问题
我想向表里添加一行数据,但是想在添加编号的时候判断添加的编号(编号是表的主键,类型为自动编号)是否已存在,下面是添加其他数据的语句,判断编号是否存在的语句应该怎么写才对,应该插在代码的什么地方呢?有那位高手能帮帮忙,小妹感激不尽啊...
Dim flag As Boolean = True
Dim dt As DataTable
If (Me.TextBox1.Text.Trim() = String.Empty) Or (Me.checkdate() = New DateTime(1900, 1, 1)) Then
MessageBox.Show( "编号不能为空 ")
flag = False
End If
If (flag) Then
Dim sql As String = "insert into register(reg_id,reg_name,birthday,reg_time,reg_gender,reg_phone)values( '' " + Me.TextBox1.Text.Trim() + " '', '' " + Me.TextBox2.Text.Trim() + " '', '' " + Me.checkdate() + " '', '' " + Me.checkdate() + " '', '' " + Me.getsex() + " '', '' " + Me.TextBox6.Text.Trim() + " '') "
OleDbCmd1.Connection = OleDbCon1
OleDbCmd1.CommandText = sql
Try
OleDbCon1.Open()
OleDbCmd1.ExecuteNonQuery()
MessageBox.Show( "添加成功 ")
Me.bindg()
Catch ex As Exception
MessageBox.Show(ex.Message)
Finally
OleDbCon1.Close()
End Try
End If
End Sub
__________________________________________________________________________
自动编号自段不用插入的
判断可以放在 If (flag) Then后
*****************************************************************************
欢迎使用CSDN论坛专用阅读器 : CSDN Reader(附全部源代码)
http://www.cnblogs.com/feiyun0112/archive/2006/09/20/509783.html
__________________________________________________________________________
加一个 IF 和 SELECT语句 就可以搞定了
__________________________________________________________________________
既然是自动编号字段,那就不用插入
__________________________________________________________________________
楼上正解
既然是自动编号字段,那就不用管它
__________________________________________________________________________
给编号索引不重复,插入时,如果有错误,说明重复,反之,OK。
__________________________________________________________________________
问题已经解决了,谢谢各位了,我是初学者,以后还请大家多多指教:)
__________________________________________________________________________
然也
__________________________________________________________________________
接分,谢谢。
__________________________________________________________________________
数据插入问题
我想向表里添加一行数据,但是想在添加编号的时候判断添加的编号(编号是表的主键,类型为自动编号)是否已存在,下面是添加其他数据的语句,判断编号是否存在的语句应该怎么写才对,应该插在代码的什么地方呢?有那位高手能帮帮忙,小妹感激不尽啊...
Dim flag As Boolean = True
Dim dt As DataTable
If (Me.TextBox1.Text.Trim() = String.Empty) Or (Me.checkdate() = New DateTime(1900, 1, 1)) Then
MessageBox.Show( "编号不能为空 ")
flag = False
End If
If (flag) Then
Dim sql As String = "insert into register(reg_id,reg_name,birthday,reg_time,reg_gender,reg_phone)values( '' " + Me.TextBox1.Text.Trim() + " '', '' " + Me.TextBox2.Text.Trim() + " '', '' " + Me.checkdate() + " '', '' " + Me.checkdate() + " '', '' " + Me.getsex() + " '', '' " + Me.TextBox6.Text.Trim() + " '') "
OleDbCmd1.Connection = OleDbCon1
OleDbCmd1.CommandText = sql
Try
OleDbCon1.Open()
OleDbCmd1.ExecuteNonQuery()
MessageBox.Show( "添加成功 ")
Me.bindg()
Catch ex As Exception
MessageBox.Show(ex.Message)
Finally
OleDbCon1.Close()
End Try
End If
End Sub
__________________________________________________________________________
自动编号自段不用插入的
判断可以放在 If (flag) Then后
*****************************************************************************
欢迎使用CSDN论坛专用阅读器 : CSDN Reader(附全部源代码)
http://www.cnblogs.com/feiyun0112/archive/2006/09/20/509783.html
__________________________________________________________________________
加一个 IF 和 SELECT语句 就可以搞定了
__________________________________________________________________________
既然是自动编号字段,那就不用插入
__________________________________________________________________________
楼上正解
既然是自动编号字段,那就不用管它
__________________________________________________________________________
给编号索引不重复,插入时,如果有错误,说明重复,反之,OK。
__________________________________________________________________________
问题已经解决了,谢谢各位了,我是初学者,以后还请大家多多指教:)
__________________________________________________________________________
然也
__________________________________________________________________________
接分,谢谢。
__________________________________________________________________________