منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
ما المشكلة في كود الحفظ - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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=7268)



ما المشكلة في كود الحفظ - رضو - 06-12-12

رجاء من الاساتذه الاعزاء ايجاد لي حل لهذه المشكلة والتي هي انني لما اعمل حفظ في مشروعي يطلع لي رسالة ولما اغلق البرنامج واشغله من جديد لاقي اللي حفظته موجود رجا رجاء رجاء ساعدوني ولكم جزيل الشكر والتقدير



ما المشكلة في كود الحفظ - hago - 07-12-12

احى وضح بالضبط الخطأ فى اى فورم ؟؟
وضح مشكلتك لانى لم افهم !!


ما المشكلة في كود الحفظ - رضو - 07-12-12

تم حل المشكله


ما المشكلة في كود الحفظ - عبدالله الصافي - 08-12-12

رضو كتب :تم حل المشكله

[b]نرجو من الأخوة الأعضاء الكرام عندما تجد حل لمشكلتك أو سؤالك أن لا تحرم أخوانك من المعلومة لتعم الفائدة وتكون لك ثواب معلم العلم.[/b]


ما المشكلة في كود الحفظ - hago - 08-12-12

ولاتزعل نفسك اخى عبد الله Smile
هذا هو الكود
كود :
If rsin.State = 1 Then rsin.Close
SQL = "select * from STORES where STO_CODE =" & Text1.Text & ""
rsin.Open SQL, mydb1, adOpenKeyset, adLockOptimistic
If rsin.EOF Then
rsin.AddNew
rsin![STO_CODE] = Text1.Text
rsin![STO_NAME] = Text2.Text
rsin![STO_ADDRESE] = Text3.Text
rsin![STO_TEL] = Text4.Text
rsin![STO_FAX] = Text5.Text
rsin.Update
MsgBox "تمت عمليه الحفظ بنجاح", vbInformation
Else
MsgBox "هذا الرقم موجود مسبقاً", vbCritical
Text1.SetFocus
End If



ما المشكلة في كود الحفظ - رضو - 10-12-12

الحل هو اني عملت rsin.close عند نهاية كل صب للفورم التي فيها