24-04-18, 11:07 PM
25-04-18, 01:58 AM
راجع الحقول عند خطأ في حقل userID
25-04-18, 02:52 AM
اعمل الفنكشان دية واستدعيها فى زرار الحفظ وحتتحل المشكلة انشاء الله
بس الاهم تغير الاسماء واسم الجدول يعنى تحط UsersID مكان userid وتحط اسم الجدول مكان user
بس الاهم تغير الاسماء واسم الجدول يعنى تحط UsersID مكان userid وتحط اسم الجدول مكان user
كود :
Public Function GetMaxUserID_Users_InDirect()
Dim dt As New DataTable
Dim da As New SqlDataAdapter
dt.Clear()
da = New SqlDataAdapter("select MAX(UserID) from Users", con)
da.Fill(dt)
Dim MyNewUserID_Users As Double
If IsDBNull(dt(0)(0)) = True Then
MyNewUserID_Users = 1
Else
MyNewUserID_Users = dt(0)(0) + 1
End If
Return MyNewUserID_Users
End Function30-04-18, 04:38 PM
شكرا لكم تم حل المشكلة