[princelovelorn]

السلام عليكم ورحمة الله وبركاته
أقوم حاليا بدراسة الموضوع التالي

إستخدام الواجهات Interface في إستدعاء الدوال و الروتينات من ملف Dll

وأحاول تطبيقه على كلاس قواعد البيانات الذى وضعه الأخ الفاضل elgokr في المشاركة التالية

الرابط

السؤال هو كيف أستدعي متغير عام موجود في كلاس في مشروع ال dll الثاني
الى المشروع الأول interface

sqlstr__
هو المتغير في هذة الحالة

كود :

public sqlstr__ as string
   Dim sqlcon As New OleDb.OleDbConnection

   Public Sub New()
       Dim Path_ = "C:\Users\asd\Documents\Visual Studio 2012\Projects\wininter\wininter\bin\Debug"
       sqlcon = New OleDb.OleDbConnection("provider=microsoft.ace.oledb.12.0;data source=" & Path_ & "\Myasd.DLL ;user id=admin;jet oledb:database password=1234567890")
   End Sub
   Public Sub open_con() Implements asd.Cls_Con_ACES.open_con
       If sqlcon.State = ConnectionState.Closed Then
           sqlcon.Open()
       End If
   End Sub
   Public Sub close_con() Implements asd.Cls_Con_ACES.close_con
       If sqlcon.State = ConnectionState.Open Then
           sqlcon.Close()
       End If
   End Sub

نص الأتصال دائما مع قواعد الأكسس نستخدم معه  Application.StartupPath &  لتحديد مسار البرنامج
إلا انه لا تنجح معي في هذة الحالة ولا اعلم لماذا 
فحاولت إنشاء متغير عام لجملة الأتصال حتى أستطيع وضع Application.StartupPath & 
فلم أستطع ان أصل لطريقة الاستخدام

وجزاكم الله خيرا