منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : مرحبا محتاجة كود لأغلاق او انهاء قاعدة البيانات وليس الأتصال
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
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.TextMe.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() لانهم م اشتغلو معي
السلام عليكم
طيب رهف جربي السطر التالي لاغلاق الاتصال النشط او الاتصال المفتوح
PHP كود :
Rs.ActiveConnection=Nothing
Cn
.Close()  'Close Connect with DataBase 
نفس الشي اخوي م تغير شي والبرنامج رفض ينفذ
اختي الكريمة نرجو منك ارفاق المثال
لنتمكن من حل المشكلة
يعطيكي العافية
يوجد خطأ في المثال الموجود  ( تسجيل دخول.pdf ) وهو أن اختيار ScalarQuery المفروض تعيد قيمة مفردة أي واحدة
وجملة الاستعلام الموضوع في المثال فيها خطأ والمفروض تكون هكذا
PHP كود :
SELECT COUNT(*)
FROM tab
WHERE 
(name = ?) AND ([Password] = ?) 

والكود يجب أن لا يتدخل في OleDbConnection لا في فتحه ولا غلقة لأن LoginTableAdapter هو الذي يتكفل بهذه المسألة ولا تحتاج إلا لهذا الكود فقط
PHP كود :
Dim r Me.LoginTableAdapter.ScalarQuery(Me.TextBox1.TextMe.TextBox2.Text)
If 
0 Then
MsgBox
("The User Name Or Password is incorrect - اسم المستخدم او كلمة المرور غير صحيحة")

Else
Me.Hide()
form2.Show()

End If 

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