PDA

View Full Version : خطا در هنگام ایجاد نسخه پشتیبان



iransim
یک شنبه 25 فروردین 1387, 01:51 صبح
سلام دوستان
من برای کپی فایل به روی دیسکت از ماژول زیر استفاده می کنم

Option Explicit
Public markazId As String
Public markaz2Id As String
Public tavabeId As String
Public tavabe2Id As String
Public kind1Id As Boolean
Public date1Id As String
Public time1 As String
Public postmanId As Long
Public UserIdCustomer As String
Sub CreatDatabaseBack()
' برای ارسال اطلاعات به روی دیسکت '
Dim wrkDefault As Workspace
Dim dbsNew As Database
Dim tbName As String
Dim tbName1, tbName2 As String
On Error GoTo Err1
......
حال وقتی روی دکمه برای اجرای آن استفاده می کنم روی سطر قرمز رنگ پیام خطای زیر را نمایش میدهد
Compile error
user-defined type not defined
معنی آن چیست؟ و چگونه خطا را اصلاح کنم ؟

تشکر از همه دوستان

مهدی قربانی
یک شنبه 25 فروردین 1387, 07:19 صبح
سلام
احتمالاً مربوط به Reference هاست ، در VBA‌ از منوی Tools گزینه References‌ چک کن ببین Microsoft DAO Objects Library‌ تیک داره ؟

amirzazadeh
یک شنبه 25 فروردین 1387, 07:30 صبح
اگر ممکنه کد کامل ماژولتو اپلود کن ولی فعلا اگر این کد تو ماژولت نیست بهش اضافه کن


Set wrkDefault = DBEngine.Workspaces(0)

iransim
یک شنبه 25 فروردین 1387, 21:55 عصر
سلام
احتمالاً مربوط به Reference هاست ، در VBA‌ از منوی Tools گزینه References‌ چک کن ببین Microsoft DAO Objects Library‌ تیک داره ؟

دوست عزیز سلام
تشکر از راهنمائیو دستت درد نکنه