279 messaggi dal 08 maggio 2001
Raga,
Ho realizzato la seguente pagina che mi permette di effettuare il dowload però non mi reindirizza alla pagina originaria index.asp nonostante il refresh .... ci sta qualche altro modo ?


<%
ID = Request ("ID")
data = Date()
IP=request.servervariables("remote_addr")

FUNCTION FixQuotes( theString )
FixQuotes = REPLACE( theString, "'", "''" )
END FUNCTION


sub conteggio
SQL ="UPDATE location SET "
SQL = SQL & " click = " & FixQuotes(click) & ","
SQL = SQL & " data = '" & FixQuotes(data) & "',"
SQL = SQL & " IP = '" & FixQuotes(IP) & "'"
SQL = SQL & " WHERE IDutente ="& ID &""

conn.Execute(SQL)
end sub


Set rs = Server.CreateObject("ADODB.Recordset")
sql = "SELECT * FROM location where IDutente =" & ID &""
rs.open sql, conn, 1, 3
nome = rs("nome")
file = rs("frantoio")
click = rs("click")+1
conteggio
%>

<%
rs.close
set rs = nothing
conn.close
set conn=nothing
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<meta http-equiv="refresh" content="3; url=index.asp"/>

<title>Download File</title>
<Script type="text/javascript">
<!--
function download(){
location.href="location/<%=file%>";
}
-->
</Script>
</head>
<body onLoad="download()">
</body>
</html>
2.584 messaggi dal 14 maggio 2001
Se non ho capito male il tuo codice succede questo:

Viene elaborato il codice vbscript
Viene fatto il load della pagina
Viene cambiata la pagina con il Location.href
PUNTO sei su una nuova pagina e quindi il refresh non esiste più...

Torna al forum | Feed RSS

ASPItalia.com non è responsabile per il contenuto dei messaggi presenti su questo servizio, non avendo nessun controllo sui messaggi postati nei propri forum, che rappresentano l'espressione del pensiero degli autori.