Ajuda Por Favor

[Guest - Marcelo -]

Olá - Preciso inserir gravar o valor unitário no banco de dados mas não consigo "intPrice"

<%@ Language=VBScript %>

<% pageTitle = "Validate Order" %>

<!--#include file="adovbs.inc"-->

<!--#include file="db.asp"-->

<font face="Arial">

<%

set Conn = Server.CreateObject("ADODB.Connection")

Conn.Open ConString

intOrderID = Request.form("intOrderID")

set rsOrder = Server.CreateObject("ADODB.Recordset")

rsOrder.Open "SELECT * FROM orders WHERE orderID = " _

& intOrderID, Conn, adOpenStatic, adLockOptimistic, _

adCmdText

if rsOrder.EOF then

Response.Write "There is a problem with your order. "

Response.Write "Please contact customer service."

else

rsOrder("sAmt") = Request.form("intShipping")

rsOrder("total") = Request.form("intTotal")

rsOrder("orderDate") = Date

rsOrder("status") = "COMPLETE"

rsOrder.Update

Conn.Execute("DELETE FROM itemsOrdered WHERE " _

& "orderID = " & intOrderID)

set rsItem = Server.CreateObject("ADODB.Recordset")

rsItem.Open "itemsOrdered", Conn, adOpenStatic, adLockOptimistic, adCmdTable

for each item in Request.form("strOrderItem")

strOrderItem = cstr(item)

itemInfo = split(strOrderItem, ",")

rsItem.addNew

rsItem("orderID") = intOrderID

rsItem("productID") = itemInfo(0)

rsItem("quantity") = itemInfo(1)

rsItem("intPrice") =

rsItem.Update

next

rsItem.Close

set rsItem = Nothing

Session.abandon

end if

rsOrder.Close

set rsOrder = Nothing

Conn.Close

set Conn = Nothing

%>

[kuroi]

se nem você q ta fazendo sabe, como é q a gente vai adivinhar?

você baixou o script pronto?

tente ver de onde vêm essas variaveis:

itemInfo(0), itemInfo(1)