添加记录的错误问题~

Question

我在添加记录时,出现如下错误~~高手大哥们~帮忙呀~必须声明变量 '@ITEM_NOXX'。 
说明: 执行当前 Web 请求期间，出现未处理的异常。请检查堆栈跟踪信息，以了解有关该错误以及代码中导致错误的出处的详细信息。 
异常详细信息: System.Data.SqlClient.SqlException: 必须声明变量 '@ITEM_NOXX'。
源错误: 
行 295：        End With
行 296：
行 297：        Mycommand.ExecuteNonQuery()
行 298：
行 299：
 

Answer 1

Dim Mycommand As New SqlCommand
        Dim InsertString As String
        Dim ItemNoxxString As String
        ' 获得当前编号
        ItemNoxxString = GetNoxx("SELECT ISNULL(Max(ITEM_NOXX),'000') As Val FROM OR_ITEM", Now())        InsertString = "INSERT INTO  OR_ITEM (ITEM_NOXX, PONO_CODE, PPNO_CODE, INTR_NOXX, FSCD_CODE, VERS_NAME, ANAL_NAME, CHAN_NAME, ITEM_NAME,ORDR_QNTY,  WORK_USER, UPDT_DATE) "
        InsertString = InsertString & "VALUES (@ITEM_NOXX,@PONO_CODE,@PPNO_CODE,@INTR_NOXX,@FSCD_CODE,@VERS_NAME,@ANAL_NAME,@CHAN_NAME,@ITEM_NAME,@ORDR_QNTY,@WORK_USER,GETDATE())"        Mycommand.Parameters.Add(New SqlParameter("@ITEM_NOXX", SqlDbType.NVarChar, 11))
        Mycommand.Parameters.Add(New SqlParameter("@PONO_CODE", SqlDbType.NChar, 6))
        Mycommand.Parameters.Add(New SqlParameter("@PPNO_CODE", SqlDbType.Char, 7))
        Mycommand.Parameters.Add(New SqlParameter("@INTR_NOXX", SqlDbType.NVarChar, 20))
        Mycommand.Parameters.Add(New SqlParameter("@FSCD_CODE", SqlDbType.NVarChar, 20))
        Mycommand.Parameters.Add(New SqlParameter("@VERS_NAME", SqlDbType.NVarChar, 20))
        Mycommand.Parameters.Add(New SqlParameter("@ANAL_NAME", SqlDbType.NChar, 30))
        Mycommand.Parameters.Add(New SqlParameter("@CHAN_NAME", SqlDbType.NVarChar, 20))
        Mycommand.Parameters.Add(New SqlParameter("@ITEM_NAME", SqlDbType.NVarChar, 50))
        Mycommand.Parameters.Add(New SqlParameter("@ORDR_QNTY", SqlDbType.Int))
        Mycommand.Parameters.Add(New SqlParameter("@WORK_USER", SqlDbType.NChar, 10))        Mycommand.Parameters("@ITEM_NOXX").Value = ItemNoxxString
        Mycommand.Parameters("@PONO_CODE").Value = AddPotextbox.Text
        Mycommand.Parameters("@PPNO_CODE").Value = AddPPtextbox.Text
        Mycommand.Parameters("@INTR_NOXX").Value = AddIntrotextbox.Text
        Mycommand.Parameters("@FSCD_CODE").Value = AddFsctextbox.Text
        Mycommand.Parameters("@VERS_NAME").Value = AddVertextbox.Text
        Mycommand.Parameters("@ANAL_NAME").Value = AddAnalysttextbox.Text
        Mycommand.Parameters("@CHAN_NAME").Value = AddChaintextbox.Text
        Mycommand.Parameters("@ITEM_NAME").Value = AddVertextbox.Text
        Mycommand.Parameters("@ORDR_QNTY").Value = AddQtytextbox.Text
        Mycommand.Parameters("@WORK_USER").Value = Session("ID")

Answer 2

Mycommand和InsertString关联好了吗？

Answer 3

谢谢!!你提醒了我,是我重新定义了Mycommand~~万分感谢