ahmad kalil

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

السلام عليكــم ورحمـة الله وبركاتــه ،، تاكد من الكلمة المتعلقة بجملة sql هل معرفة string في قسم التعريفات او حاول وضع الكود مباشرة في الفورم وشوف هل يعمل الكود بالتوفيق ان شاء الله

السلام عليكــم ورحمـة الله وبركاتــه ،، بداية حياك الله ونحن اخوة في الله وخلينا من حكاية بش مهندس ارفقت مثال ان شاء الله يكون المطلوب project.rar

السلام عليكم ممكن ان تبقي الترقيم التلقائي كونك تربطه مباشرة مع جدول اخر واعتبرة كود البيع واعمل بجانبه ترقيم بواسطة كود لتكون العملية اقل ضررا ويسر الله امرك

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

السلام عليكــم ورحمـة الله وبركاتــه ،، ارفقت مثال معه قاعدة بيانات ملاحظة / لم اضاف لكل المواد اسعار project.rar

السلام عليكــم ورحمـة الله وبركاتــه ،، اين قاعدة البيانات في المثال والتي يجب ان تكون موجودة لقراة البيانات منها

السلام عليكــم ورحمـة الله وبركاتــه ،، اذا لتجنب تغير التاريخ في كل جهاز والذي هو في بعض الحالات مطلوب في حال كان تنسيق التاريخ في الاجهزة خطأ استخدام احدى دالات التاريخ في فجوالبيسك مثل DTPicker والتي تعطي تحكم بالتاريخ وكما مرفق في الملف وبالتوفيق اخ رجب Da…

السلام عليكــم ورحمـة الله وبركاتــه ،، حول تغير التالي من الويندوز من قائمة start control panel Regional language Regional Options ثم اختر English (united Kingdom)

السلام عليكــم ورحمـة الله وبركاتــه ،، ان كنت تقصد المجموع الكلي للراتب sqlss = "select sum(salary) as sum1 from table " If rs1.State = adStateOpen Then rs1.Close rs1.Open sqlss, db, adOpenKeyset, adLockPessimistic rs1.MoveFirst Me.Text1 = rs.Fields("sum1")

السلام عليكــم ورحمـة الله وبركاتــه ،، في البداية التوكل على الله واي مبتدا في اي مجال يحتاج معرفة عامة عنه مثلا البرمجة مافائدة البرمجة وهي توفير الجهد والوقت للمستخدم للبحث عن البيانات وكذلك خزنها ولكل لغة من لغات البرمجة قواعدها الخاصة والتي تختلف عن اللغة…

السلام عليكــم ورحمـة الله وبركاتــه ،، شكرا لاجاباتكم ولكن لتوضيح طرحي للسوؤل بسبب التالي If IsNull(Me.Text1) Then MsgBox " Pls Inter Plate No", vbCritical, "Data Entry" Exit Sub End If هنا عندما اضغط save والحقل فارغ لاتوجد به قيمه لاينفذ هذا الشرط ولكن عندم…

السلام عليكــم ورحمـة الله وبركاتــه ،، مالفرق بين الجملتين التاليتين if isnull(me.text1) then if (me.text1) = "" then ولكم الشكر

السلام عليكــم ورحمـة الله وبركاتــه ،، الاخ الاستاذ الطيب mrx انا اسف اذا كان طلبي غير واضح وهو فعلا كما تفضلت به Syntax للجملة وساقوم بمراجعة help ولكن لي ملاحظة حتى المشاركات التي قد تبتعد عن الموضع تبقى حتى نعرف الصحيح وقد تكون الاجابة هي طرف خيط يبدا به و…

السلام عليكــم ورحمـة الله وبركاتــه ،، نعم للافكار الجديدة وبارك الله فيكم وابداعكم ولي طلب في حالة كتابة اي جملة sql وكانت قاعدة البيانات اكسس يرجى توضيحها مع قاعدة بيانات sqlserver نعم هي نفس الجملة ولكن هناك تغير وجعل الله اعمالكم في ميزان حسناتكم حيث يندر…

السلام عليكــم ورحمـة الله وبركاتــه ،، هذا مثال على كيفية تحويل البيانات من felxgrid الى جدول في قاعدة البيانات sqls = "select * from itemdata " If rs.State = adStateOpen Then rs.Close rs.Open sqls, db, adOpenKeyset, adLockPessimistic For i = 1 To fg.Rows - 1…

السلام عليكــم ورحمـة الله وبركاتــه ،، اخي العزيز سابقا واجهتني نفس المشكلة وكان السبب هو في الفورم الرئيسي الذي هو بداية تشغيل البرنامج لم اضع الموديل الذي يغلق قاعدة البيانات اذا كانت مفتوحة ووضعت الكود التالي If db.State = adStateOpen Then db.Close db.Prov…

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

السلام عليكم ورحمة الله اخواني انا اعمل حاليا مع فجوال بيسك 6 وارغب بالتمهيد للانتقال الى فجوال بيسك نت حيث قمت بالذهاب للمكتبة فوجدت فجوال بيسك 8 فهل للاصدارات السابقة من نت مثلا 2003 او 2005 تحوي امور يجب التسلسل بها ام الانتقال الى اي اصدار لايضر وكذلك لاحظ…

السلام عليكم في البداية تحتاج لكود يجلب الاسماء كلها من الجدول ويضعها في combo1 بدون تكرار مثال sqls = "select distinct name from table " If rs.State = adStateOpen Then rs.Close rs.Open sqls, db, adOpenKeyset, adLockPessimistic If rs.EOF = True Then GoTo end1:…