ممكن توضيح سبب الخطاء عند تحميل الفورم
علما ان الكود يعمل على قاعدة بيانات اكسيس دون اى مشاكل
مرفق المثال مع سكربت قاعدة البيانات
ممكن طريقة. حل. . رسالة الخطاء.
عند تحميل البيانات
أقرأ الرسالة وستعرف أين يقع الخطأ
الرسالة تقول أنه لا يوجد سجل (سطر) رقمه صفر -- يعني لا يوجد بيانات لقرائتها أساساً.
يعني أن الـ (dt) خالي من البيانات.
لم اتمكن من معرفة الخطاء لان نفس الكود شغال. على قاعدة بيانات اكسيس
يعنى المشكلة فى صيغة كتابة الكود.
(11-06-23, 01:32 AM)new_programer كتب : [ -> ]لم اتمكن من معرفة الخطاء لان نفس الكود شغال. على قاعدة بيانات اكسيس
يعنى المشكلة فى صيغة كتابة الكود.
بل لا توجد بيانات وفق هذا الشرط:
PHP كود :
Where AccountName = '" & AccountsTreeText & "'
(10-06-23, 04:14 PM)new_programer كتب : [ -> ]ممكن توضيح سبب الخطاء عند تحميل الفورم
علما ان الكود يعمل على قاعدة بيانات اكسيس دون اى مشاكل
مرفق المثال مع سكربت قاعدة البيانات
سكربت قاعدة البيانات ليس فيها بيانات
PHP كود :
Sub LoadTools()
Dim AccountsTreeText As String = TreeView1.SelectedNode.Text
AccountsTreeText = AccountsTreeText.Replace(TreeView2.SelectedNode.Tag & " : ", "")
Dim com As New SqlCommand("Select * From AccountsTree Where AccountName=@AccountName", conn)
com.Parameters.AddWithValue("@AccountName", AccountsTreeText.Trim)
Dim da As New SqlDataAdapter(com)
Dim dt As New DataTable
da.Fill(dt)
If dt.Rows.Count > 0 Then
Dim Num As Integer = 0
Txt_DebitAccount.Text = dt.Rows(Num)("DebitAccount").ToString
Txt_CreditAccount.Text = dt.Rows(Num)("CreditAccount").ToString
Txt_BalanceAccount.Text = dt.Rows(Num)("BalanceAccount").ToString
Txt_AccountID.Text = dt.Rows(Num)("AccountID").ToString
Txt_AccountName.Text = dt.Rows(Num)("AccountName").ToString
Txt_TYPE.Text = dt.Rows(Num)("TYPE").ToString
Txt_AccountSource.Text = dt.Rows(Num)("AccountSource").ToString
Chk_ViewInFavorites.Checked = dt.Rows(Num)("ViewInFavorites").ToString
End If
End Sub
تسلم استاذي الفاضل
G20
الكود يعمل بكفاءة تسلم - ربنا يجعلة فى ميزان حسناتك ويذيدك من علمه
المشكلة كانت فى تعديل صيغة الكود لان الكود يعمل على اكسيس ولا يعمل على سيكوال سيرفر
لان جربت الكود على قاعدة بيانات تحتوي على بيانات وليس فارغة
شكرا جدا مرة اخي