MANSUR

يعطيك العافية اخوي ابو حمود . بس ممكن سؤال .. هل الكود الاول على الـ VBA يعني في الاكسيس؟ لأني اشوف (امر0 )

شكرا اخ هاني ننتظر التطبيق العملي او الامثله . :)

شكرا يعطيك العافية .. ;)

:mad: :eek:

فعلا ان دائما استعمل الكريستال ريبورت وفعلا حجم ملفات dll المرفق لتشغيل التقرير ... ايضا هناك أداة من شركة http://www.suprasoft.com تعتبر أداة مساعد حيث تصمم التقارير بالكريستال ثم تستدعي التقرير والميزه ان التقرير يكون في نفس الفورم وليس منفصل . وتحدد حجم عرض…

جرب هالكود ممكن يخدمك INDMCC = "Invo_number=" ' اذا كان المبحوث عنه رقم '---------------------------- SearchStr$ = Form1.Text1.Text INDMCC = "Cust_Name Like '*" 'المبحوث عنه اسم سيحضر لك حتى لو ادخلت جزء من الاسم ends = "*'" Form1.Data1.Recordset.FindFirst (IN…

هذه هي الصفوفة بشكل مبسط عبارة عن مجموعة من الرموز تقوم بستدعائها بالرقم كما فعلنا بالامر Print حيث سيطبع المز رقم 2 وهو C لأن المصفوفة تبدأ من الصفر . mybord = Array("A", "B", "C", "D", "E", "F", "G", "H", "I", "J", "K", "L") Print mybord(2) طارق ... أرجو ان …

الله يعطيك العافية ... الحقيقة كود مهم وممتاز وانا كنت ابحث عنه . شكر اخي العزيز:rolleyes:

ايميلي ... Mansurcc@yahoo.com [movel]Mansurcc@yahoo.com[/movel]

هذا الكود لتشغيل ملفات الصوت . Private Const SND_APPLICATION = &H80 ' look for application specific association Private Const SND_ALIAS = &H10000 ' name is a WIN.INI [sounds] entry Private Const SND_ALIAS_ID = &H110000 ' name is a WIN.INI [sounds] entry identi…

اشكر التكرم بالاجابة انا اقصد انني اقوم بتحديد Ide_MSG ثم حدد لها Cstring هذا ما فائدته يعني لماذا لم ابدأ مباشره بوضع الكود الخاص بالرسالة ؟؟ في الـ ++C نضع الأداة ثم نذهب الى الـ Class Wizerd ونعرفه بهذا التعريف بينما بالـ VB نكتب الكود تحت الاداة مباشرة .. …

ما فيه احد يعرف .... اقل شي دلونا على موقع يشرحه لو انجليزي .. شكرا شباب

طيب الله يوفقك . احسن شي خلي في مسار افترضي للاكسيس واذا ما لقاه يطلب من المستخدم تحديد مكانه ؟ ;)

اعتقد ان المقصود اضافة وقت التشغيل .. بعد وضع الصورة على الفورم ضعي مربع نص ومن الخصائص غيري قيمة الـ Index الى 0 بعد ذلك ضعي زر امر والصقي الكود الاتي تحته Load text1(1) text1(1).Top = 700 text1(1).Left = 600 سيقوم الكود السابق بإنشاء مربع نص اخر وقت التشغيل …

جرب هذا الكود السطر الاول للتقرير الثاني والثالث للتنشيط Me.CrystalDesign1.ReportName = App.path + "" + FileName CrystalDesign1.Active = False CrystalDesign1.Active = True ملاحظة : هذا الكود الخاص بالتنشيط هو لاداة التقارير من شركة خارجية .. اعتقد ان الكود الخ…

جرب Form1.Data1.RecordSource = "select * from" &_ Faild & " where " & nam & " ='" & Text1 & "' " & _ "AND sab_dat_day>=" & Combo1.Text & "and _ sab_dat_day<=" & Combo4.Text & "and sab_dat_mon=" &_ Combo2.Text & "and sab_dat_mon=" & Combo5.Text &_ "and sab_dat_…

vbs فجول بيسك اسكربت .. وليست فجول بيسك *.exe

طريقة نقل بيانات من جدول الى جدول ثاني وقت التشغيل Count_Num = Form1.Data1.Recordset.RecordCount For dat = 1 To Count_Num Form2.Data1.Recordset.AddNew With Form2 .Text1 = Form1.Text1 .Text2 = Form1.Text2 End With Form2.Data1.Recordset.Update Form1.Data1.Record…

جزاك الله خير اخ طلال وابشر .. ( من دل على هدى فله جره واجر من اتبعه ... الحديث ) :)

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