ricavare email

[numapompilio]

nella pagina salvataggio email che si inviano (il processo di salvataggio)


<%
Dim oCon
Dim sCodiceImmobile : sCodiceImmobile = Request.QueryString("Immobile")
Dim sCodiceRichiedente : sCodiceRichiedente = Request.QueryString("Richiedente")
Dim nMailID : nMailID = Request.QueryString("MailID")
Dim sRisultato : sRisultato = Request.QueryString("Risultato")
Dim sIndirizzoMail : sIndirizzoMail = Request.QueryString("IndirizzoMail")


Set oCon = Server.CreateObject("ADODB.Connection")
oCon.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath("/public/db.mdb")


oCon.Execute "insert into StoricoMails (DataInvio,Operatore,MailID,IndirizzoMail,CodiceIm mobile,CodiceRichiedente,Risultato) values (Now(),'" & Request.Querystring("xxxxUserName") & "','" & nMailID & "','" & sIndirizzoMail & "'," & sCodiceImmobile & "," & sCodiceRichiedente & ",'" & replace(sRisultato,"'","''") & "')"
oCon.Close


%>



come vedi '" & sIndirizzoMail & "' inserisce il valore su IndirizzoMail ho quindi su questa pagina ho provato cosi


email2="& sIndirizzoMail &" ma nn restituisce niente......


x me manca poco ma nn riesco a capire cosa manca..!!!!

[numapompilio]

salve non ho ancora risolto qualcuno ha visionato il mio codice.....