Salve ragazzi... ho un problema sicuramente risolvibile al 110%.... Praticamente ho un guestbook, ma nel momento in cui cerco di riempire tutti i campi messi a disposizione per firmare il guestbook.. mi esce questo errore..



Microsoft VBScript runtime error '800a01a8'

Object required: ''

/ivanissimo/guestbook/inserisci-process.asp, line 66



La pagina in questione eccola...

<%
' ************ Pagina di inserimento dati nel Guestbook ************

' Riconosce i campi della form
nome = Trim(Request.form("nome"))
email = Trim(Request.form("email"))
citta = Trim(Request.form("citta"))
messaggio = Trim(Request.form("messaggio"))
messaggio = Replace(messaggio , vbcrlf , "
")

if len(nome) = 0 or len(email) = 0 or len(citta) = 0 or len(messaggio) = 0 then
%>

<table border="1" cellpadding="0" cellspacing="0" width="70%" height="70%" align="center">
<tr>
<td align="center">ATTENZIONE !!!</td>
</tr>
<tr>
<td align="center">

<table border="0" cellpadding="2" cellspacing="2" width="45%" align="center">

<p align="center">Torna indietro e compila tutti i campi correttamente...</p>

<tr>
<td width="30%">Nome</td>
<td width="5%">=</td>
<td><%=nome%></td>
</tr>
<tr>
<td width="30%">Email</td>
<td width="5%">=</td>
<td><%=email%></td>
</tr>
<tr>
<td width="30%">Citt</td>
<td width="5%">=</td>
<td><%=citta%></td>
</tr>
<tr>
<td width="30%">Messaggio</td>
<td width="5%">=</td>
<td><%=messaggio%></td>
</tr>

</table>

</td>
</tr>
<tr>
<td align="center">[img]immagini/Indietro.gif[/img]</td>
</tr>

</table>


<%
else
SQL = "INSERT into tblGuestbook(nome,email,citta,messaggio)"
SQL = SQL & "VALUES ("
SQL = SQL & " '" & nome & "' ,"
SQL = SQL & " '" & email & "' ,"
SQL = SQL & " '" & citta & "' ,"
SQL = SQL & " '" & messaggio & "' ,"
SQL = SQL & " )"

conn.Execute(SQL)

response.redirect "guestbook.asp"

end if
%>


poi nella pagina connessione.asp


<%
'*********** Connessione al database ***********
Dim path,strconn,conn
path = "mdb-database/guestbook.mdb"
strconn = "Provider = Microsoft.Jet.OLEDB.4.0; Data Source =" &_
Server.Mappath(path)
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open strconn
%>



Grazie mille anticipati