salve,
sono in crisi, ho praticamente finito il mio primo sito internet...a meno della pagina dei commenti. Non sono molto esperto, ma ho capito abbastanza bene il linguaggio html e css. Per la parte dei commenti ho scaricato da html.it delle pagine asp già fatte da qualcuno che conosce il linguaggio, pensavo che sarei riuscito a modificarlo facilmente...
mi interessa solo aggiungere data e ora ai commenti, potete aiutarmi a capire dove sbaglio?

questo è l'originale:



<%
Sub Commenti(Pagina)

strConn = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("mdb-database/comments.mdb")
set conn = Server.CreateObject("ADODB.Connection")
conn.Open strConn

'Inserimento nuovo commento
If Len(Request.Form("nome"))>3 and Len(Request.Form("commento"))>5 then
conn.Execute "INSERT INTO commenti (nome, commento, pagina, IP) VALUES (" & _
"'" & Replace(Request.Form("nome"), "'", "''") & "', " & _
"'" & Replace(Request.Form("commento"), "'", "''") & "', " & _
"'" & Replace(Request.Form("pagina"), "'", "''") & "', " & _
"'" & Request.ServerVariables("REMOTE_ADDR") & "')"
Response.Write ("

de reactie is geplaatst</p>")
end if

Response.Write("<h3>Reacties</h3>")

' estrai record
set rs = Conn.Execute("SELECT nome, commento FROM commenti WHERE Pagina = '" & Replace(pagina, "'", "''") & "'")

' non ci sono record
if rs.Eof then Response.Write("

er zijn nog geen reacties</p>")

' ciclo su tutti i record
do until rs.eof
Response.Write("

" & Server.HtmlEncode(rs("nome")) & ":
")
Response.Write(Server.HtmlEncode(rs("commento")) & "</p>")
rs.moveNext
loop

%>
<h3>plaats je bericht</h3>

<form method="post">
<input type="hidden" name="pagina" value="<%=pagina%>">
Naam: <input type="text" name="nome" >

Reactie: <textarea name="commento" cols="30" rows="5"></textarea>

<input type="submit" value="plaats">
</form>



</p>

<%
conn.Close
set conn = Nothing

End Sub
%>





e questo invece presenta le modifiche che ho fatto io:

<%
Sub Commenti(Pagina)

strConn = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("mdb-database/comments.mdb")
set conn = Server.CreateObject("ADODB.Connection")
conn.Open strConn

'Inserimento nuovo commento
If Len(Request.Form("nome"))>3 and Len(Request.Form("commento"))>5 then
conn.Execute "INSERT INTO commenti (nome, commento, pagina, IP, time) VALUES (" & _
"'" & Replace(Request.Form("nome"), "'", "''") & "', " & _
"'" & Replace(Request.Form("commento"), "'", "''") & "', " & _
"'" & Replace(Request.Form("pagina"), "'", "''") & "', " & _
"'" & Request.ServerVariables("REMOTE_ADDR") & "', " & _
"'" & Replace(Request.Form("time"), "'", "''") & "')"
Response.Write ("

de reactie is geplaatst</p>")
end if

Response.Write("<h3>Reacties</h3>")

' estrai record
set rs = Conn.Execute("SELECT nome, commento FROM commenti WHERE Pagina = '" & Replace(pagina, "'", "''") & "'")

' non ci sono record
if rs.Eof then Response.Write("

er zijn nog geen reacties</p>")

' ciclo su tutti i record
do until rs.eof
Response.Write("

" & Server.HtmlEncode(rs("nome")) & ":
")
Response.Write(Server.HtmlEncode(rs("commento")) & "</p> <hr />")
rs.moveNext
loop

%>
<h3>plaats je bericht</h3>

<form method="post">
<input type="hidden" name="pagina" value="<%=pagina%>">
Naam: <input type="text" name="nome" >


Reactie: <textarea name="commento" cols="30" rows="5"></textarea>
<input type="hidden" name="time" value="<%=now%>">

<input type="submit" value="plaats">
</form>



</p>

<%
conn.Close
set conn = Nothing

End Sub
%>



so che non si può improvvisare, ma con html e css non penso si riesca a fare un form per i commenti. Prenderò al più presto il linguaggio asp per mano e lo studierò, appena avrò un po di tempo!
ringrazio intanto chi mi fare capire l'errore!