المبرمج أحمد

تم مناقشة الموضوع أكثر من مرة في القسم .. غالبًا المشكلة أنك حددت مسار قاعدة البيانات بالتفصيل ( مثل D:\Ahmed\main.mdb ) ، أما لو حاولت أنك تشغل البرنامج من مسار ثاني أو على جهاز ثاني البرنامج لن يجد قاعدة البيانات . الحل في استخدم App.path لتحديد مسار مجلد ال…

التعديل باللون الأحمر : <marquee id="mar" scrollamount=2 bgcolor="#ccffff" direction=right scrolldelay=2 onmouseover="document.all.mar.stop()" onmouseout="document.all.mar.start()" style="width: 60%; height: 1px; background-color: transparent; font-size: 8pt; …

بسم الله الرحمن الرحيم تمت الإجابة على الموضوع إدارة الفريق العربي للبرمجة

هذا هو كود الحدث Form Load ( ستجد التعديلات التي أجريتها باللون الأحمر ) : Private Sub Form_Load() Call Main If rs.State = 1 Then rs.Close rs.Open "Select * from tbl", cn, adOpenStatic, adLockPessimistic If rs.RecordCount = 0 Then Beep Exit Sub End If Do While…

غالبًا أنها أداة Label أو أداة Text ..

اكتب التالي في خاصية Connect للأداة Data MS Access;pwd=Password مع كتابة كلمة السر بدل Password

الملف بعد التعديل Contact2003.zip

بس ممكن تشرح ماذا تريد من جملة SQL التالية ( ما هي المهمة الأساسية التي تريد تنفيذها هنا ) : sql = "INSERT INTO Report( AccNo, Period, Debit, Credit )" & _ "SELECT AccNo, Period, Sum(Debit) AS SUM1, Sum(Credit) AS SUM2 " & _ "FROM JDetail GROUP BY AccNo, Perio…

تفضل أخي طلبك في المرفقات ولاحياة مع اليأس :) MetaStock.zip

استخدمي العامل / بدل \ ، كالتالي : we![two] = Val(Text2) * 2 / 100 الفرق بينهما أن / تعيد قيمة Double ( بفاصلة عشرية ) ، بينما \ تعيد Integer ( عدد صحيح ) ، كما في المثال التالي : 15 / 4 = 3.75 15 \ 4 = 3

لا توجد أي مشاكل مع شريط التقدم في المشروع المرفق ..

هل من الممكن ارفاق مشروعك هنا لألقي نظرة على المشكلة؟ * ملاحظة صغيرة : تأكد من قيمة RecordCount أثناء تنفيذ الكود ، قد تكون هي المشكلة .

جرب الكود التالي : Bar1.Max = 100 Bar1.Value = 0 Dim count as Integer count=0 Do while not rsm.EOF ... ... count = count + 1 Bar1.Value = Cint((count/rsm.RecordCount) * 100) Loop

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

هل هناك خطأ في الكود ؟ * * * * * * * * * * * * ملاحظة صغيرة : ضع السطر Bar1.Value = 0 قبل Do while وليس بعدها ..

ما هي طريقة ربط برنامج بقاعدة البيانات ( Data Control , ADO , DAO ) ؟

لا تحسب أن جميع الأعضاء ساذجون لتضع ملف تجسسي فهذه الألاعيب مكشوفة

ما هي آلية الدفع الإلكتروني Electronic Payment

غالبًا الفيروسات تصنع مفتاح Registry في المسار التالي ( لكي يسمح لها بالعمل فور عمل الجهاز ) : HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run وبالنسبة لبرنامج الكاسبر فأنا حملته من موقع الكاسبر مباشرة بدون تسجيل ولا حاجة ..

هناك موقع آخر يعطيك دومين مجاني ( .co.cc ) ، ميزته أنك تستطيع ربطه بأي استضافة كأنه دومين عادي.