[REBOL] Re: How to cgi redirect?
From: jason:cunliffe:verizon at: 23-Oct-2002 22:39
hmmm... for some reason I still could not get that one [Andreas] to work.
But these two are both ok [Linux]:
;#1 simple insert anywhere..
print rejoin [
{<SCRIPT>location.href = "http://somesite.com/somepage.html"</SCRIPT>}
]
;#2 Thanks to "Gullmes Micael" <[Micael--Gullmes--telenor--se]>
html_redirect: func [
{Creates the first part of a HTML page to be redirected}
title [string!] "HTML title of the page"
seconds [integer!] "Number of seconds before redirect"
url [string!] "URL to redirect to"
][
print rejoin ["Content-Type: text/html^/"]
print rejoin [{<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0//EN">} newline
{<HTML><HEAD><META HTTP-EQUIV="Refresh" CONTENT="} seconds ";URL=" url
{"><TITLE>} title </TITLE> newline
</HEAD> <BODY>
]
]
html_redirect "Test page" 0 "http://www.redirpage.com/"
I am using Micael's now.
Tell me what happens on your OS when you try it?
./Jason
