PDA

View Full Version : سوال: اجرای یک فایل mdb توسط یک فایل exe



miladdmax
دوشنبه 25 آذر 1392, 20:10 عصر
من میخوام یه فایل mdb ساخته شده با اکسس را توسط یک فایل اجرایی نوشته شده با vb اجرا کنم یعنی کد ویبی برای اجرای فایلهای اکسس را میخوام
ضمنا" میخوام بدون نمایش پنجره open اکسس اجرا شه:متفکر:

AbbasVB
دوشنبه 25 آذر 1392, 20:41 عصر
سلام
این فایل ها که اجرایی نیستند اگه می خوای با اکسس بازش کنی باید از توابع API استفااده کنی
مثال


Private Declare Function ShellExecuteA Lib "shell32.dll" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

Function OpenFile(handel As Long, Adress As String)
ShellExecuteA handel, "Open", Adress, vbNullString, vbNullString, 1
End Function



هندل فرم رو با آدرس فایل رو بهش بده
OpenFile Me.hwnd,"c:\a.mdb"

miladdmax
دوشنبه 25 آذر 1392, 21:05 عصر
سلام
این فایل ها که اجرایی نیستند اگه می خوای با اکسس بازش کنی باید از توابع API استفااده کنی
مثال


Private Declare Function ShellExecuteA Lib "shell32.dll" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

Function OpenFile(handel As Long, Adress As String)
ShellExecuteA handel, "Open", Adress, vbNullString, vbNullString, 1
End Function



هندل فرم رو با آدرس فایل رو بهش بده
OpenFile Me.hwnd,"c:\a.mdb"
خیلی ممنون آره میخوام با اکسس بازش کنم میشه یه نمونه بزارین برام
اگه بخوام پنجره ای که قبل باز شدن اکسس باز میشه منظورم همون پنجره ای امنیتی اکسس نمایش داده نشه چه کدی بنویسم