ciao a tutti, ho bisogno di un aiutino. Sto creando un sito ecommerce con il libro "commercio elettronico in asp". Mi funziona tutto bene, solo che adesso vorrei mettere sulla pagina default dei prodotti in promozione. Nella pagina manageproducts.asp ho questo codice:
---------------------------------------------------------------------------------------
<%
FUNCTION fixQuotes( theString )
fixQuotes = REPLACE( theString, "'", "''" )
END FUNCTION
'Rileva le variabili del form
addProduct = TRIM( Request( "addProduct" ) )
updateProduct = TRIM( Request( "updateProduct" ) )
productID = TRIM( Request( "productID" ) )
productName = TRIM( Request( "productName" ) )
productPrice = TRIM( Request( "productPrice" ) )
productPicture = TRIM( Request( "productPicture" ) )
productCategory = TRIM( Request( "productCategory" ) )
productBriefDesc = TRIM( Request( "productBriefDesc" ) )
productFullDesc = TRIM( Request( "productFullDesc" ) )
productFeatured = TRIM( Request( "productFeatured" ) )
productStatus = TRIM( Request( "productStatus" ) )
'Assegna i valori predefiniti
IF productName = "" THEN
productName = "?????"
END IF
IF productPrice = "" THEN
productPrice = 0
END IF
IF productPicture = "" THEN
productPicture = "?????"
END IF
IF productCategory = "" THEN
productCategory = "?????"
END IF
IF productBriefDesc = "" THEN
productBriefDesc = "?????"
END IF
IF productFullDesc = "" THEN
productFullDesc = "?????"
END IF
'Apre la connessione al database
Set Con = Server.CreateObject( "ADODB.Connection" )
Con.Open "accessDSN"
%>
<html>
<head><title>Controllo del Prodotto</title></head>
<body bgcolor="000033">
<%
'Aggiunge il nuovo prodotto
IF addProduct <> "" THEN
sqlString = "INSERT INTO Products " &_
"( product_name, product_price, product_picture, " &_
"product_category, product_briefdesc, product_fulldesc, " &_
"product_status ) VALUES ( " &_
" '" & productName & "', " &_
cCur( productPrice ) & ", " &_
" '" & productPicture & "', " &_
" '" & productCategory & "', " &_
" '" & productBriefDesc & "', " &_
" '" & productFullDesc & "', " &_
productStatus & " )"
Con.Execute sqlString
%>
<center>
<table width="600" cellpadding="4"
cellspacing="0" bgcolor="LightSteelBlue">
<tr>
<td>
<%=productName%> è stato aggiunto al database
</td>
</tr>
</table>
</center>
<%
END IF
'Aggiorna il prodotto
IF updateProduct <> "" THEN
sqlString = "UPDATE Products SET " &_
"product_name='" & fixQuotes( productName ) & "'," &_
"product_price=" & cCUR( productPrice ) & "," &_
"product_picture='" & fixQuotes( productPicture ) & "'," &_
"product_category='" & fixQuotes( productCategory ) & "'," &_
"product_briefdesc='" & fixQuotes( productBriefDesc ) & "'," &_
"product_fulldesc='" & fixQuotes( productFullDesc ) & "'," &_
"product_featured=" & productFeatured & "," &_
"product_status=" & productStatus & " WHERE " &_
"product_id=" & productID
Con.Execute sqlString
%>
<center>
<table width="600" cellpadding="4"
cellspacing="0" bgcolor="696969">
<tr>
<td>
<%=productName%> è stato aggiornato nel database
</td>
</tr>
</table>
</center>
<%
END IF
%>
<center>
<table width="600" border=1 bgcolor="696969"
cellpadding="4" cellspacing="0">
<tr>
<td colspan="2" bgcolor="LightSteelBlue">
<font face="Arial" size="3">
Controllo Prodotto
</font>
</td>
</tr>
<tr>
<td align="center">
<table border="1" size="400" cellpadding="3"
cellspacing=0 bgcolor="white">
<%
sqlString = "SELECT product_id, product_name FROM Products " &_
"ORDER BY product_name"
SET RS = Con.Execute( sqlString )
WHILE NOT RS.EOF
%>
<tr>
<td>
<a href="updateProduct.asp?pid=<%=RS( "product_id")%>">
<%=RS( "product_name" )%></a>
</td>
</tr>
<%
RS.MoveNext
WEND
%>
</table>
</td>
</tr>
<tr>
<td>
Aggiungi Prodotto
</td>
</tr>
</table>
</center>
</body>
</html>
----------------------------------------------------------------------------------------
Praticamente questa pagina mi inserisce i prodotti nel database e me li aggiorna. Il problema sta nella riga 94, che mi da quest'errore:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[Microsoft][Driver ODBC Microsoft Access] Errore di sintassi nell'istruzione UPDATE.
/shop/manageproducts.asp, line 94
Come mai, non mi mette il prodotto da me scelto nella home page?
Spero in un vostro aiuto, grazie in anticipo
Rispondi quotando
