Printable View
به نام خدا
من در .net1.1برای تعریف مسیر اتصال پس از نوشتن برنامه یک متغیر عمومی تعریف میکردم و در تمام فرم هایی که در آن مثلا sqlcoonction1 بود در قسمت region# مقدار connection stringآن را برابر آن متغیر میدادم و مقدار آن متغیر را هم از یک فلیل textمیخواندم پس هر وقت میخواستم مسیر را تغییر دهم آن فایل text را تغییر میدادم و درست میشد ولی مشکلات زیادی داشت میشه کمک کنید برای یک روش بهتر ؟
اگه درست متوجه سوالتون شده باشم اینکارو انجام بدین .
یک ماژول به پروژه خود اضاف کنید و متغیرتون رو در اونجا بصورت Public تعریف کنید .
حالا از هزجا بخواهید میتوانید مقدارش رو بخونید و بنویسید .
با سلام
خوب چرا از یک فیلد در بانکتون برای این کار استفاده نمی کنید
مقدار را دریافت کرده می نویسید و می خوانید
چون اول باید به بانک وصی بشن بعد بخونن.نقل قول:
خوب چرا از یک فیلد در بانکتون برای این کار استفاده نمی کنید
بدون کانکشن استرینگ که نمیشه وصل شد!
من از همان روشی استفاده میکنم که آقای چابک گفت ولی یه روش دیگه ؟
میشه یه Demo از کدی که اینکارها رو انجام میده بزارید .
2 تا فایل است mainاصلی و اون یکی یک ماژول برای نگه داشتن متغیر ولی مشکل من این نیست همون طور که اول گفتم این کار یک سری مشکل داره مثلا هر بار که به کانکشن یکی از فرمها دست می زنیم این کار را باید دوباره انجام بدم و میخوام یک راه راحتر پیدا بشه؟
تا جایی که من متوجه شدم شما میخواهید نسبت به موقعیت برنامه در حالتهای مختلف
کانکشن استرینگتون رو عوض کنید . درسته ؟
اگه تا اینجا درسته به بقیه اش توجه کنید .
قاعدتا شما یک بخشی از کانکشن استرینگتون در همشون مشترکه .
مثلا اگر از بانک اکسس استفاده میکنید این قسمت در همش مشترکه .
پس لازم نیست که شما تمامی کانکشن استرینگ رو ذخیره کنید .
Provider=Microsoft.Jet.OLEDB.4.0;Data Source='" & DBPth & "';JET OLEDB:Database Password='" & DBPwd & "'"
فقط کافیست دو مقدار DBPth که مسیر دیتابیس است و مقدار DBPwd که رمز ورود به دیتابیس است رو ذخیره کنید .
حالا فقط کافیه یه Function بنویسید که در اون این مقادیر به کانکشن استرینگ نسبت داده بشه .
برای مثال :
برای ذخیره کردن هم پیشنهاد میدم از Settings خود وی بی استفاده کنید که خیلی راحت است .
Public Function SetConStr(byVal DBPth as string,byVal DBPwd as String) as String
return Provider=Microsoft.Jet.OLEDB.4.0;Data Source='" & DBPth & "';JET OLEDB:Database Password='" & DBPwd & "'"
End Function
حالا هر جا که خواستید که کانکشن استرینگ جدید وارد کنید اینطوری عمل کنید :
امیدوارم مشکلتون حل بشه .
Dim ConStr as String = SetConStr(MyPth,MyPwd)
متشکرم و محبت کردین