Mailing List Archive: Re: How to cgi redirect?

[REBOL] Re: How to cgi redirect?

From: warp:reboot:ch at: 24-Oct-2002 15:51


[24.10.2002 11:35 "Jason Cunliffe" [jason--cunliffe--verizon--net]]

> While we are on the topic, does anyone know what is the browser dependency
> for
> this?
>
> onClick="document.location.href=http://somesite.com/somepage.html"
>
You my find an answer here:
OnClick:
http://www.dotcom.ca/index_dot_html/supportkey/a.htm
Document.location.href:
http://www.dotcom.ca/index_dot_html/supportkey/a.htm

This is my new redirect function:

http-redir: func [url /local cgi_string row][
     print "Content-Type: text/html^/"
     print rejoin [{<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0//EN">}
newline
         {<HTML><HEAD><META HTTP-EQUIV="Refresh" CONTENT="1;URL=} url {">
<SCRIPT>
<!--
  var version = parseInt(navigator.appVersion)
  // replace is supported
  if (version>=4 || window.location.replace)
    window.location.replace("} url {")
  else
    window.location.href = "} url {"
// -->
</SCRIPT>
         </HEAD></HTML>}
     ]
 ]

Will Arp
[warp--reboot--ch]