مساعدة / طريقة عمل بحث وحفظ وطباعة - نسخة قابلة للطباعة +- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb) +-- قسم : قسم قواعد البيانات (http://vb4arb.com/vb/forumdisplay.php?fid=40) +--- قسم : قسم اسئلة vb6.0 المتعلقة بقواعد البيانات (http://vb4arb.com/vb/forumdisplay.php?fid=72) +--- الموضوع : مساعدة / طريقة عمل بحث وحفظ وطباعة (/showthread.php?tid=4534) |
مساعدة / طريقة عمل بحث وحفظ وطباعة - سآره - 28-09-12 السلام عليكم هذهـ صورة من قاعدة البيآنات الي عملتهآ http://up.arab-x.com/May12/R0i75378.jpg واستطعت أن أعمل للبرنامج ( اضافة ، وتعديل ، وحذف ) وربطها بقاعدة البيانات بس ماقدرت اربط ( بحث و حفظ وطباعة ) يطلع لي خطاء كل مرة وهل استطيع ان اضع قائمة بالاسفل يستخرج لي كافة المشاريع بدل مشروع مشروع Private Sub Command1_Click() Data1.Recordset.AddNew End Sub Private Sub Command2_Click() Data1.Refresh End Sub Private Sub Command3_Click() On Error GoTo data_error If MsgBox("هل تريد حذف السجل بالتأكيد؟", vbQuestion + vbYesNo, "تاكيد الحذف") = vbYes Then Data1.Recordset.Delete Data1.Recordset.MoveNext End If Exit Sub data_error: MsgBox "لم يبقى سجلات", vbCritical, "خطأ" End Sub . . . للمعلومية اسم قاعدة البيانات ( جدول المشاريع الجارية ) مرفق لكم مساعدة / طريقة عمل بحث وحفظ وطباعة - albahr852000 - 04-10-12 جربت تضغط علي حفظ بدون وضع بيانات جرب لان الكود اللي انت كاتبه ممكن يكون فيه مشكله اذا ضغط علي حفظ قبل ان تضغط علي ادخال جديد مساعدة / طريقة عمل بحث وحفظ وطباعة - حسن العراقي - 08-10-12 السلام عليكم ارسلي المشروع كامل وسوف نساعدك في حل مشكلتك ان شاء الله |