پاسخ به سوالات دوستان
آقا علي : اگر بانک اکسسی پسورد داشته باشد به هنگام استفاده از این بانک در vb به چه صورت باید این پسورد را در سورس برنامه قرار داد تا برنامه بانک را بشناسد و خطا نگیرد ؟
سؤال جالبي بود.من خودم اين كارو امتحان نكرده بودم.موقعي كه آقا علي گفتن امتحان كردم و متوجه منظورشون شدم.اما چون كنترل ADO سيستمم خراب بود نتونستم بانك خودم رو (حتي بدون پسورد) به vb متصل كنم.از يكي از اساتيد (آقا رامين) پرسيدم . ايشون هم گفتن كه در ديتا چنين كاري امكان ندارد اما در ADO قسمتي براي وارد كردن پسورد وجود دارد.بانك خود را به ADO متصل كنيد و امتحان كنيد. اما بهتون پيشنهاد مي كنم كه هيچ وقت بانك خود را با اكسس معماري نكنيد . من هم از موقعي كه برنامه ي Access PassView رو ديدم اين كارو نكردم.
اين برنامه خيلي راحت پسورد بانك شما (حتي اگر در ورژن هاي 97 و 2000 و ... ساخته شده باشد) را نشان مي دهد.اگر مي خواهيد بانكتون امنيت داشته باشه پيشنهاد مي كنم به SQL پناه ببريد.كه البته من خودم با SQL كار نكردم چون در نصبش مشكل پيدا كردم.برنامه ي Access PassView رو براي دانلود واستون مي گذارم.
Password : escada.logfa.com
دانلود با حجم ۸۸ KB
آقا مهدي : چگونه مي توان موقعيت كنترلهاي روي یک فرم , با تغيير رزوريشن مانيتور بهم نريزد وحفظ شود وهمچنين اندازه كنترل ها نيز حفظ شود وبطور كلي تناسب طراحي فرم بهم نريزد ؟
بايد به عرض مهدي جان برسونم كه بستگي به خواسته ي شما داره.راه هاي مختلفي براي سؤال هاي مختلفي وجود داره. با تغيير دادن رزولوشن مانيتور به طور كلي اشيا در كل ويندوز تغيير اندازه مي دهند اما به احتمال زياد شما مي خواهيد يه برنامه بنويسيد كه در حالت Maximize باز مي شه.ولي اگه يكي بياد و رزولوشن مانيتورتون رو تغيير بده (مثلا اجزا كوچكتر بشن) واسه شما ضد حال مي شه چون تمام اشيا مي رن سمت چپ برنامه و مقداري از سمت راست برنامه خالي مي مونه.من خودم هم مدتي دنبال اين جريانات بودم.حالا من واستون چند تا راه حل داره .
اولي = برنامه ي خود را در رزولوشن 1024 * 768 بسازيد و چند خط كد هم اضافه كنيد . كار اين كد ها هم اينه كه در زمان لود شدن برنامه رزولوشن سيستم رو به 1024 * 768 تغيير مي ده . و در آنلود هم دوباره رزولوشن رو به حالت قبلي برگردونه.براي تغيير رزولوشن سيستم هم مي توانيد از توابع API استفاده كنيد.سورس زير توانايي تغيير رزولوشن را داراست.در اين روش بايد BorderStyle فرم برابر با Single Fixed باشد.
دومي = اما راه حل بعدي استفاده از كنترل Resizer هستش . اين كنترل خودش با توجه به رزولوشن و اندازه ي فرم اندازه ي اشيا ي درون فرم رو تعيين مي كنه . حتي قابليت تنظيم اندازه ي خودكار فونت رو هم داراست.استفاده از اين اكتيويكس خيلي آسونه . نيازي به توضيح نداره.مي تونيد اونو دانلود كنيد.
با اين كه راه حل دومي خيلي آسون تره اما من خودم از اولي استفاده مي كنم . شما هر دوشو امتحان كن و با هر كدوم راحتي كار كن.
Password : escada.blogfa.com
دانلود با حجم 78 KB
آقا مجتبي (بهترين بيننده اين وبلاگ) : چگونگي ساختن فايل هاي RES و طرز استفاده ي اونا در Visual Basic .
فايل هاي Res ( يا همون Resource ) منابعي هستند كه شما مي تونيد فايل هاي مورد نياز برنامه تون ( مثلا عكس ، كرسر و ...) رو درون آن قرار دهيد . در حقيقت شما فايل هاتون رو درون برنامه تون Embed مي كنيد . براي قرار دادن اين گونه فايل ها درون برنامه شما نياز به يك نرم افزار داريد كه اين نرم افزار در كنار ويژوال بيسيك نصب مي شود . (منظورم اينه كه شما اين نرم افزار رو داريد ).البته نمي شه بهش گفت نرم افزار . در حقيقت يك ابزاره.اسم اين ابزار Resource Editor VB هستش.به احتمال زياد اين ابزار در منوي Tools موجود است.اگه نبود به مسير Add-Ins> Add-Ins Maneger برويد.در اين قسمت نام اين ابزار را پيدا كنيد و در قسمت Load Behavior دو چك باكس اول را تيك دار كنيد . OK كنيد. تا اينجا شما اين ابزار رو به VB اضافه كرديد . براي كسب اطلاعات بيشتر به عكس هاي زير توجه كنيد.دور قسمت هايي كه توضيح داده بودم رو خط قرمز كشيدم.
همان طور كه در عكس ها ديديد ابزار مورد نظر به ToolBar ويژوال بيسيك اضافه شده. اونو اجرا كنيد.پنجره اي باز مي شه كه مي تونين فايل هاتون رو به برنامه اضافه كنيد . يادتون باشه كه در اين پنجره براي اضافه كردن فايل بايد از ابزار هاي سمت راست كمك بگيريد نه از ابزار هاي سمت چپ.
در اين پنجره با رفتن بر روي هر آيكن (از طريق Tooltip اونا) مي تونيد تشخيص بديد كه هر آيكن قابليت وارد كردن چه نوع از فايل ها را داراست . نوع اونها از سمت چپ به اين صورت هستش . اولي=متن ، دومي=كرسر ماوس ، سومي=آيكن ، چهارمي=عكس ، پنجمي= هر نوع فايلي. عكس بالا رو نگاه كنيد.
حالا نوبت به فراخواني اطلاعات در درون برنامه مي باشد.براي فراخواني فايل ها بايد ID و نوع آن را در دستورات قيد كنيد.
مثلا عكس خود را در res قرار داده ايد و مي خواهيد آن را در يك Image لود كنيد.براي اين كار دستور زير رو وارد كنيد.
Image1.Picture = LoadResPicture(101, ۰)
در دستور بالا عدد 101 ID ، و ۰ نوع فايل مورد نظر (عکس) هستش.برای کرسر و آیکن هم توسط همین تابع لودشون می کنیم فقط فرقش اینه که در قسمت نوع به جای عدد ۰ به ترتیب عدد ۱ و ۲ رو برای کرسر و آیکن قرار می دهیم.
حالا فراخواني متن :
Text1.Text = LoadResString(120)
در دستور بالا 120 ، ID متن ما هستش.
مي تونيد فايلي رو انتخاب كنيد و درون ريسورس برنامه تون قرار دهيد هر موقع هم احتياج پيدا كرديد اون رو به مسيري كه مي خواهيد extract كنيد .
كد زير رو نگاه كنيد.
Dim file1() As Byte
file1 = LoadResData(102, "CUSTOM")
Open "c:\RI.ocx" For Binary As #3
Put #3, , file1()
Close #3
در خط اول يك متغير تعريف كرديم.در خط دوم محتويات ريسورس رو درون متغيرمون ريختيم.در خط سوم يك فايل با نام و پسوند مشخص ايجاد كرديم.در خط چهارم محتويات متغيرمون رو توي فايلي كه باز كرده بوديم ريختيم و در خط پنجم هم فايل مورد نظر رو مي بنديم.همين بود.در ضمن من براي راحتي كار شما سورس اين پروژه رو آپلود كردم.مي تونيد استفاده كنيد.اميدوارم لذت ببريد.
