<% dim oRs dim sql dim inFirma inFirma=Request.Form("nome") inTesto=Request.Form("msg") Set oRS=Server.CreateObject("ADODB.recordset") sql = "INSERT INTO commenti (firma,testo) VALUES('" & inFirma & "','" & inTesto & "');" oRS.open sql, "DSN=progetto" Response.Write "
Grazie!
" Response.Write "
Torna alla Home Page
" Response.Write Chr(10) & Chr(13) %>
[
Informazioni
] [
Autori
] [
Articoli
] [
Registrati
]
Administrator:
susannap@libero.it
Last update: