Retorne à página anterior, geralmente usado após julgar se as informações são enviadas completamente <%
'***********************************
'Função: Goback ()
Parâmetros: Nenhum
'Autor: Alixi
Data: 2007/7/13
'Descrição: retorne à página anterior, geralmente usada após julgar se as informações são enviadas completamente
'Exemplo: <%Callgoback ()%>
'***********************************
Subgoback ()
Response.Write ("<Script> history.go (-1) </sCript>")
Endsub
%>
Redirecionar para outro link
<%
'***********************************
'Função: Go (URL)
Parâmetros: URL, caminho relativo ou absoluto e URL
'Autor: Alixi
Data: 2007/7/13
'Descrição: redirecionar para outro link
'Exemplo: <%CALLGO (http://www.alixixi.com)%>
'***********************************
Subgo (URL)
Response.Write ("<cript> location.href ('" & url & "') </sCript>")
Endsub
%>
Especifique o número de segundos para redirecionar outra conexão
<%
'***********************************
'Função: Gopage (URL, s)
Parâmetros: URL, caminho relativo ou absoluto e URL; s, pular depois do tempo em segundos
'Autor: Alixi
Data: 2007/7/13
'Descrição: Especifique o número de segundos para redirecionar outra conexão
'Exemplo: <%Callgopage ("http://www.alixixi.com", 3)%>
'***********************************
subgopagem (URL, s)
s = s*1000
Response.Write "<ScriptLanguage = JavaScript>"
Response.Write "Window.SetTimeout (" & Chr (34) & "Window.navigate ('" & url & "')" & Ch (34) & "," & s & ")"
Response.Write "</sCript>"
endsub
%>