Ciao a tutti,
ho bisogno di una mano,
invio un parametro (order_ID) ad una pagina asp che invia un'email, e fino a qui non ci sono problemi, il punto è che questa pagina deve andare automaticamente ad un'altra (passandogli lo stesso parametro)e quest'ultima deve a sua volta inviare un'altra email.
Il problema è proprio nel passargli il parametro, avevo provato così:
<%
Dim Rorder_val
Rorder__val = "-1"
If (Request("order_ID") <> "") Then
Rorder__val = Request("order_ID")
End If
%>
<%
Dim Rorder
Dim Rorder_numRows
Set Rorder = Server.CreateObject("ADODB.Recordset")
Rorder.ActiveConnection = MM_conncartweaver_STRING
Rorder.Source = "SELECT * FROM cwq_OrderDetails WHERE tbl_orders.order_ID='" + Replace(Rorder__val, "'", "''") + "'"
Rorder.CursorType = 0
Rorder.CursorLocation = 2
Rorder.LockType = 1
Rorder.Open()
Rorder_numRows = 0
%>
<%
Dim strCognome
Dim strNome
Dim strEmail
Dim strOrdine
Dim strEmailA
Dim strRedirect
strEmail = Rorder.Fields.Item("cst_Email").Value
strOrdine = Rorder.Fields.Item("order_ID").Value
strNome = Rorder.Fields.Item("cst_FirstName").Value
strCognome= Rorder.Fields.Item("cst_LastName").Value
strEmailA = "info@blabla.it"
strRedirect = "sendjet2.asp?order_ID=" &Rorder.Fields.Item("order_ID").Value
strEmailBody = strEmailBody & "DATI CLIENTE"&"
"&"Cliente:" &"" &strNome& "" &strCognome&"
Email:"&""&strEmail&"
Ordine:"&""&strOrdine
"
Set mail = Server.CreateObject("Persits.Mailsender")
mail.Host = "mail.arpanet.it"
mail.From = strEmail
mail.FromName = strCognome '"Modulo di richiesta informazioni"
mail.AddAddress strEmailA
mail.Subject = strOggetto
mail.Body = strEmailBody
mail.Ishtml = True
mail.Send
Set mail = nothing
Response.Redirect strRedirect
%>
<%
Rorder.Close()
Set Rorder = Nothing
%>
ovviamente nella seconda pagina mi richiamavo il parametro passato, ma non funziona.
Sapreste dirmi come fare?
SperoG di essere stata chiara.
Grazie
Rispondi quotando
