omani

أخي الكريم أنظر المثال الموجود بالتوقيع عن التعامل مع الداتا اينفيرومنت تحياتي

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

بالنسبة لنسق التاريخ يمكن ذلك من خلال الدالة Format أما تفريغ البيانات منها فلا يمكن ذلك تحياتي

هذي هي الاداة والكراك مالها قم بتسجيل الاداة ثم أنسخ الكراك الى السيستم 32 system23 وشغل الكراك تحياتي actskn43.zip actskn43crk.zip

الوصلة في توقيعي أو ابحث في مشاركاتي تحياتي

أخي Openrecordset معناها فتح جدول أو استعلام ووضع الناتج في المتغيير المجوز من نفس النوع أما بالنسبة للثاني فهو تنفيذ الاستعلام المحدد سابقا تحياتي

بهذه الطريقة Rs.Field("Date")= DTPicker .Value

ولان الرابط الثاني ليس لديك إذا انت لم تقم بتثبيت الكريستال أساساً تحياتي

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

أخي الكريم حاول إضافة المكتبة التالية يدوياً من خلال الكمبوننت تبويب الكنترولس ربما تفلح النتيجة معاك اسم الملف craxdui.dll سوف تجدها في المسار التالي C:\Program Files\Common Files\Crystal Decisions\2.5\bin أو في المسار C:\Program Files\Seagate Software\Report…

بالنسبة للسؤال الثاني ضعي قاعدة البيانات بنفس مجلد البرنامج والاتصال بالطريقة التالية mydb = app.path & "/mydb.mdb" تحياتي

أخي إتبع الخطوات التالية 1- أفتح الفيجوال 2- إذهب الى قائمة Project أو إضغط CTRL+T 3- إختر الخيار Components تجده مباشرة بعد Refrences 4- في مربع الحوار الذي سيظهر إختر Designer 5- ستجد الكريستال قابعاً هناك قم بإضافته بالتأشير على علامة الصح الموجوة فيه ثم أن…

On error goto AAA حيث أن AAA موضع أن تختاره تحياتي

بالنسبة لسؤالك الاول أكتب الكود التالي في حدث الكوماند كليك Form1.PrintForm أما بالنسبة لسؤالك الثاني فتحتاج الى التعامل مع الريجيستري أو إنشاء ملف txt وفتحه باينري تحياتي

أختى عندك عطل بالريجيستري تبع الويندوز وبالتالي أتوقع أنك تحتاجين لاعادة تنزيل الويندوز مرة ثانية تحياتي

هذا مثالك بعد التحويل الى Ado من المفروض أن تقوم بإضافة مكتبة الادي أو في مشروعك قبل كتابة الاكواد وهذه المشكلة التي لديك قبل إرسال الموضوع تحياتي DATA.zip

أخي إذا قم بتسجيل ذات الاداة يدويا تحياتي

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

تحول بالطريقة التالية Set Rs= New adodb.recordset rs.open Sql ,db,adopenstatic,adoptimisic وفائدة set هي إعادة تهيئة المتغيير المحجوز تحياتي

في حدث الكليك في الكومبو أفتح الجدول الثاني من خلال جملة الاسكيوال التالية Dim rs as new adodb.Recordset rs.open "Select * from Table2 Where MyField= '" combo1.text & "',con,adopenstatic,adlockoptimisic تحياتي