مالخطاء في هذا الكود ( كود حفظ قيمه )

cmd.commandtype=commandtype.text;

بعد التعديل , إختفى الخطاء

لكن لم يتم حفظ البيانات في الداتا بيس !!!

RANDOOM كتب:

بعد التعديل , إختفى الخطاء

لكن لم يتم حفظ البيانات في الداتا بيس !!!

---------------

اخي قم بفتح الاتصال

con.Open()

cmd.ExecuteNonQuery()

con.Close()

في حالة لم يتم حل المشكلة كما أشارو لها الأخوان

الخطأ هذا = Data type mismatch in criteria expression

يدل على أنه مشكله في نوع الحقل يعني رقمي أو نصي

مثال للحقل الرقمي

insert into table1 (f1,f2) values ( " & textbox1.text & " , " & textbox2.text & ")

مثال للحقل النصي

insert into table1 (f1,f2) values ( '" & textbox1.text & "' , '" & textbox2.text & "')

أو الأفضل استخدام البارمتر مثال :

insert into table1 (f1,f2) values (@f1,@f2)
cmd.parameters.addwithvalue(@f1, textbox1.text)
cmd.parameters.addwithvalue(@f2, textbox2.text)


con.Open()
cmd.ExecuteNonQuery()
con.Close()

انا أدخل في الحقل بيانات نصيه ..

والكود

  STR = "INSERT INTO TABLE1 ( USERNAME , PASSWORD1 , PASSWORD2 , EMAIL ) VALUES  ( ' " + USERNAME + " ' , ' " + PASSWORD1 + " ' , ' " + PASSWORD2 + " ' , ' " + EMAIL + " ' ) "

هذآ هو الكود كآمل .. الان لا تظهر لي اخطا ولكن لايقوم بحفظ القيمه المدخله .. في الداتا بيس

   Imports System.Data.OleDb


Partial Class _Default
    Inherits System.Web.UI.Page


    Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim CON As OleDbConnection
        Dim CMD As OleDbCommand
        Dim STR, USERNAME, EMAIL, PASSWORD1, PASSWORD2 As String


        USERNAME = TextBox1.Text
        PASSWORD1 = TextBox2.Text
        PASSWORD2 = TextBox3.Text
        EMAIL = TextBox4.Text




        CON = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; data source=|datadirectory|\mydatabase.mdb")
        STR = "INSERT INTO TABLE1 ( USERNAME , PASSWORD1 , PASSWORD2 , EMAIL ) VALUES  ( ' " + USERNAME + " ' , ' " + PASSWORD1 + " ' , ' " + PASSWORD2 + " ' , ' " + EMAIL + " ' ) "
        CMD = New OleDbCommand(STR, CON)



        CON.Open()
        CMD.CommandType = Data.CommandType.Text

        CON.Close()

    End Sub

End Class

ضع

cmd.ExecuteNonQuery()

قبل أن تغلق الإتصال

_أبو حذيفة_ كتب:

ضع

cmd.ExecuteNonQuery()

قبل أن تغلق الإتصال

\

بالظبط هذآ اللي انا سويته قبل ,

ولكن يظهر لي هذآ الخطاء ..

http://img04.arabsh.com/uploads/image/2012/05/14/0e35404361f405.jpg

لكن في الكود اللي نسخته .. وضعت

 
        CMD.CommandType = Data.CommandType.Text

و اختفت رساله الخطاء !

لكن لا يقوم بالحفظ داخل الداتا بيس

RANDOOM كتب:

\

بالظبط هذآ اللي انا سويته قبل ,

ولكن يظهر لي هذآ الخطاء ..

http://img04.arabsh.com/uploads/image/2012/05/14/0e35404361f405.jpg

لكن في الكود اللي نسخته .. وضعت

 
        CMD.CommandType = Data.CommandType.Text

و اختفت رساله الخطاء !

لكن لا يقوم بالحفظ داخل الداتا بيس

اخي قم بارفاق المثال وسيتم لتعديل عليه ... والله المستعان

هذا هو المثال ...

WebSite14.rar

المشكلة في قاعدة البيانات

الحقول لا تقبل تكون فارغه ، والمثال بعد التعديل مرفق

WebSite14.rar

codenew كتب:

المشكلة في قاعدة البيانات

الحقول لا تقبل تكون فارغه ، والمثال بعد التعديل مرفق

بصرااآآحه مادري كيف اشكرك ..

جزاك الله خير والله يوفقك يارب :)

شكرا لكل اللي ردو وساعدوني . استفدت من ردودكم جميعا :)

العفو ،،،،، بالتوفيق