إذا كان LAB_CODE رقم فقم بحذف العلامة ' من الاستعلام
ايضا إذا كان البحث سيعود بسطر واحد دائما فاجعل SHOW_ تساوي 0
احذف Try من كود البحث أو ضع كود إظهار رسالة داخل Catch لتعرف هل هناك خطا او وجود مشكلة في كود البحث هكذا
ايضا إذا كان البحث سيعود بسطر واحد دائما فاجعل SHOW_ تساوي 0
احذف Try من كود البحث أو ضع كود إظهار رسالة داخل Catch لتعرف هل هناك خطا او وجود مشكلة في كود البحث هكذا
PHP كود :
Sub SHOW_DETAILES(ID_)
Try
Dim DT As New DataTable
Dim DA As New SqlClient.SqlDataAdapter("SELECT * FROM LAB_ADD WHERE LAB_CODE =" & ID_, SqlConn)
DA.Fill(DT)
If DT.Rows.Count = 0 Then
MessageBox.Show("التحليل غير موجود برجاء التأكد من تواجد التحليل !!", "رسالة تنبيه", MessageBoxButtons.OK, MessageBoxIcon.Exclamation)
Else
Dim SHOW_ As Integer = 0
LAB_CODE.Text = DT.Rows(SHOW_).Item("BORG_CODE")
LAB_NAME.Text = DT.Rows(SHOW_).Item("BORG_NAME")
LAB_LAB.Text = DT.Rows(SHOW_).Item("BORG_LAB")
LAB_EG.Text = DT.Rows(SHOW_).Item("BORG_EG")
EDITBUTTON.Enabled = True
DELETBUTTON.Enabled = True
SAVEBUTTON.Enabled = False
End If
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub
