mmghv

جربت الكود ولم يحدث اي شئ غير طبيعي , ذاكرة الرام ثابتة ولا تزداد , هل هذا هو كل ما كتبته داخل التايمر ؟؟؟!!

If TextBox1.TextLength > 0 Then TextBox1.Text = Mid(TextBox1.Text, 1, TextBox1.TextLength - 1) End If

المثال بعد التعديل في المرفقات , يقوم المثال بإضافة جميع سجلات الجدول Products الى الملف T.txt في فولدر البرنامج طبعاً تضيف الإستعلام الذي تريده ثم تقوم بحذف السجلات بعد عملية الإستخراج .. Export To Txt.rar

Private Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long Private Sub Command1_Click() sndPlaySound "C:\WINDOWS\MEDIA\notify.wav", 1 'تستبدل المسار الموجود بمسار ملف الصوت المراد ت…

1) 2)

إذا كنت تريد منع فتح الفولدر اكثر من مرة اي عندما يفتح البرنامج الفولدر إذا وجده مفتح لا يفتحه مرة اخرى فهذا سهل فقط استخدم الكود التالي لفتح الفولدر : Shell "Explorer " & Text1.Text حيث تضع في الـ Text1 مسار الفولدر الذي تريد فتحه وبهذا لن يفتح البرنامج الفول…

حسناً اخي , انا لا اعرف المكتبة التي تستخدمها للإتصال بالسيرفار والتعامل مع قاعدة البيانات , لكني سأعطيك كود مجرب ومضمون 100% بإذن الله اولاً يجب عليك إضافة المكتبة Microsoft ActiveX Data Opjects 2.0 Library او إصدار ارقى مع ملاحظة انك لا تحتاج لإضافتها إذا كن…

اداه رهيبة ولها خصائص جميلة جداً , اهم شئ بها انها تقبل صور ال PNG و الايقونات ذات الدقة العالية اشكرك من كل قلبى على الاداة الرائعة :thumb_up:

رائع جداً اخي الكريم , اعجبتني طريقة إسخدامك للكود وإن دلت فإنما تدل على إستيعابك الجيد للكود وقد فعلت عكس ما يفعل الكثير من الاعضاء عندما يأخذون الكود Copy و Paste من دون التأمل في الكود ومحاولة فهمه وإضافة لمساتهم الخاصة اليه ما يجعلني اشعر بأن عملى ضاع هباء…

المثال بعد التعديل في المرفقات , ولحفظ صورة في قاعدة البيانات نقوم بتحميل ملف الصورة في متغير مصفوفة ( Array ) من نوع Byte ثم نحفظ الصورة كما نحفظ اي حقل آخر كالتالي : Adodc1.Recordset!Photo=Pic_Array Adodc1.Recordset.Update بالتوفيق ,,, data2.rar

اخى قم بإنشاء قاعدة البيانات وقم بتنزيل الـ Connector الخاص بالـ Mysql من الموقع وإستخدم الـ Adodc في الإتصال بقاعدة البيانات بإختيار مزود الـ Mysql والسيرفار واليوزر والباسورد وقاعدة البيانات ثم بعد ذلك نناقش موضوع التحديث بعد ان ترفع مثالك وإن لم تستطيع الإت…

بالطبع اخي الكريم , في قواعد البيانات يمكننا تنفيذ 4 انواع اوامر على قاعدة البيانات , وهي SELECT , INSERT , UPDATE , DELETE 1- SELECT : يقوم هذا الامر بعرض الحقول من جدول او اكثر بشرط او اكثر كما في المثال Select * From MyTable Where MyField='FieldValue' فهنا …

هذا سهل فيمكنك إستخدام دالة من دوال الـ API مثل GetAsyncKeyState لمعرفة حالة الزر إذا كان مضغوطاً او لا وليس من الضروري ان يكون برنامجك نشطاً في المرفقات مثال على ذلك ويمكن تحدد الزر عن طريق الكود Asc("S") فيمكنك تغيير الحرف S بالحرف الذي تريده مع مراعاة ان يك…

انا لا املك واحداً لذا لا استطيع إفادتك الإفادة التامة لكن جرب دالة JoyStick وهذا مثال لإستخدامها من برنامج API-Guide ( إن لم يكن عندك هذا البرنامج فأحرص على الحصول عليه فمن خلاله تستطيع اكتشاف الكثير من دوال الـ API ) ' defines and structures Const JOY_BUTTON…

حسناً , قمت بتعديل المثال بما فهمته من المطلوب , إن لم يتم تحقيق المطلوب ارجوا توضيح الفكرة بمثال بالتوفيق ,,, loding2.rar

لنفترض ان السنة ستُكتب في Text1 ويتم الضغط على الزر Command3 للفلترة بالسنة المكتوبة Private Sub Command3_Click() Adodc1.RecordSource = "Select * From Employes Where Right(Number,(Len(Number)-instr(Number,'/')))='" & Text1.Text & "'" Adodc1.Refresh End Sub

حسناً , الان فهمت المطلوب قليلاً لكن عندي استفسارين : 1- افهم من هذه النقطة انه سيتم توزيع المبالغ الموجوده في جدول مراكز التكلفة على المشاريع القائمة في جدول المشاريع إذاً فالمطلوب إضافة المبالغ الى حقل في جدول المشاريع فلماذا تريد تعديل جدول مراكز التكلفة ول…

ولماذا تستخدم هذا النوع الصعب , يمكنك ربط ملف اكسس بطريقة سهلة بإستخدام الـ Adodc بالكود التالي : Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\MyDatabase.mdb;Persist Security Info=False" Adodc1.Refresh ثم تضع قاعدة ا…

يمكن هذا من خلال استخدام قاعدة بيانات mysql حيث ترفع البرنامج كملف في قاعدة البيانات وتضع بياناته ورقم الإصدار ويقوم كود التحديث بالتأكد من رقم الإصدار فإن وجد انه يوجد إصدار جديد في قاعدة البيانات يقوم بتحميله يمكنك الحصول على قاعدة بيانات mysql مجانية من موق…

هذا مثال وجدته عندي ربما يفيدك شيئ منه البحث عن ملفات.rar