Premetto di avere consultato a lungo il forum prima di scrivervi.
Sto lavorando ad un seplice form in cui sono visualizzati alcuni campi. I campi fanno parte di un DB con alcuni record. Il form visualizza un determinato record.
Il form visualizza regolarmente i dati inseriti, provo a modificare un campo e a lanciare sul file che deve aggiornare il db. Qui sorge un problema che non riesco a sistemare. Ecco la segnalazione di errore:

-----------------2008-08-19 08:06:41 ::1 POST /admin/test_salva.asp |15|800a0401|Prevista_fine_istruzione 18 - ::1 Mozilla/4.0+(compatible;+MSIE+7.0;+Windows+NT+6.0;+SLCC1;+ .NET+CLR+2.0.50727;+Media+Center+PC+5.0;+.NET+CLR+ 3.0.04506;+InfoPath.2) 500 0 0 0-----------------
sembra che sia prevista una fine istruzione ma non capisco quale.

---------------------------------------------------------------------------------------
Posto il codice del form: test_form.asp

<%@LANGUAGE="VBSCRIPT"%>

<%
Dim rsArea__MMColParam
rsArea__MMColParam = "1"
if (Request.QueryString("ID") <> "") then rsArea__MMColParam = Request.QueryString("ID")
%>
<%
set rsArea = Server.CreateObject("ADODB.Recordset")
rsArea.ActiveConnection = MM_connIndex_STRING
rsArea.Source = "SELECT * FROM aree WHERE ID = " + Replace(rsArea__MMColParam, "'", "''") + ""
rsArea.CursorType = 0
rsArea.CursorLocation = 2
rsArea.LockType = 3
rsArea.Open()
rsArea_numRows = 0
%>



<table width="468" border="0" cellpadding="0" cellspacing="0" align="center" background="/cm/img/sfondo_admin.jpg">
<form action="test_salva.asp" method="post" enctype="multipart/form-data" name="form1" id="form1"><tr>
<td><input type="text" name="titolo" value="<%=(rsArea.Fields.Item("titolo").Value)%>"> </td>
</tr>
<tr>
<td><input type="text" name="descrizione" value="<%=(rsArea.Fields.Item("descrizione").Value )%>"></td>
</tr>
<tr>
<td><input type="text" name="link" value="<%=(rsArea.Fields.Item("link").Value)%>"></td>
</tr>
<tr>
<td><input type="text" name="modifica" value="<%=(rsArea.Fields.Item("modifica").Value)%> "></td>
</tr>
<tr>
<td><input type="text" name="ID" value="<%=Request.QueryString("ID")%>"></td>
</tr>
<td><input type="text" name="color" value="<%=(rsArea.Fields.Item("color").Value)%>"></td>
<td></td>
</tr>
<tr>
<td colspan="3" align="center"><input type="submit" name="form1" value="Salva" class="pulsante"></td>
</tr>
</td></tr></form>
<tr>
<td colspan="3">[img]/t.gif[/img]</td>
</tr>
<tr><td colspan="3" align="center"><span class="separatori">[</span>Pannello<span class="separatori">]</span><span class="separatori">[</span><a href="javascript:history.go(-1)" class="linksveloci">
Precedente</a><span class="separatori">]</span></td>
</tr>
</td></tr>
</table>

<%
rsArea.Close()
%>

--------------------------------------------------------------------------------------
ecco invece il codice di test_salva.asp

<%@LANGUAGE="VBSCRIPT"%>

<%
id = request.queryString("id")
titolo = request.queryString("titolo")
descrizione = request.queryString("descrizione")
link = request.queryString("link")
color = request.queryString("color")
modifica = request.queryString("modifica")

Set conn=Server.CreateObject("ADODB.Connection")
conn.Open MM_connIndex_STRING2
Set rs = Server.CreateObject("ADODB.Recordset")

riga 18 ------->rs.Open = "UPDATE aree SET titolo='"&request.form("titolo")& "', descrizione='"&request.form("descrizione")&"', link='"&request.form("link")&"', color='"&request.form("color")&"', modifica='"&request.form("modifica")&"' WHERE id='"&request.form("id")&"' ", conn
set rs = nothing
url="/admin/pannellocontrollo.asp"
Response.Redirect(url)

%>
--------------------------------------------------------------------------------------
ho evidenziato la riga 18 ove viene segnalato l'errore.

Grazie in anticipo, probabilmente qualcosa che mi sfugge... a voi piu bravi...passo... e non chiudo