GHOST2010

ممكن اعرف اسماء الحقول الموجودة فى القاعدة حتى اتمكن من كتابة الكود؟ :rolleyes:

اخى اظن ان هذا الكود هو المسؤل عن اخراج الملفات من ملف المورد الموجود داخل البرنامج والدالة Put هى المسؤلة عن الكتابة فى الملفات المفتوحة للغرض الثنائى وهى تعمل عمل الدالة Print هذا كل مااعرفه.

اداة رائعة فعلاً شكراً لك :rolleyes:

نسيت اقوللك لو حبيت تتجاهل حالة الاحرف اكتب الجملة Option Compare Text فى قسم التصريحات العامة :rolleyes:

جرب هذا الكود Private Sub DeleteRepeatedFiles() Dim C1 As Integer, F1 As String, C2 As Integer, F2 As String, D As Integer Do While C1 <= Combo1.ListCount - 2 DoEvents C2 = C1 + 1 F1 = Combo1.List(C1) Do While C2 <= Combo1.ListCount - 1 DoEvents F2 = Combo1.Li…

طول ماانت سى شارباوى يبقى توقع انك تنسى حتى اسمك :lol:

السلام عليكم ورحمة الله وبركاته عندى سؤال محيرنى المفروض انى لما اجى اغير الصورة الرمزية بيبقى ليا اختيار ان الصورة تكون متحركة GIF. لكن لما اغيرها مابتتحركش......ممكن اعرف السبب؟! :wacko:

انســـــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــى :lol:

ليه كده بس ياعم طارق انا بعتتلك وانت ماعبرتنيش :angry:

السلام عليكم ورحمة الله وبركاته اخى الفاضل اصارحك اننى لااجيد التعامل مع جملة Select ولااحب استعمالها فأنا استخدم الحلقات التكرارية للبحث....كم تمنيت ان اساعدك انا اسف :( لكن اذا اردت كود البحث بواسطة الحلقات التكرارية وربط البحث بالليست بوكس فأنا مستعد وانا ا…

الحمد لله........الموضوع ده حسسنى انى اغبى انسان على وجه الارض لانى كل مااقوللك على حل مايكونش هو المطلوب لكن اخيرا قدرت اساعدك :lol: :lol:

12-الدالة IsWindowEnabled طريقة الاعلان: Private Declare Function IsWindowEnabled Lib "user32.dll" (ByVal hwnd As Long) As Long تعود هذه الدالة بالقيمة 1 اذا كانت الدالة ممكنة Enabled وتعود بالقيمة 0 اذا كانت الدالة غير ممكنة Disabled ونحدد النافذة المطلوبة عن…

تفضل يااخى الاداة ومعها ملف التسجيل الخاص بها :rolleyes: Xp.rar

شكرا لك اخى Semsem Basha وأعدك اننى سأبحث لك عن الحل 11-الدالة IsIconic طريقة الاعلان: Private Declare Function IsIconic Lib "user32.dll" (ByVal hwnd As Long) As Long هذه الدالة تخبرك مااذا كانت النافذة مصغرة فى شريط المهام ام لا وتحتاج لمعامل واحد وهو مقبض ال…

شكراً لتواجد الاستاذ عبدالله فتحى معنا فى هذا الموضوع وارجو منه ان يقوم بتثبيت الموضوع. 10-الدالة Beep طريقة الاعلان: Declare Function Beep Lib "kernel32.dll" (ByVal dwFreq As Long, ByVal dwDuration As Long) As Long تقوم هذه الدالة باخراج صوت على السماعة الداخ…

ومع المزيد 7-الدالة SetWindowText طريقة الكتابة: Declare Function SetWindowText Lib "user32.dll" Alias "SetWindowTextA" (ByVal hwnd As Long, ByVal lpString As String) As Long تمكنك هذه الدالة من تغيير خاصية Caption للنافذة التى تحددها وتحتاج لمعاملين هما 1-hwn…

وهذه دالة اخرى 6-الدالة GetForegroundWindow طريقة الكتابة: Private Declare Function GetForegroundWindow Lib "User32"() As Long هذه الدالة تعود بمقبض النافذة الظاهرة فى مقدمة الشاشة.

والى مزيد من الدوال 5-الدالة SetSystemTime طريقة كتابتها: Private Declare Function SetSystemTime Lib "kernel32.dll" (lpSystemTime As SYSTEMTIME) As Long ثم تعريف المتغير SYSTEMTIME Private Type SYSTEMTIME wYear As Integer wMonth As Integer wDayOfWeek As Intege…

عند البحث عن S يظهر لك كل الريكوردز التى تحتوى على هذا الحرف الا تريد ذلك؟! :unsure:

وانا اؤيد رأى اخى النبهانى فأنا أيضاً لااستخدم الاداة للربط :rolleyes: