Adel_N

السلام عليكم... عندي سؤال أتمنى ألاقي حل مبسط. أنا أستخدم ADO (أقصد ADODB.Connection و ADODB.Recordset) للاتصال بقاعدة بيانات Access وماعندي أي مشكلة في الاتصال وإجراء مختلف العمليات على قاعدة البيانات. كما أني لا أستخدم DataSet ولا أريد أن أتعلمها نهائياً. أص…

شكراً أخ micheal R jordan

استخدم دالة Round Dim number As Double number = 10.75251 MsgBox Round(number, 2)

نسيت أقول text1 عبارة عن مربع نص، أنا أستخدم VB6

أخي نقوم بتعريف متغير من نوع Boolean تخزن فيه القيمة true إذا كان النص يمثل عنوان بريدي صالح والقيمة false إذا كان البريد غير صالح. نسمي المتغير مثلاً valid ونعطيه قيمة ابتدائية false. ثم نأخذ النص حرفاً حرفاً وإذا عثرنا على @ في النص نغير قيمة المتغير إلى tru…

لا أعلم والله عن Data Report. آسف أنا مبتديء في التقارير عموماً.

sql = "SELECT * FROM table1 WHERE name='محمد' AND bplace = 'الرياض' AND bdate>=#1/1/2005# AND bdate<=#1/1/2006#" اسم الجدول table1 حقل الاسم Name حقل مكان الميلاد bplace حقل تاريخ الميلاد bdate أتمنى يشتغل معاك

أنا أستخدم الإصدار العاشر من Crystal Report.. وبين الإصدار العاشر والثامن فروق كثيرة جداً. لن يعمل معك الكود الذي كتبته أنا في الأعلى. إذا كنت تملك الإصدار العاشر جرب وأبلغني بالرد. الكود شغال وهي طريقة معروفة وأنا متأكد منها. أخوك.

إذا كنت تستخدم برامج Crystal Report وصممت التقرير Em1.rpt وقاعدة البيانات هي m.mdb والجدول em والحقل ID. وتريد عرض/طباعة تقرير عن الموظف صاحب ID الذي يوافق ماهو موجود في مربع النص text1 وقد أضفت أداة CrystalActiveXReportViewer واسمها CR1 ... اتبع التالي: Dim A…

السلام عليكم ورحمة الله.. عندي قاعدة بيانات Access اتصل بها باستخدام ADO. فيها جدول Vac فيه حقل مفهرس لا يقبل التكرار ID. في البرنامج زر يضيف سجل جديد ودالة GetLastID ترجع آخر ID مسجل أقوم بإضافة 1 عليها لإدراج رقم تسلسلي في الحقل ID. مثلاً عند إضافة سجل جديد:…

ليس لدي خبرة في التقارير. ولم أستخدم Crystal Report إلى الآن للأسف. آسف أخي العزيز.

أنا مبتديء أيضاً وربنا معانا. افترض أنك تتصل بقاعدة بيانات Access اسمها "m.mdb" موجودة على نفس دليل البرنامج. بها جدول اسمه "em" يحتوي الحقول "ID" و "Name". وافترض أنك تستخدم في الاتصال Microsoft ADO data Control و Microsoft.Jet.OLEDB.4.0. في الحدث Load للنموذ…

يا عزيزي لا أملك جميع الملفات المكتبية dll لتشغيل برنامجك ولكن: هل استعلمت؟ أي هل قمت بكتابة جملة SQL أو ماشابه ذلك لكي تختار فقط الموظف الذي تريد أن تطبع بياناته؟ مثلا: Dim sql As String sql = "select * from tappp where t1='" & Text1 & "'"

لقد عثرت على جواب السؤال الأول بقليل من التحليل. وأظنه يكمن في دالة Date نفسها. ولكن بحاجة إلى جواب السؤال الثاني.

السلام عليكم أستخدم Visual Basic 6.0 والمحرك Microsoft.Jet.OLEDB.4.0 للاتصال بقاعدة بيانات Access. أكتب عبارات SQL في Visual Basic. مشاكل كثيرة جداً تواجهني في عبارات SQL المتعلقة بالتاريخ سواء استخدمت التقويم الهجري أو الميلادي لا سيما حينما يكون اليوم من 1 إ…