Launching a web page SOLUTION

Mon May 5 14:22:36 EDT 2008

Oh joy!

I found the solution!

Thank you Ken and Sarah for the ideas.  And THANK YOU Scott Rossi for 
the final solution!

After trying again and failing miserably, I went thru some old posts 
I had saved regarding this subject.

Scott's post is from 2002, and it worked when all else failed.

on mouseUp
   global tUrl
   # tUrl is the full path of the URL you are trying to launch
       put "http://www.gypsyware.com" into tUrl

   put \
       "<html>" & return & \
       "<head>" & return & \
       "<meta http-equiv=" & q("Refresh") && "content=" & \
       q("0; URL=" & tURL) & ">" & return & \
       "<title>Launcher</title>" & return & \
       "</head>" & return & \
       "<body>" & return & \
       "<center>" & return & \
       "<BR><BR><BR>" & return & \
       "Loading URL. One moment please..." & return & \
       "</center>" & return & \
       "</body>" & return & \
       "</html>" into tCode

   put pathToSomeFolderYouCanWriteTo into goHtml
   put "/gypsywareWebpage.html" after goHtml

   open file goHtml for write
   write tCode to file goHtml
   close file goHtml

put word 1 of \

queryRegistry("HKEY_LOCAL_MACHINE\Software\Classes\http\shell\open\command\") 
into tBrowserPath
   launch goHtml with tBrowserPath
end mouseUp

function q pWhat # put quotes around it
   return quote & pWhat & quote
end q
-- 
   Humorous sports t-shirts
   http://www.villagetshirts.com
  WlND0WS and MAClNT0SH shareware games
  http://www.gypsyware.com