ياشباب يامحترفين فيجوال بيسك ..... مساعدة
السلام عليكم ......
معليش شباب اعذروني لاني باطلب طلبات صعبة شوي ( لاني سألت ناس كثير وماعرفوا )
لكن قلت مالها الا انتم ان شاء الله ......
طبعا الاسئلة في فيجوال بيسك العادي :
1- كيف اصنع ازرار يكون عليها صورة ... يعني زر مربع عادي لكن عليه صورة
2- كيف اضع صورة ولكن الذي يضغط عليها ينتقل لموقع انترنت
3- ( وهذا مشكلة شوي :biggrin: ) كيف اصنع برنامج لكلمة مرور احطه في جهازي في الدرايف D مثلا ( على فرض انه لدي اكثر من درايف ) او على اي درايف كان ... لكن بمجرد ان شخص يفتح الدرايف لن يستطيع فتحه الا بكلمة المرور ... يعني مثل برنامج حمايه للدرايف يكون محمي بهذا البرنامج ( لكن بملاحظة ان البرنامج لا يحتاج الى تنصيب ) يعني مباشر يوضع فبي الدرايف مباشرة بدون install
شكرا على صبركم شوي ولكن انتم لها .... :biggthump
مشاركة: ياشباب يامحترفين فيجوال بيسك ..... مساعدة
ضع هذا في الـDeclarations أي في Moduler
'used for shelling out to the default web browser
Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
Public Const conSwNormal = 1
'end
ضع هذا في command1
ShellExecute hwnd, "open", http://www.the--phantom.tk, vbNullString, vbNullString, conSwNormal
'end
اقتباس:
كيف اصنع برنامج لكلمة مرور احطه في جهازي في الدرايف D مثلا
للاسف لم اجد طلبك ولكن هذا ممكن يفيدك هو برنامج لعمل باسورد على اى فلودر http://www.kw20.com/file/232323.jpgللتحميل كليك يمين وحفظ الهدف باسم
مشاركة: ياشباب يامحترفين فيجوال بيسك ..... مساعدة
أهلاً بك أخوي :
طلبك على ما أعتقد في فيجوال بيسك الإصدار السادس وأسئلتك محرجة شوي أجاوب على اللب بقدر
عليه طبعاً بالإستناد إلى خبرتي الطويلة في هذه اللغة :
1 - إذهب إلى الخاصية Style من خصائص الزر وإختر الخاصية 1- Graphical ثم بعدها بإستخدام الخاصية
Picture قم بإختيار الصورة التي تريدها .
2 - بإستخدام الأمر Shell كالتالي : قم بالذهاب إلى مجلد الـ Program Files ثم إختر الـ Path للإنترنت
إكسبرورر الموجود لديك في الجهاز وهو غالباً يكون موجود في الدليل :
C:\Program Files\Internet Explorer\IEXPLORE.EXE -- أو حسب القرص لديك هل هو سي أو غيره
ومن ثم قم بتنفيذ الجملة التالية :
Shell "D:\Program Files\Internet Explorer\IEXPLORE.EXE www.oms.com", vbNormalFocus
حيث أن هذا الكود مسؤول عن تشغيل الإكسبرورر والإنتقال إلى العنوان المطلوب .
طبعاً أنت تختار العنوان بعد إسم الدليل للإكسبرورر .
3 - هذه مشكلة ويمكن عمل مشروع التخرج فقط عن كيفية ذلك . لذلك سأعطيك طريقة أسهل لكي تقوم بتخزين
كلماتك السرية على جهاز -- يعني ولا حدا يقدر يتطلع إليها غيرك . وهي عن طريق التخزين في الريجيستري
بإستخدام الكلمتان GetSetting و SaveSetting كالتالي :
إستخدم الأمر SaveSetting للتخزين في الريجيستري كما في الجملة التالية :
SaveSetting "Application_Name", "Version 1.0", "Password", "123456"
حيث أول خانة من الباراميتر هي غالباً يكون إسم البرنامج الخاص بك والباراميتر الثاني يكون رقم الإصدار
والباراميتر الثالث هو المتغير المراد تخزينه والأخير القيمة للمتغير المراد تخزينه .
إستخدم الأمر GetSetting لأخذ قيمة من الريجيستري كما في الجملة التالية :
a = GetSetting("Application_Name", "Version 1.0", "Password")
يجب قبل ذلك وضع الريجيستري في متغير لأن المتغير سيحمل القيمة للمتغير الذي تم تخزين المعلومات فيه ،
وقيم الباراميتر الأول كما ذكرت لك والثاني والثالث .
