Have you tried sending a shell command?

Here is the full Windows code that used to work:

  else if (the platform) is "Win32" then
    set the hideConsoleWindows to true
    put empty into theTitle
    if "NT" is in the systemVersion then
      set the shellCommand to "cmd.exe"
      put quote & quote into theTitle
    end if
    get shell("start" && theTitle && quote & tURL & quote)
    if the result is empty then
      put empty into tUrl
      exit goUrl # success
    else # failed, try again
      local intApp
      local EXE_off
put queryRegistry("hkey_local_machine\software\classes\http\shell\open\command\") into intApp if char 1 of intApp is quote then clear char 1 of intApp # strip leading quote
      put offset("EXE",intApp) into EXE_off
      put char 1 to (EXE_off+2) of intApp into intApp
      launch tURL with intApp
      if the result is empty then
        put empty into tUrl
        exit goUrl # success
      else # failed, try again
put word 1 to -2 of queryRegistry("HKEY_LOCAL_MACHINE\Software\Classes\http\shell\open\command\") into tBrowserPath
        launch (tBrowserPath && tURL)
        if the result is empty then
          put empty into tUrl
          exit goUrl # success
        end if
      end if
    end if


--
  Humorous sports t-shirts
  http://www.villagetshirts.com
 WlND0WS and MAClNT0SH shareware games
 http://www.gypsyware.com
_______________________________________________
metacard mailing list
[email protected]
http://lists.runrev.com/mailman/listinfo/metacard

Reply via email to