31-08-19, 10:12 PM
If con.State = ConnectionState.Closed Then
con.Open()
End If
Dim cmd As SqlCommand = New SqlCommand("Select count(رقم_ب_ت_و) from Table1 where ID= @ID", con)
cmd.Parameters.AddWithValue("@ID", num)
Dim result = cmd.ExecuteScalar()
con.Close()
Return Convert.ToBoolean(result)
End Function
لازلت اعاني من نفس المشكلة
con.Open()
End If
Dim cmd As SqlCommand = New SqlCommand("Select count(رقم_ب_ت_و) from Table1 where ID= @ID", con)
cmd.Parameters.AddWithValue("@ID", num)
Dim result = cmd.ExecuteScalar()
con.Close()
Return Convert.ToBoolean(result)
End Function
لازلت اعاني من نفس المشكلة
الحياة فترة اختبار , إما أن تكون او لاتكون 
لن امل من البحث ولن امل من السؤال
[b]رواد المعلوميات[/b]
