06-04-16, 07:26 AM
السلام عليكم ورحمة الله وبركاته
اريد كود أو فانكشن
يتم من خلاله التأكد من تعبئة عدد معين من الحقول بالسجل
فإن كانت السجلات المحددة معباة ينفذ أمر ما
وإلا فلا يتم التنفيذ
كنت استخدم هذا الفنكشن
لكن تظهر مشكلة في ما لو كانت قاعدة البيانات 2007 او 2010
فقط يعمل مع قاعدة البيانات 2003
اريد كود أو فانكشن
يتم من خلاله التأكد من تعبئة عدد معين من الحقول بالسجل
فإن كانت السجلات المحددة معباة ينفذ أمر ما
وإلا فلا يتم التنفيذ
كنت استخدم هذا الفنكشن
لكن تظهر مشكلة في ما لو كانت قاعدة البيانات 2007 او 2010
فقط يعمل مع قاعدة البيانات 2003
كود :
Function Users_Count()
Dim cmd As New OleDbCommand("Select count(*) From tblUsers", Con)
If Con.State = ConnectionState.Open Then
Con.Close()
End If
Dim Count As Integer = 0
Con.Open()
Count = cmd.ExecuteScalar()
Con.Close()
If Count = 0 Then
Return True
Else
Return False
End If
End Function