[رهف العريفي]

PHP كود :

مرحبا اخواني محتاجة كود لأغلاق قاعدة البيانات بشكل كامل 

جربت اكود بدون فايدة  .... يجلس اكثر من 15 ثانية عشان يسكر لي الاتصال بقاعدة البيانات 

اريد كود اسرع ......



انا عندي كود تسجيل الدخول بواسطه قاعدة البيانات وعند الدخول بشكل صحيح للفورم الثاني ..... تفضل قاعدة البيانات مفتوحة ومعلق البرنامج اكثر من 15 ثانية بعدين تسكر لحالها  .......... ياريت تفيدوني بأكواد وشكرااا ...

كود تسجيل الدخول :



جربت كود اغلاق الاتصال ولاكن دون فائدة


 Public Cn As New OleDbConnection("provider=microsoft.Ace.oledb.12.0;data source=  " & Application.StartupPath & "\Laundry Database.accdb")


 If Cn.State = ConnectionState.Open Then
                   Cn.Close()
                          End If
[hr]
[php]  Dim r =
               Me.LoginTableAdapter.ScalarQuery(Me.TextBox1.Text, Me.TextBox2.Text)
            If r Is Nothing Then
                MsgBox("The User Name Or Password is incorrect - اسم المستخدم او كلمة المرور غير صحيحة")
            Else
                      
                  
                  
                    Me.LoginTableAdapter.Connection.Close()
                End If
                Me.Hide()
                form2.Show()
            End If 


---

هذا المثال الي طبقت عليه المشروع

[رهف العريفي]

up>>>>>>>>>>>>>>

[محمد كريّم]

هل استخدمت
Using
End Using

[رهف العريفي]

لا .............. ماهو كود ال end

ياريت لو تقدر تعدل لي ع الكود اعلاه

---

كل مشكلتي اخوي لما اشغل البرنامج بمجرد م ادخل :
User name
password

تفضل قاعدة البيانات معلقة داخل الملف تفضل مفتوحة مما تؤدي الى تعليق او تأخر ب بالبرنامج

احتاج كود بمجرد الضغط ع login ...... التوجه الى form2

يسكر لي الاتصال ويسكر قاعدة البيانات المفتوحه داخل مجلد وشكرااااا


اتمنى تكون فهمتو قصدي المطلوب اخوتي

[محمد كريّم]

جملة using تقوم بانهاء الاوبجكت بعد انتهائها دون تدخل المستخدم
جربي استبدال Close() ب Dispose()

[رهف العريفي]

مو ظبط معي اخي ياريت تفيدوني بجمله ........... Using

---

اخواني كل الي احتاجه جمله تسكر لي الداتا بيز المفتوحة بعد تشغيل البرنامج ... ياريت احصل لي جمله افضل من ال

Close()

و ال Dispose() لانهم م اشتغلو معي

[Amir_Alzubidy]

السلام عليكم
طيب رهف جربي السطر التالي لاغلاق الاتصال النشط او الاتصال المفتوح

PHP كود :

Rs.ActiveConnection=Nothing
Cn.Close()  'Close Connect with DataBase 


[رهف العريفي]

نفس الشي اخوي م تغير شي والبرنامج رفض ينفذ

[Amir_Alzubidy]

اختي الكريمة نرجو منك ارفاق المثال
لنتمكن من حل المشكلة
يعطيكي العافية

[derham]

يوجد خطأ في المثال الموجود  ( تسجيل دخول.pdf ) وهو أن اختيار ScalarQuery المفروض تعيد قيمة مفردة أي واحدة
وجملة الاستعلام الموضوع في المثال فيها خطأ والمفروض تكون هكذا

PHP كود :

SELECT COUNT(*)
FROM tab
WHERE (name = ?) AND ([Password] = ?) 


والكود يجب أن لا يتدخل في OleDbConnection لا في فتحه ولا غلقة لأن LoginTableAdapter هو الذي يتكفل بهذه المسألة ولا تحتاج إلا لهذا الكود فقط

PHP كود :

Dim r = Me.LoginTableAdapter.ScalarQuery(Me.TextBox1.Text, Me.TextBox2.Text)
If r = 0 Then
MsgBox("The User Name Or Password is incorrect - اسم المستخدم او كلمة المرور غير صحيحة")

Else
Me.Hide()
form2.Show()

End If 


---

لكن أعتقد مشكلتك توجد في أماكن أخرى في المشروع