<% 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) %>

Site home [Informazioni] [Autori] [Articoli] [Registrati]

Administrator: susannap@libero.it Last update: