تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] حفظ اعدادات الاتصال بالسيرفر -VB6
#1
دلوقتى انا صممت برنامج على vb6 وقاعدة بيانات sql عايز اعمل ملف ini يبقي فية اسم السيرفر واسم قاعدة البيانات ويقدر المستخدم يغير في الملف على اساس اسم الجهاز واسم قاعدة البيانات

------------------------------
Eng . Ahmed Eldouskey Mohamed Saad
Technical Support Professional


الرد }}}}
تم الشكر بواسطة:
#2
السلام عليكم ورحمة الله و بركاته
تفضل اخي الحبيب
هذا مثال على ما طلبت
اهلا و سهلاً بك

.rar   حفظ الاعدادات.rar (الحجم : 2.86 ك ب / التحميلات : 7)
سأعود قريباً ان شاء الله

الرد }}}}
#3
بارك الله فيك اخي العزيز وشكرا على الاستجابة السريعة
اسف للاطالة وكثرة الاسئلة دي جملة sub main الخاصة باتصال برنامجي للاتصال بقاعدة البيانات محتاج اظبطها انها تاخد من ملف الاوبشن زي ما انت خليت التيكست ياخد منه
Private Sub Main()

'-----------------------------------------------------------------------
myConection.ConnectionString = "DRIVER=SQL Server;SERVER=SYSTEM;UID=sa;PWD=sa;APP=Microsoft® Windows® Operating System;WSID=CTSP;DATABASE=AlmadinaArcM"
'-----------------------------------------------------------------------
'-----------------------------------------------------------------------
'-----------------------------------------------------------------------
myConection.Open
If myConection.State = adStateOpen Then
MDIForm1.Show
Else
MsgBox "Error in Connecting Database please check Connection", vbCritical
End If
End Sub

------------------------------
Eng . Ahmed Eldouskey Mohamed Saad
Technical Support Professional


الرد }}}}
تم الشكر بواسطة: Ahmed_Mansoor
#4
هذا مثال انا استخدمه في الاتصال بقواعد بيانات SQL
عدل به ما تشاء وحسب ما يتوافق مع مشروعك و طريقة الربط التي تتبعها ...

.rar   Connect To Server.rar (الحجم : 6.48 ك ب / التحميلات : 6)
سأعود قريباً ان شاء الله

الرد }}}}
#5
بارك الله فيك وجزاك الله كل خير
هو دة المطلوب فعلا شكرا جزيلا على ما قدمتة Amir_alzubidy
تم عمل التعديلات للتتماشي مع المشروع الخاص بي ولكن بعد عمل الاتصال وعمل البحث من داخل اي شاشة خاصة بالمشروع الخاص بي لا تظهر اى بيانات
قمت بتجربة المثال الذي قمت بارسالة واتصاله بقاعدة البيانات الخاصة بي تظهر نفس الرسالة لا توجد بيانات
فممكن تكون المشكلة فين

------------------------------
Eng . Ahmed Eldouskey Mohamed Saad
Technical Support Professional


الرد }}}}
تم الشكر بواسطة: Amir_alzubidy , Ahmed_Mansoor
#6
الله يجزاك الخير اخي الحبيب
لو القيت النظر الى الكود الموجود في الموديل
ستجد التبويب Connect_Server
و فيه جملة الاتصال
عليك فقط استدعاء تبويب الاتصال بقاعدة البيانات قبل كل جملة استعلام  . . .
بحيث تكون كالآتي :

كود :
Call Connect_Server
If rs.State = adStateOpen Then rs.Close
rs.Open "Select *From [Tabel_Name] ", db, adOpenStatic, adLockOptimistic


اهلاً و سهلاً
سأعود قريباً ان شاء الله

الرد }}}}
تم الشكر بواسطة: Ahmed_Mansoor , amer2000


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  احتاج كود لعمل نسخة من قاعدة بيانات اكسس اثناء الاتصال بها sendbad100 3 124 01-11-16, 08:57 AM
آخر رد: sendbad100
  اريد تغيير قاعدة البينات من اكسس الى سيكوال هل يكفي اغير كود الاتصال sendbad100 3 98 17-10-16, 05:00 PM
آخر رد: sendbad100
  الاتصال بأكثرمن جدول واحد قاعدة بيانات أكسيس Abdellah 2 158 29-09-16, 10:19 PM
آخر رد: Abdellah
  الاتصال بقاعدة بيانات sql من جهاز اخر المستعين بالله 11 1,770 08-04-15, 03:58 PM
آخر رد: ahmedabdelaliem
  [سؤال] كود التاكد من حالة الاتصال بسيرفر قاعدة البيانات AEDC 0 622 18-10-13, 02:37 PM
آخر رد: AEDC

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم