28-07-18, 02:14 PM
لو سمحتم أريد كود فتح قاعدة بيانات أكسس محمية بكلمة سر عن طريق الفيجوال بيسيك باستخدام ShellExecute
وشكرا
وشكرا
كود فتح ملف اكسس من خلال الفيجول 6
|
28-07-18, 02:14 PM
لو سمحتم أريد كود فتح قاعدة بيانات أكسس محمية بكلمة سر عن طريق الفيجوال بيسيك باستخدام ShellExecute
وشكرا
هذا التعديل
كود : App.Path & "\" & "DBF_01.mdb /pwd password" وهذا التعديل لو كانت كلمة المرور بها مسافة كود : App.Path & "\" & "DBF_01.mdb /pwd " & chr(34) & "password" & chr(34)
28-07-18, 03:17 PM
شكرا أخى الكريم ولكن للاسف الكود لا يعمل وفيمت يلى الكود كامل يفتح ملف أكسس بشرط أنه لا توجد باسورد عليه
ShellExecute Me.hwnd, "open", App.Path & " \" & "DBF_01.mdb", "", "", 3 المطلوب هنا اضافة كلمة السر وشكرا
فيه عندك خطأ بوجود مسافة في الجزء "\ "
هذا التعديل كود : ShellExecute Me.hwnd, "open", App.Path & "\" & "DBF_01.mdb /pwd password", "", "", 3 وهذا التعديل لو كانت كلمة السر بها مسافة كود : ShellExecute Me.hwnd, "open", App.Path & "\" & "DBF_01.mdb /pwd " & chr(34) & "password" & chr(34), "", "", 3
عفوا اخى الكريم
تم اضافة الملف المطلوب فتحه وكلمة السر 12345 برجاء تجربة الكود اللازم لتشغيل هذا الملف وشكرا dbf_2018.rar (الحجم : 88.24 ك ب / التحميلات : 138) dbf_2018.rar (الحجم : 88.24 ك ب / التحميلات : 138)
28-07-18, 04:43 PM
تفضل جرب الآن
كود : ShellExecute Me.hwnd, "open", App.Path & "\" & "DBF_01.mdb /pwd 12345", "", "", 3
28-07-18, 04:59 PM
للاسف الكود لايعمل - مع ملاحظة أنه البرنامج لايعطى رسالة خطأ - ولم يتم فتح الملف وشكرا
|
|