أحمد الحربي

لنفترض الآتي : اسم الجدول = tbl1 اسم الحقل = field1 ونوع بيانات (رقم) ونموذج مصدر سجلاته هذا الجدول وبه هذا الحقل فاستخدم الكود التالي في زر أمر مثلاً : Dim NomberMax As Long Dim msg1 As String Dim msg2 As String Dim MainMsg As String NomberMax = Nz(DMax("[fie…

اقرأ هنا .. ربما تستفيد أو تجد الحل http://www.arabteam2000.com/forums/index.php?showtopic=66225

الإخوة الكرام .. الدالتان Int و Fix لا تقربان الأعداد في حالة كون العدد موجب فمثلاً مع العدد (13.49) ستعيد كلا الدالتين العدد 13 ولكن يعملان مع العدد السالب ، فمثلاً العدد (13.49-) ستعيد الدالة Fix العدد 13 ، وتعيد الدالة Int العدد 14

أخي الكريم .. كما في صورة الكود المرفق ، فقد قمتَ بالدمج بين DAO و ADO ، وهذا لا يمكن ، فأنت أعلنت عن قاعدة من خلال الأداة DAO بهذا السطر : Dim DB1 As Database ثم قمت بإسناده إلى القاعدة الحالية : Set DB1= CurrentDB ثم قمت باستخدامه في ADO في المتغير CurConn ف…

في النموذج الأول ضع حقلاً وأخفه (مرئي=لا) ، وليكن باسم tmstart خصائص النموذج : في حدث (عند الفتح) ضع الكود التالي : Dim startTime As Date Me.tmstart = DateAdd("H", 1, Time) في حدث (عند عداد الوقت) ضع الكود التالي : Dim LastTime As Date LastTime = Time() If Me.…

اجعل ملف القاعدة (داتا) الذي على السيرفر على وضع مشاركة .. من قائمة أداوات ثم خيارات ثم خيارات متقدمة ، في قسم وضع الفتح الافتراضي (حدد مشترك) ولا تتيح للمستخدمين الآخرين أن يفتحوا القاعدة من أجهزتهم بوضع (خاص)

أنا أنشيء الصفحات في فيجوال إنتر دف

أخي طارق .. قمتُ بحذف فيجوال ستوديو 2005 ، ثم بحذف IIS وإعادته .. ولكن لا فائدة في الويندوز الآخر حين أكتب localhost يأتيني بصفحات البداية لـ IIS .. ولكن في هذا الويندوز لا يأتي إلا بصفحة خطأ .. مما يؤكد أنه لا يشغل صفحات ASP سؤالي الآن .. عندما يشغل IIS صفحات…

أخي الباش مهندس .. لقد قمت بإعادة تثبيت IIS من جديد ولكن المشكلة كما هي أخي طارق .. لم أجد الملف aspnet_regiis.exe في المسار C:\WINNT\Microsoft.NET\Framework\v1.0.3705\aspnet_regiis.exe -i وفي الحقيقة أخي طارق أنا لم أنشأ صفحة asp من خلال الدوت نت مع أنه مثبت …

أخي الكريم .. محب ASP عملت له مشاركة ويب شير وأضفته ، ولكن كيف أتأكد من أن IIS يعمل .. أفيدك أخي الكريم أن جهازي يحتوي على ويندوز إكس بي آخر وصفحة ASP تعمل بلا مشاكل ، لكن على هذا الويندوز لا تعمل ، حقيقة لا أدري أين المشكلة ، ولكن هل لأني حملت فيجوال ستوديو ن…

الإخوة الكرام السلام عليكم صفحة البدء وضعتها في iis باسم index.asp ، لكنها لا تظهر وإنما يعطي خطأ في العثور على الصفحة ، فإذا وضعتها باسم index.htm لا تحدث المشكلة الخلاصة أن أي صفحة asp لا يمكن إظهارها ؟ أيضاً فيجوال انتر دف لا يستجيب عند إنشاء مشروع جديد لـ …

أخي الكريم هل قرأت تعليمات المشاركة في المنتدى ؟؟ اختر عنواناً مناسباً لموضوعك (المشكلة) قبل أن يتم إغلاقه

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

أستاذنا المشرف الموقر .. newbie شكراً لك وبارك الله فيك

الإخوة الكرام .. السلام عليكم ورحمة الله حصلت على ويندوز 2003 سيرفر .. الإصدار التجريبي لمدة 180 يوماً ، وأريد تركيبه في جهازي لدي في الجهاز الآن التالي : الـ C ، وبه ويندوز إكس بي بروفيشنال (هذا أقوم بالتجارب عليه) الـ D ، وبه ويندوز إكس بي بروفيشنال (هذا الم…

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

أوووووووه .. يا أخي الكريم tarekafifi تجربة رائعة بحق .. وخلاصة مفيدة للغاية .. أنا الآن أحاول أن أتعلم لغة VB.Net ولكن .. لنتباحث الصدمات الكهربائية التي تعرض لها برنامجك .. ------------------ الصدمة الأولي : -------------- يتضمن تصميم البرنامج خواص وأدوات مت…

أستاذنا القديم .. ابن مسقط العين ما تعلو على الحاجب .. ومنك تعلمنا ----------=-=----------- الموقر .. KETTANEH بورك فيك وحياك الله

طبعاً الكود الأول .. هذا لك أنت لكي يتم وضع مسار المراجع في الجدول tblReferenceNameOnThisDB الموجود في نفس القاعدة لا في قاعدة أخرى .. فبعد أن تنتهي من كل شيء وتريد أن تحمل البرنامج إلى جهاز آخر .. قم بتشغيل هذا الكود .. الكود الثاني . لابد أن يكون تلقائياً ..…

حول السطر التالي : Set rst = db.OpenRecordset("SELECT * FROM Quiry WHERE Nationality = Me.Nationality AND Married = True AND Employment = Me.Employment") إلى : Dim sq As String sq = "SELECT * FROM Quiry WHERE Nationality =" & Me.Nationality sq = sq & " AND Mar…