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

دلوقتى انا صممت برنامج على vb6 وقاعدة بيانات sql عايز اعمل ملف ini يبقي فية اسم السيرفر واسم قاعدة البيانات ويقدر المستخدم يغير في الملف على اساس اسم الجهاز واسم قاعدة البيانات

بارك الله فيك اخي العزيز وشكرا على الاستجابة السريعة
اسف للاطالة وكثرة الاسئلة دي جملة 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

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