06-10-18, 11:06 PM
السلام عليكم ورحمة الله وبركاته
أقوم حاليا بدراسة الموضوع التالي
إستخدام الواجهات Interface في إستدعاء الدوال و الروتينات من ملف Dll
وأحاول تطبيقه على كلاس قواعد البيانات الذى وضعه الأخ الفاضل elgokr في المشاركة التالية
الرابط
السؤال هو كيف أستدعي متغير عام موجود في كلاس في مشروع ال dll الثاني
الى المشروع الأول interface
sqlstr__
هو المتغير في هذة الحالة
نص الأتصال دائما مع قواعد الأكسس نستخدم معه Application.StartupPath & لتحديد مسار البرنامج
إلا انه لا تنجح معي في هذة الحالة ولا اعلم لماذا
فحاولت إنشاء متغير عام لجملة الأتصال حتى أستطيع وضع Application.StartupPath &
فلم أستطع ان أصل لطريقة الاستخدام
وجزاكم الله خيرا
أقوم حاليا بدراسة الموضوع التالي
إستخدام الواجهات 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 &
فلم أستطع ان أصل لطريقة الاستخدام
وجزاكم الله خيرا
لا إله إلا الله وحده لا شريك له له الملك وله الحمد وهو على كل شئ قدير
سبحان الله وبحمده سبحان الله العظيم
سبحان الله والحمد لله ولا إله إلا الله والله أكبر ولا حول ولا قوة إلا بالله العلى العظيم
رب أغفر لي