[عبدالله الصافي]

السلام عليكم ورحمة الله وبركاته

عملت برنامج صغير لعرض الصور
وعملت به ميزة فتح البرنامج من خلال عمل دبل كليك على الصورة
واستخدمت ذلك الكود وهو يعمل تمام 

كود :

Private Sub Frm_Main_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
       If My.Application.CommandLineArgs.Count > 0 Then Pc_Img.ImageLocation = My.Application.CommandLineArgs(0)  
   End Sub

ولكن المشكلة في جملة الأتصال هذه

كود :

   Private xCon As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=Files\Db\PicturesStore.mdb;jet oledb:database password=123456789")

عند فتح البرنامج عن طريق الدبل كليك على الصورة تظهر مشكلة في جملة الأتصال
كما بالصورة

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

فقمت بعمل متغير يجلب لي مسار البرنامج ووضعته داخل جملة الأتصال فظهرت المشكلة

أتمنى ان يكون كلامي واضح للجميع