problem with insert query

[condor]

Hello ..

I made a program that has insert , update and delete ... am using VS.NET 2003 and sql 2000 ... the following code that i use it for insert ...

If (txtEqCode.Text <> "" AndAlso txtVichNo.Text <> "") Then
With danew.InsertCommand
.CommandText = "INSERT INTO main (Code, Plateno, Serialno,Model,ki,Description,Specification,Note) VALUES (@Code, @Plateno, @Model,@ki,@Description,@Specification,@Note)"
.Parameters.Add("@Code", txtEqCode.Text)
.Parameters.Add("@Plateno", txtVichNo.Text)
.Parameters.Add("@Serialno", txtCods.Text)
.Parameters.Add("@Model", txtModel.Text)
.Parameters.Add("@ki", txt_eq_type.Text)
.Parameters.Add("@Description", txt_eq_des.Text)
.Parameters.Add("@Specification", txtSpec.Text)
.Parameters.Add("@Note", txtRemark.Text)
End With
danew.InsertCommand.ExecuteNonQuery()

and it give an error .. can anybody help me with that plz..


Regards

 

[fpineda101]

Put the command inside a try/catch block. Messagebox the error and post the error on the forum, pls

 

[BadgerByte]

Hey,

I can give you an answer, which may be the cause...

You've missed the SerialNo parameter From the value list in the SQL statement.

 

[kulrom]

Hello Condor,
WHere are you from my friend?
I am sking cuz i noticed some words very familiar to me .. 'plateno' for example lol

 

[condor]

Mr. fpineda101

The following is the code i used and the msg error...

Try
If (txtEqCode.Text <> "" AndAlso txtVichNo.Text <> "") Then
With danew.InsertCommand
.CommandText = "INSERT INTO new_equip (eqcode, plateno, seralno,model,ki,Description,spec,Note) VALUES (@eqcode, @plateno,@seralno, @model,@ki,@Description,@spec,@Note)"
.Parameters.Add("@eqcode", txtEqCode.Text)
.Parameters.Add("@plateno", txtVichNo.Text)
.Parameters.Add("@seralno", txtCods.Text)
.Parameters.Add("@model", txtModel.Text)
.Parameters.Add("@ki", txt_eq_type.Text)
.Parameters.Add("@Description", txt_eq_des.Text)
.Parameters.Add("@spec", txtSpec.Text)
.Parameters.Add("@Note", txtRemark.Text)
End With
danew.InsertCommand.ExecuteNonQuery()
 
 
MsgBox("تمـت عمليـة الإضـافة بنجــاح", MsgBoxStyle.Exclamation, "")
Else
MessageBox.Show("لم تقم بإدخـال كـود المعـدة ورقمـها", " إدارة المعــدات", MessageBoxButtons.OK, MessageBoxIcon.Error)
End If
ClearTextBoxz()
 
Catch exception As System.Data.SqlClient.SqlException
MsgBox(exception.ToString, MsgBoxStyle.Critical)
 
End Try

 

[BadgerByte]

Hey again,

Are you using an SQLCommand generated by Visual Studio?
Either way I'm pretty sure you should only be adding the parameters once after that you should use:

Command1.Parameters("@param1").Value = "test"

Hope this helps,

Andy

 

[condor]

i appreciate your helps .. it's work .. thanx


Regards

 

[condor]

Hello kulrom ..

nice to meet you am from syria and i live in Qatar