Da IE:Originariamente inviato da ronnin
mi da errore interno del server
Strumenti --> Opzioni Internet --> Avanzate --> Qui deseleziona la casella di spunta con scritto "Mostra messaggi HTTP brevi".
Riprova il codice che ti ho scritto prima e dicci qual è l'errore.
Provare paura per un qualcosa che ti possa capitare nel futuro non ti evita quell'evento,ti fa soltanto vivere un presente sbagliato!
..la casella di IE e' gia selezionata!!
non mi apre proprio la pagina "spedisci.asp" richiamata dalla
pressione del pulsante INVIA della form, e mi da "impossibile aprire la pagina, errore interno del server"
..nn so che dire...
visit my web site!
Hello Len* - cosplay & manga art
Puoi postare lo script di tutta la pagina, comprensivo delle mie modfiche, per favore?
Provare paura per un qualcosa che ti possa capitare nel futuro non ti evita quell'evento,ti fa soltanto vivere un presente sbagliato!
<%
HTML = "<!DOCTYPE HTML PUBLIC""-//IETF//DTD HTML//EN"">"
HTML = HTML & "<html>"
HTML = HTML & "<head>"
HTML = HTML & "<meta http-equiv=""Content-Type"""
HTML = HTML & "content=""text/html; charset=iso-8859-1"">"
HTML = HTML & "<meta name=""GENERATOR"""
HTML = HTML & " content=""Microsoft Visual Studio 6.0"">"
HTML = HTML & "<title>HTMLMail</title>"
HTML = HTML & "</head>"
HTML = HTML & "<body bgcolor=""FFFFFF"">"
tipoAzienda1 = trim(request.form("tipo azienda1")
tipoAzienda2 = trim(request.form("tipo azienda2")
tipoAzienda3 = trim(request.form("tipo azienda3")
tipoAzienda4 = trim(request.form("tipo azienda4")
tipoAzienda = trim(request.form("tipo azienda")
response.write(tipoAzienda1 & "
")
response.write(tipoAzienda2 & "
")
response.write(tipoAzienda3 & "
")
response.write(tipoAzienda4 & "
")
response.write(tipoAzienda & "
")
response.end
HTML = HTML & "
Vi ha scritto " & request.form("nome") & "</p>"
HTML = HTML & "
dell'azienda " & request.form("Azienda") & "</p>"
HTML = HTML & "
Indirizzo: " & request.form("Indirizzo") & "</p>"
HTML = HTML & "
Telefono e Fax: " & request.form("telfax") & "</p>"
HTML = HTML & "
E-Mail: " & request.form("Email") & "</p>"
HTML = HTML & "
mansione: " & tipoAzienda1 & " " & tipoAzienda2 & " " & tipoAzienda3 & " " tipoAzienda4 & " " & tipoAzienda & "</p>"
HTML = HTML & "
Messaggio:</p>
" & request.form("note")
HTML = HTML & "</body>"
HTML = HTML & "</html>"
Dim destinatario 'destinatario email
Dim mittente 'mittente email ("nome cognome <indirizzo@email.com>")
Dim oggetto 'oggetto email
Dim testo 'testo email
Set objCDOMail = CreateObject("CDO.Message")
Set objCDOConf = CreateObject("CDO.Configuration")
sch = "http://schemas.microsoft.com/cdo/configuration/"
With objCDOConf.Fields
.Item(sch & "sendusing") = 2 ' cdoSendUsingPort
.Item(sch & "smtpserver") = "smtp.trivenet.it"
.update
End With
with objCDOMail
Set .Configuration = objCDOConf
.To = "ale@beevulgaris.com"
.From = "ale@beevulgaris.com"
.Subject = "Messaggio dal sito web POESIA"
.HTMLBody = HTML
.Send
End with
with objCDOMail
Set .Configuration = objCDOConf
.To = request.form("email")
.From = "ale@beevulgaris.com"
.Subject = "Messaggio dal sito web POESIA"
.HTMLBody = "Grazie per aver compilato il nostro form! Sarete ricontattati al più presto."
.Send
End with
%>
ecco qua!
questa e' la parte col codice
visit my web site!
Hello Len* - cosplay & manga art
Permessi di invio
Rispondi quotando