تشخیص بررسی ارتباط با بانک SqlServer

[ariadpg]

سلام
شاید برای شما هم اتفاق افتاده که زمانی که برنامه شما از بانک اطلاعاتی SQlServer استفده می کنه اگر
1- اصلا SqlServer نصب نباشه
2- SqlServer نصب باشه اما Stop باشه
3-SqlServer نصب باشه اما نرم افزار نتونه با آن ارتباط برقرار کنه
4-یا DataBase مربوطه در SQlserver نباشه
پس از اجرای برنامه دلفی یک پیغام میده (عموما به شکل زیر)
Project ...... raised exception class EOleexception with message [DBNETLIB][ConnectionOpen(Connect()).SQL SERVER dos not exist or access denied .......
چطور میشه کدی نوشت که قبل از اینکه دلفی بخواهد این پیغام رو بده ، خودمون با کد نویسی یه پیغام فارسی بدهیم که "خطا در برقراری ارتباط با بانک اطلاعاتی Sqlserver"

[یوسف زالی]

سلام.
TRY - Except

[ariadpg]

سلام دوست عزیز
درسته با Try میشه ولی چطوری ؟ لطفا یک نمونه کد بگذارید

[یوسف زالی]

try

  adoconnection1.connectionstring := 'bla bla'; // here you are

  adoconnection1.connect;  // or open

except

  // can not connect

end;

[ariadpg]

سلام دوست عزیز You-See
اخوی کدی پیشنهادی شما را هم نوشتم ولی جواب نداد ، هنوز هم قبل از اینکه پیغام من نمایش داده بشه ، پیام خود دلفی را نمایش میده:

Try

dtm.adoconnection1.connected:=true

exception

showmessage('عدم برقراری ارتباط با بانک اطلاعاتی')

end;

[یوسف زالی]

شما در مورد try اصلا کار کردید؟
دوست من، با Exe تست کن، IDE ارورش رو در هر حال می ده. باید بعدش ادامه بدید.

[Mask]

پیرو صحبت برادر عزیزمون : در نوشتن کد دقت کنید :
except چه ربطی به exception داره؟

[کامروا]

سلام دوست عزیز
درسته با Try میشه ولی چطوری ؟ لطفا یک نمونه کد بگذارید

بهتون توصیه میکنم آموزش تصویری آقای بهروز عباسی مربوط به مدیریت استثنائات رو از این لینک دانلود کنید.