23-12-15, 04:08 AM
تفضل هذا الكود وغير مايلزم ليتوافق مع المتطلبات لديك
PHP كود :
'كود التحقق من وجود الرقم
Dim cmd As New OleDbCommand("select * from idtable where id =" & TextBox1.Text & "", cn)
Dim dr As OleDbDataReader
cn.Open()
dr = cmd.ExecuteReader
If dr.HasRows = True Then
MsgBox("عفوا هذا الرقم موجود مسبقا")
cn.Close()
Else
'كود الاضافة
Dim cm As New OleDbCommand("insert into idtable (id) values ('" & TextBox1.Text & "')", cn)
cm.ExecuteNonQuery()
MsgBox("تم الحفظ بنجاح")
cn.Close()
End If

