omani

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

أخي الكريم : هناك خيار في اعدادات الطابعة المذكورة اسمه fanfold 210x305 mm وهذا الخيار ينفع للورق المذكور الذي تكرمت بذكره اتبع الخطوات التالية اذهب الى لوحة التحكم ثم الطابعات ثم اضغط بالماوس الايمن على الطابعة ومنها اختر properties او خصائص في مربع الحوار ال…

اولا الصورة من اين مصدرها ؟؟؟؟ في المثال السابق فقط اختر مصدر الصورة .. هل تقصد الصورة في قاعدة البيانات ام ماذا ؟؟ فأنا لم افهم ماتريد بالضبط تحياتي

اخي الكريم هناك نقص في احد اغلاقات IF والصحيح هو كالتالي Private Sub Command1_Click() day1 = cmb1.Text day2 = Cmb2.Text mon1 = cmb3.Text mon2 = cmb4.Text yer1 = Txt1.Text yer2 = Txt2.Text If day2 < day1 Then Txt3.Text = (day2 + 30) - day1 Else Txt3.Text = day2…

اخي الكريم : قم برفع المثال لنرى كيف قمت بتصميم قاعدة البيانات .. وعلى اي اساس قمت بربط البيانات تحياتي

اخي هناك مثال قديم لي في كيفية الترقيم التلقائي لتقارير الداتا ريبورت . فأبحث عنه في المنتدى او انظر في توقيعي لعله باق . اما عن كيفية عمل الملخص في تقارير الداتا ريبورت فهذه لا اعتقد انها ممكنه لان تقارير الداتا ريبورت عقيمة ولا تدعم التقارير الفرعية . وقد هج…

اخي ارفع المثال . وعلى ضوءه ستتم الاجابة فالمسألة هنا مجرد احتمالات بحيث اننا نقول لك استتخدم فلتر او ارسل جملة اسكيو ال او ماذا !!! ولكن عند رؤية المثال نستطيع الاجابة على استفسارك .. تحياتي

اخي الكريم : لماذا البيانات تكررت في الجدولين فما الداعي لذلك عموما قم بانشاء استعلام من الجدولين وابني التقرير عليه . هذه طريقة اسهل لك إذا كنت تتعامل مع قواعد البيانات اكسيس او اكتب جملة SQL لتقوم بذلك العمل تحياتي

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

اذا كنت تقصد الترجمه فانت تحتاج الى قاعدة بيانات لتخزين الكلمات الانجليزية ومرادفها باللغة الاخرى . وعند كتابة الكلمة تبحث عنها من قاعدة البيانات وتقوم باظهار المرادف تحياتي

يوجد في هذا الرابط العديد من الامثلة أتمنى ان يخدمك بعضها http://www.contractcaddgroup.com/download/ تقبل تحياتي

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

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

اخي الكريم استخدم الدالة filelen لارجاع حجم الملف بالبايت وهذا مثال سريع لارجال حجم الملف بالكيلو بايت Dim FSize As Long FSize = FileLen("c:\fieName.exe") MsgBox "File size:" & Round((FSize / 1024), 1) & " kb" fieName.exe = اسم ونوع الملف المطلوب . اي بمعنى ان…

ما المقصود بالتواقيع الرقمية ؟ هل تقصد تواقيع مستخدمي البرنامج .؟ ام قيم تسجيل البرنامج ام ماذا بالضبط ؟ تحياتي

اخي الكريم : أنشئه كتقرير فرعي والحقة بتقريرك ... هذا اذا كنت تعمل على الكريستال ريبورت سوف يكون لديك تقرير ملخص تضع فيه ما تشاء ... وهناك خيارات من خلالها تحدده كصفحة مستقله لك التحية

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

اخي الكريم جرب هذا الكود datPrimaryRS.Recordset.Find "FUCTION='" & 3 & "' And YYYY>" & 400 & "" تحياتي

اخي الكريم هذا الكود ع السريع ولكنني لم اجربه Dim mypath As String Dim Newpath As String mypath = "c:\dd\DataBase.mdb" If Dir(mypath) = "" Then MsgBox " قاعدة البيانات غير موجودة" Newpath = InputBox("ادخل مسار قاعدة البيانات من فضلك ", , "C:\database.mdb") myp…

اخي الكريم .. SUBREPORT موجوده في جميع اصدارات الكريستال من السابع فاعلى اعتقد .. فانا لم اتعامل مع الكريستال الا من خلال الاصدار الثامن الى الحادي عشر وطريقة انشاء التقرير الفرعي او السب ريبورت ... ستجد في الادوات خيار يحمل نفس الاسم SUBREPORT ومن خلاله يمكنك…