Codice asp per invio email tramite form vorrei dei consigli

[gelova]

Avendo creato (leggendo un libro) una pagina asp per l'invio email tramite un form, sono riuscito a provarlo in locale e il tutto finziona perfettamente.
Il problema che mi pongo è che nella sezione SMTP ho inserito il mio
e quindi il tutto funziona;

Ma quando lo metterò on line ad esempio per altri che hanno altri
server SMTP dovrei sapere in anticipo quali sono ?

Vorrei creare un form da spedire sempre via email,
con campi: "nome","cognome", "città", "email"
che codici dovrei inserire ?

Il codice è il seguente

theSchema="http://schemas.microsoft.com/cdo/configuration/"
Set cdoConfig=server.CreateObject("CDO.Configuration")
cdoConfig.Fields.Item(theSchema & "sendusing")=2
cdoConfig.Fields.Item(theSchema & "smtpserver")="server.smtp.com"
cdoConfig.Fields.Update

set cdoMessage=Server.CreateObject("CDO.Message")
cdoMessage.Configuration=cdoConfig

cdoMessage.From=Request.Form("emailAddress")
cdoMessage.To="indirizzo@email.it"
cdoMessage.Subject=Request.Form("subject")
cdomessage.TextBody=Request.Form("body")
cdoMessage.Send

Set cdoMessage=Nothing
Set cdoConfig=Nothing

Se avete dei consigli per migliorare il form sono sempre ben accetti,
premetto che non conosco l'ASP e sto seguendo un libro sulle pagine dinamiche
con Dreamweaver
Grazie !

[gelova]

In poche parole mi occorre creare con dreamweaver un form (in ASP)
che mi permetta di inviare il tutto via email con questi campi:

Nome
Cognome
Città
Email

Chiedo troppo ?

[Legolas]

Ciao, la pagina di invio a grandi linee va bene, dico a grandi linee perchè puoi migliorarla aggiungendo il controllo per le mail e per i campi in generale (ammesso che i campi siano obbligatori)

Ma quando lo metterò on line ad esempio per altri che hanno altri
server SMTP dovrei sapere in anticipo quali sono ?

Esatto.
generalmente stmp.nomesito.ext

Ciao

[gelova]

Si ma non mi hai risposto ancora !
Quel codice va benissimo perchè l'ho provato e funziona, il problema è che vorrei aggiungere altri campi tipo NOME, COGNOME, CITTA' ecc....

[gelova]

Potrei utilizzare quel codice per per aggiungere altri campi tipo:
NOME, COGNOME, CITTA' ecc...
e se si come si fà ?
Premetto che di ASP sono zero assoluto sto solo seguendo un libro sul dreamweaver e le pagine dinamiche !
Grazie !

[Legolas]

Si, hai ragione, mi era completamente sfuggito l'ultimo post

Questo è il form:

<form method="post" action="inviomail.asp">
  Nome <input type="text" name="nome" id="nome"/><br/>
  Cognome<input type="text" name="cognome" id="cognome"/><br/>
  Città<input type="text" name="citta" id="citta"/><br/>
  Email<input type="text" name="email" id="email"/><br/>
</form>

Mentre questa è la pagina che invia i dati (inviomail.asp):

 theSchema="http://schemas.microsoft.com/cdo/configuration/" 
 Set cdoConfig=server.CreateObject("CDO.Configuration")   
 cdoConfig.Fields.Item(theSchema & "sendusing")=2 
 cdoConfig.Fields.Item(theSchema & "smtpserver")="server.smtp.com" 
 cdoConfig.Fields.Update 
  
 set cdoMessage=Server.CreateObject("CDO.Message") 
 cdoMessage.Configuration=cdoConfig 
  
 cdoMessage.From=Request.Form("email") 
 cdoMessage.To="indirizzo@email.it" 
 cdoMessage.Subject=Request.Form("subject") 
cdomessage.TextBody="Nome:" & request.form("nome") & "Cognome:" & Request.form("cognome") & "Citta:" & request.form("citta")
 cdoMessage.Send 
  
 Set cdoMessage=Nothing 
 Set cdoConfig=Nothing

Ciao

[gelova]

Scusami se non ti ho risposto, sono tornato ora dalle ferie, provo e ti farò sapere grazie !

[gelova]

Il codice funziona yahoooooooo
Ancora una cosa...l'arrivo dell'email mi appare con le voci tutte unite così:

Nome:TizioCognome:CaioCittaomodossolaEmail:rova@ya hoo.it

Come posso fare per mettere dello spazio per essere un pò più ordinata ?
Grazie !

[Legolas]

Il codice che ti ho dato era un po' demo, infatti non ho curato molto l'aspetto , cmq per separare le voci:

cdomessage.TextBody="Nome:" & request.form("nome") & "<br/>Cognome:" & Request.form("cognome") & "<br/>Citta:" & request.form("citta")

Ciao

[gelova]

C'è qualcosa che non và.....
con l'aggiunta di <br/> mi viene questa email...

Nome:Tizio<br/>Cognome:Caio<br/>Cittaomodossola<br/>Emailrova@yahoo.it<br/>Commenti:yahoooo

siamo sicuri della posizione ?

[gelova]

Sul libro suggerisce di utilizzare l'espressione ( &nbsp; )
ho provato ma non funziona....

[gelova]

Dove sei Legolas

[Legolas]

Ciao, [OT] scusami se ti rispondo solo ora ma sono stato tutto il giorno ad un raduno tuning (speriamo che il prox anno riesco a preparare la piccola eclipse ) [OT]

Cmq, si ho sbagliato il codice, ciò che ti ho scritto serve per le mail testuali mentre se vuoi mandare l'email in html devi cambiare questa voce:

cdomessage.TextBody = "testo normale"

con questa:

cdomessage.HtmlBody = "testo html"

Quindi:

cdomessage.HtmlBody = "Nome:" & request.form("nome") & "<br/>Cognome:" & Request.form("cognome") & "<br/>Citta:" & request.form("citta")

Ciao

[gelova]

Yahoooooo !!!!!!! Sei un grande !
Ok così già va benissimo .
Ma se volessi un doppio spazio ? L'email che mi arriva è questa:

Nome:Tizio
Cognome:Caio
Citta: omodossola
Email: prova@yahoo.it
Commenti:rova

ad esempio così:

Nome: Tizio
Cognome: Caio
Citta: Domodossola
Email: prova@yahoo.it
Commenti: prova

dovrei aggiungere un doppio
<br/>
Lo sò ti sto rompendo......

[Legolas]

Ma se volessi un doppio spazio ?
dovrei aggiungere un doppio
<br/>

Esatto

Lo sò ti sto rompendo......

Tranquillo, siamo qui per aiutare

Ah, tanto per la cronaca se un giorno ti capitasse di usare mail testuali e non html "l'accapo" si ottiene così:

cdomessage.TextBody="Nome:" & request.form("nome") & vbcrlf & "Cognome:" & Request.form("cognome") & vbcrlf & "Citta:" & request.form("citta")

Ciao