mrx_ta7ady

إضغط Right Click على الـ Form في الـ Design وإختر الخيار Lock Controls

لإغلاق فورم يجب أولا معرفة إسمه .. لو إفترضنا ان محل تنفيذ الأمر هو الـ MDIForm والـ Form1 هو المراد إغلاقه .. والـ Form2 هو المراد فتحه Form2.Show Unload Form1 علما بان الـ MDIForm لابد وحتما ان يكون مفتوح وقت فتح اي MDIChild

التعديل في المرفقات ex_class12.rar

قم بوضع التصريح أدناه في منطقة التصريحات Declarations Private 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 Str…

بص يا سيدي .. هما نقطتين الأولى طريقة إستخدامك للـ EOF .. إذا اردت للتحقق من وجود سجلات يجب ان تكون False أي ان الـ EOF إذا True فلا يوجد سجلات وإذا False فتعني وجود سجلات .. ومثال على ذالك ' لا يوجد سجلات End If If Not RS.EOF Then ' يوجد سجلات End If If RS.EO…

اخي الفاضل .. اذا اردت الإستفسار عن شيء فبإمكانك وضعه في موضوع جديد لسهولة الوصول اليه عند البحث وبخصوص ضغط قاعدة البيانات الـ Access فاتبع هذا الرابط اما ضغطها الى RAR أو ZIP أو خلافهما فهذا سيجعل عملية الإتصال بقاعدة البيانات أمر مستحيل إلا بعد الفك وعلى كل …

أخي الفاضل .. التعديل السابق لم يكن لتلاشي الهمزات او تفاديها بينما كان لوضع إحتمالات وجود همزات او عدم وجود همزات في السجلات اي اذا كلمة البحث هي ابراهيم اسلام اذا سيتم البحث بـ 9 شروط .. وليس بشرط واحد دون همزات واستفسارك الأخير لا يخص الهمزات بل يخص الألف ا…

المشكلة تكمن في جملة الـ UPDATE .. الجملة الخطأ هي : SQLs = "update[users]ste[pass1]='" & Text4 & "' where [username]='" & username & "'" والمشكلة مكونه من شقين .. الشق الأول كلمة SET وهي مكون اساسي من بناء جملة الـ UPDATE والمشكلة في كلمة SET أنها مكتوبة STE …

سبق واتفقنا ان مطلبك جائز بإستخدام الـ API .. وهناك قسم مخصص لذلك منتدى برمجة الوندوز بالإعتماد على Windows API بإمكانك الذهاب إليه وطرح تسائلاتك بالنسبة للـ API نفسه أما الـ Module المذكور في المشاركة السابقة فبإمكانك ان تحدد مطلبك ونقاط الإستفسار .. وإن شاء …

تمت الإجابة على نفس الموضوع تحت قسم الفيجوال بيزك اذهب إلى المشاركة

قم بإضافة Module جديد وضع بداخله هذا الكود On Error GoTo Err: Dim MYDatabase As SQLDMO.Database Dim MYSQLServer As SQLDMO.SQLServer Set MYSQLServer = New SQLDMO.SQLServer MYSQLServer.Connect ".", "sa", "sa" Set MYDatabase = MYSQLServer(DBName) Call MYDatabase.…

يمكنك التحكم بشكل تام بالـ Services من خلال الـ Visual Basic بإستخدام الـ API إطلع على هذا الـ Module وستجد به كا ما تريد إن شاء الله

السلام عليكــم ورحمـة الله وبركاتــه عند إنشاء أي جدول داخل أي قاعدة بيانات يجب مراعات إختيار الأسماء المناسبة غير المتعارضة مع الـ Syntax الخاصة بقاعدة البيانات نفسها وعلى سبيل المثال إذا أردنا تكوين جملة إستعلام نجد أنها قد تحوي الأسماء التالية انسخ الكود [c…

التعديل في المرفقات shadi2.rar

السلام عليكــم ورحمـة الله وبركاتــه أهلا بك اخي العزيز في عالم الـ ADO shadi.rar

آسف على القسم .. ماخدتش بالي وقت محطيته لانه مجوب وبلنسبة لإغلاق قاعدة البيانات وفتحها مرة ثانية فهذا لن يؤثر على البرنامج في الأجهزة الأخرى ولكن سيؤثر على أي Recordset مفتوح داخل برنامجك في أي مكان آخر لذا أنصحك ان تكتفي بإغلاق الـ Recordset وفتحه من جديد

السلام عليكم ورحمة الله وبركاته التعديل المطلوب موجود في المرفقات Letters.rar

تم الإطلاع على المثال لكن تعثر التعديل عليه نظرا لعدم وجود الأداة VB2_SkinCtrl1 لدينا وردا على السؤال الأول .. قم بتغيير كود الحدث Click للـ Command3 .. من : Adodc1.Recordset.AddNew إلى : Dim RSTemp As ADODB.Recordset Set RSTemp = New ADODB.Recordset RSTemp.Op…

انسخ الكود [color= #993333; font-weight: bold;]UPDATE MYTable [color= #993333; font-weight: bold;]SET MYField [color= #66cc66;]= [color= #ff0000;]'24' [color= #993333; font-weight: bold;]WHERE Val[color= #66cc66;](MYField[color= #66cc66;])[color= #66cc66;]> [c…

في الـ Form_Load مثلا كما قلت سابقا أو اي مكان آخر .. كما يليق لك هذا الكود وظيفته إستدعاء الإجراء الخاص بجعل برنامجك يفتح مع كل مره يفتح فيها الـ Windows XP