Ciao ragazzi,
vorrei creare un'area stampabile passando dei valori da un'altra
pagina che si è generata dalla seguente query:
<%
Dim rsHotel__MMColParam
rsHotel__MMColParam = "0"
if (TRIM(Request.Form("dataPartenza")) <> "") then rsHotel__MMColParam = TRIM(Request.Form("dataPartenza"))
%>
<%
Dim rsHotel__MMColParam2
rsHotel__MMColParam2 = "0"
if (TRIM(Request.Form("dataPrenotazione")) <> "") then rsHotel__MMColParam2 = TRIM(Request.Form("dataPrenotazione"))
%>
<%
Dim rsHotel__MMColParam3
rsHotel__MMColParam3 = "0"
if (TRIM(Request.Form("nomeCliente")) <> "") then rsHotel__MMColParam3 = TRIM(Request.Form("nomeCliente"))
%>
<%
Dim rsHotel__MMColParam4
rsHotel__MMColParam4 = "0"
if (TRIM(Request.Form("dataPartenzaDue")) <> "") then rsHotel__MMColParam4 = TRIM(Request.Form("dataPartenzaDue"))
%>
<%
Dim rsHotel__MMColParam5
rsHotel__MMColParam5 = "0"
if (TRIM(Request.Form("nomeClienteDue")) <> "") then rsHotel__MMColParam5 = TRIM(Request.Form("nomeClienteDue"))
%>
<%
Dim rsHotel__MMColParam6
rsHotel__MMColParam6 = "0"
if (TRIM(Request.Form("selectHotel")) <> "") then rsHotel__MMColParam6 = TRIM(Request.Form("selectHotel"))
%>
<%
Dim rsHotel__MMColParam7
rsHotel__MMColParam7 = "si"
if (Request("MM_EmptyValue") <> "") then rsHotel__MMColParam7 = Request("MM_EmptyValue")
%>
<%
set rsHotel = Server.CreateObject("ADODB.Recordset")
rsHotel.ActiveConnection = MM_connDB_STRING
rsHotel.Source = "SELECT * FROM prenotazioniHotels, hotels WHERE (prenotazioniHotels.dataPartenza = '" + Replace(rsHotel__MMColParam, "'", "''") + "' AND prenotazioniHotels.voucher = '" + Replace(rsHotel__MMColParam7, "'", "''") + "' AND hotels.nomeHotel = prenotazioniHotels.hotelSelezionato) OR (prenotazioniHotels.dataPrenotazione = '" + Replace(rsHotel__MMColParam2, "'", "''") + "' AND prenotazioniHotels.voucher = '" + Replace(rsHotel__MMColParam7, "'", "''") + "' AND hotels.nomeHotel = prenotazioniHotels.hotelSelezionato) OR (prenotazioniHotels.codFisc = '" + Replace(rsHotel__MMColParam3, "'", "''") + "' AND prenotazioniHotels.voucher = '" + Replace(rsHotel__MMColParam7, "'", "''") + "' AND hotels.nomeHotel = prenotazioniHotels.hotelSelezionato) OR (prenotazioniHotels.dataPartenza = '" + Replace(rsHotel__MMColParam4, "'", "''") + "' AND prenotazioniHotels.codFisc = '" + Replace(rsHotel__MMColParam5, "'", "''") + "' AND prenotazioniHotels.hotelSelezionato = '" + Replace(rsHotel__MMColParam6, "'", "''") + "' AND prenotazioniHotels.voucher = '" + Replace(rsHotel__MMColParam7, "'", "''") + "' AND hotels.nomeHotel = prenotazioniHotels.hotelSelezionato)"
rsHotel.CursorType = 0
rsHotel.CursorLocation = 2
rsHotel.LockType = 3
rsHotel.Open()
rsHotel_numRows = 0
%>
In pratica i valori sono in due database tabelle:
"hotels" e "prenotazioni hotels"
Come faccio a passare questi valori con un link?
Grazie

Rispondi quotando