نشان ندادن پیغام error 3044 و error 3024

[MOAHHAMDREZA RAMIN]

دو فایل اکسس را با هم لینک کرده ایم
مثلا دو فایل در مسیر
d:\my documents
pحالا مسیر را در کامپیوتر عوض میکنیم یعنی فایل را به درایو :e میبریم
مسیر لینک به هم خورده و فایلها همدیگر را نمیشناسند
چه باید کرد که در هر مسیری قابل شناسایی باشند؟
اگر این کار غیر ممکن است میتوان کاری کرد که error3044 یا error3024 اصلا ظاهر نشود؟
یعنی پیغامهای اکسس در مورد این دو ایراد نیاید؟
متشکر از جوابی که میدهید
آقای انگوتی اگر دیدند آدرس ایمیل خود را به من بدهند:تشویق:

[mazoolagh]

شاید تاپیک زیر بدردتون بخوره
http://barnamenevis.org/forum/showthread.php?t=199543

[MajidSarabi]

دو فایل اکسس را با هم لینک کرده ایم

مثلا دو فایل در مسیر
d:\my documents
pحالا مسیر را در کامپیوتر عوض میکنیم یعنی فایل را به درایو :e میبریم
مسیر لینک به هم خورده و فایلها همدیگر را نمیشناسند
چه باید کرد که در هر مسیری قابل شناسایی باشند؟
اگر این کار غیر ممکن است میتوان کاری کرد که error3044 یا error3024 اصلا ظاهر نشود؟
یعنی پیغامهای اکسس در مورد این دو ایراد نیاید؟
متشکر از جوابی که میدهید


سلام عليكم؛
يك روش كلي براي كنترل خطاهاي مختلف در اكسس هست : وقتي شما شمارة خطاي موردنظر رو مي‌دونيد و مي‌خواهيد درصورت بروز اون خطا كار خاصي انجام بشه ، در قسمت

. . . _Err
روال بنويسيد كه اگر Err.Number مساوي عدد موردنظر است، آنگاه . . .

مثلاً در مورد سؤال شما ، ميشه بگيم اگر Err.Number مساوي 3044 يا مساوي 3024 بود، به كاربر پيغام بده كه فايل فلان را در آدرس فلان كپي نماييد

[MajidSarabi]

ضمناً فكر كنم لازم به تذكر نباشه كه منظورم از . . . _Err چيه!! چون قراره دوستان بدونند كه معمولاً روال استاندارد بصورت زير نوشته ميشه :


Private Sub Command0_Click()
On Error GoTo Err_Command0_Click


: Exit_Command0_Click
Exit Sub
: Err_Command0_Click
MsgBox Err.Description
Resume Exit_Command0_Click

End Sub

[MOAHHAMDREZA RAMIN]

اقاي مجيد سرابي متشكر از شما
مشكل اينجاست كه بنده از شرط استفاده ميكنم
و مراحلي كه گفتيد انجام ميدهم و كاربر كامپيوتر را راهنمايي ميكنم
ولي!!
پيغام ERROR در نهايت ظاهر ميشود!
ميخواهم پيغام ERROR ديگر ظاهر نشود
چون من ايراد را رفع ميكنم
چرا باز هم پيغام ميآيد؟
چطور ميتوان كاري كرد كه پيغام ايراد اتصال فايل ظاهر نشود؟
متشكر از شما

[alirezabahrami]

اقای مجید سرابی متشکر از شما
مشکل اینجاست که بنده از شرط استفاده میکنم
و مراحلی که گفتید انجام میدهم و کاربر کامپیوتر را راهنمایی میکنم
ولی!!
پیغام ERROR در نهایت ظاهر میشود!
میخواهم پیغام ERROR دیگر ظاهر نشود
چون من ایراد را رفع میکنم
چرا باز هم پیغام میآید؟
چطور میتوان کاری کرد که پیغام ایراد اتصال فایل ظاهر نشود؟
متشکر از شما

سلام
حالت زیر را هم امتحان کن :

[code]

Private Sub Form_Load()
این کد را در ابتدا بنویس
On Error GoTo a

[abas1388]

ببخشید ! در پست قبلی کدها ناقص آپلود شده

[alirezabahrami]

ببخشید ! در پست قبلی کدها ناقص آپلود شده



عذر خواهی میکنم




Private Sub Form_Load()
این کد را در ابتدای ماژول بنویس


On Error GoTo a
این کد را درانتهای ماژول بنویس
a:
If Err.Number = 3044 or Err.Number = 3024Then
Exit Sub
End If
End sub

[MOAHHAMDREZA RAMIN]

متاسفانه باز هم پيغامي كه ملاحظه ميكنيد صادر ميشود
چرا نميتوان اين پيغام را مخفي كرد؟
اين چه مشكلي است؟

[ehsan_g]

شما مي توانيد از رخداد خطاي هر زير روال استفاده كنيد .همانگونه كه ديگر دوستان گفتند ولي شما از رخداد خطاي فرم استفاده كرده ونشان دادن خطاي سيستم را متوقف نماييد مانند كد زير

Private Sub Form_Error(DataErr As Integer, Response As Integer)
msgbox (DataErr)
Response = 0 اين فرمان باعث شده خطاي سيستم نمايش نيابد
end sub