Serve a recuperare l'indirizzo della pagina, che di default è 1

codice:
Dim rs
Dim idurl
idurl = "1"
If (Request.QueryString("idurl")   <> "") Then 
  idurl = Request.QueryString("idurl")  
End If
********
********
rs.Source = "SELECT campeggi.*, servizi.*, servizi2.*, servizi3.*, servizi4.*, downloads.* FROM campeggi, servizi, servizi2, servizi3, servizi4, downloads"