Modulo email - Spazio

[Dubal]

Ciao,
ho questo codice ASP per l'invio dei dati inseriti in un form:

<%@Language="VBScript"%>
<% Option Explicit %>
<% Response.Expires = -1500 %>
<%

'Response.Write Request.Form & "
"

	Dim Mail
	Set Mail = Server.CreateObject("Persits.MailSender")
	Dim Splittato
	Dim S_Email_Subject
	Dim S_Form_Fields
	Dim Indice
	Dim U_Confirmation_Url
	Dim S_Email_Address
	Dim Referer

'copiare i dati dal modulo e SOSTITUIRE I TRATTINI NEI NOMI DEI CAMPI CON LA SOTTOLINEATURA
	S_Email_Subject="Richiesta informazione dal sito"
 	S_Form_Fields="azienda indirizzo citta stato riferimento telefono fax email note "
 	U_Confirmation_Url="contatti_ok.htm"
	S_Email_Address="miaemail@mail.com"
'<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
	Referer = "http://www.miosito.it/contact/contact.htm"
'<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
'copiare i dati dal modulo e SOSTITUIRE I TRATTINI NEI NOMI DEI CAMPI CON LA SOTTOLINEATURA

	Mail.From = S_Email_Address
	Mail.AddAddress  S_Email_Address
'	Mail.AddAddress "email@email.it"
	Mail.Host = "smtp2.smtp.it"
	Mail.FromName = S_Email_Address
	Mail.Subject = S_Email_Subject

	Mail.Body = S_Email_Subject & vbCrLf & vbCrLf
	Splittato = Split(S_Form_Fields, " ")
	For Indice = 0 To UBound(Splittato)-1
		Mail.Body = Mail.Body + Splittato(Indice) & "=" & Request.Form(Splittato(Indice)) & vbCrLf
	Next
	Mail.Body = Mail.Body + "data=" & Now & vbCrLf
	Mail.Body = Mail.Body + "ip=" & Request.ServerVariables("REMOTE_ADDR") & vbCrLf
	If Request.ServerVariables("HTTP_REFERER") = Referer Then Mail.Send
	Set Mail = Nothing

	Response.Redirect(U_Confirmation_Url)

%>

Il modulo funziona, ma i dati inseriti nel campo "email" non vengono staccati dal nome, quindi ricevo:

Email:emailinserita@email.it

Come posso inserire uno spazio?

[optime]

non ho capito dove vuoi inserire lo spazio...

[Dubal]

Quando mi arriva l'email con i dati che l'utente ha inserito nel form, mi arriva una cosa del genere:

azienda=Fiat
indirizzo=via roma 3
citta=Torino
ecc...
email=email@email.it
note=bla bla bla

Il campo email risulta tutto attaccato, risulta link non solo l'email ma anche la voce "email=". Quindi tutte le volte che devo prendere l'email è un "casino".

[optime]

dupall, ti arriva email=email@email.it: tu cosa vorresti in uscita?

[Vincent.Zeno]

desidera email= email@email.it con lo spazio, altrimenti si linka anche la descrizione e non solo il dato

secondo me risolve con un replace o con uno spazio inserito di default nel campo

[Dubal]

Originariamente inviato da Vincent.Zeno
desidera email= email@email.it con lo spazio, altrimenti si linka anche la descrizione e non solo il dato

secondo me risolve con un replace o con uno spazio inserito di default nel campo

Esatto.
Ho postato il codice ASP che utilizzo, per ottenere quello spazio cosa dovrei fare?

Grazie per l'aiuto

[Vincent.Zeno]

se non ho dimenticato nulla dovrebbe essere così:

S_Email_Address  = Replace(S_Email_Address,S_Email_Address," " & S_Email_Address)
Mail.From = S_Email_Address

vedi se funge

[Dubal]

no
cambiato nulla

[Vincent.Zeno]

nn ho voglia di "elaborare" il problema...

prova a mettere un spazio prima di ogni risposta:

Mail.Body = Mail.Body + Splittato(Indice) & "= " & Request.Form(Splittato(Indice)) & vbCrLf

ovvero metti uno spazio dopo =
da così: "="
a così: "= "

[Dubal]

Grazie! Sapevo che era una "stron***" ma nn ci sarei mai arrivato!

Thanks!