الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

طبقت اول برنامج في قواعد البيانات وفشلت في تنفيذه ____ انقذوني

بدأه شرقرق1 في 27 يوليو 2008 · 6 رد · 1,351 مشاهدة · في قسم قواعد البيانات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

بسم الله الرحمن الرحيم

السلام عليكم جميعــا ..... مشرفين واعضــــاء المنتدى

أولا : اخوكـــــم عضــــو جديـــد

ثانيــا : مبرمج مبتدي ( عليمي )

وبصراحة انا من عشاق البرمجة وخصوصا قواعد البيانات وقد استفدت الكثير من هذال الموقع ومن مشاركات وبعض الكتب لأعضــا ء هذا المنتدى فلهـــم جميعـــا كل الشكــــر وجعل ذلك في موازين حسناتهم

الأخت : مبرمجة ناوية تحترف

انا مبتدي مثلك ونفس المشروع اللي تستخدمينه انا استخدمه في التطبيق ولكن تظهر عندي مشكلة

والسؤال موضح في المرفقات وجميع البرنامج موجود في المرفقات ارجو المساعدة منكم جميعا ( ملف وورد مشروح في المشكل بالصور وايضا البرنامج بالكامل )

_________.rar

#2

لاتبخلون علينا بردودكم والا مافهمتوا المشكلة

المشكلة ظهور هالرسالة : Run Tim error :3001

الوسائط من النوع الخطأ أوخارج النطاق المقبول أوتعارض بعضها البعض

#3

تكفــــــــــــــــــــــــــــــــــــــــــــــون ياشبــــــــــــــــــــــــــاب ســـــأعدوني وين الهمـــــــــــــــــــــــــة ؟؟؟؟؟؟؟

#4

ماحد عطني وجه

#5 
  1.  
  2.  SQLs = "SELECT * FROM Emp where EmpNo='" & Text4.Text & "';"
  3.  If RS.State = adStateOpen Then RS.Close
  4.  RS.Open SQLs, DB, adOpenDynamic, adLockOptimistic
  5.  If RS.EOF Then
  6.  GoTo OKADDNEW:
  7.  Else
  8.  MsgBox "رقم الموظف موجود مسبقا", vbCritical + vbMsgBoxRight, "خطأ"
  9.  Exit Sub
  10.  End If
  11.  
  12. OKADDNEW:
  13.  RS.AddNew
  14.  If Not Text1 = "" Then RS![FirstName] = Text1
  15.   If Not Text2 = "" Then RS![FatherName] = Text2
  16.   If Not Text3 = "" Then RS![GrandName] = Text3
  17.   If Not Text4 = "" Then RS![EmpNo] = Text4
  18.   If Not Text5 = "" Then RS![FamliyName] = Text5
  19.   If Not Text6 = "" Then RS![Job] = Text6
  20.  RS.Update
  21.  MsgBox "تم حفظ البيانات Èنجاح", vbInformation + vbMsgBoxRight, "حفظ"
  22.  
  23.  
  24.  
  25.  

ملاحظة : انتبه للمسافات الزائدة في جملة SQL وفي أسماء الحقول ..

      
تم تعديل هذه المشاركة بواسطة المبرمج أحمد في 3 أغسطس 2008 في 07:37

      

      
سبحان الله وبحمده ... سبحان الله العظيم

    

  

    
    

      
#6
        
        

      
الف الف شكـــــر ويعطيك العافية

      
      

      
    

  

    
    

      
#7
        
        

      
مشكــــــــــــــور يأستـــــــاذي العزيــــــز : أحمـــــد   وجعل الله ذلك في موازين حسناتك

      
      

      
    

  

    
    
    
 مواضيع مشابهة





  

    
عدد الزوار حالياً
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

    
—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

    
جارٍ التحقق من المتواجدين…