Yeah, postprep, i just didn't feel like handjobbing all the < signs ...Here's a rough start. It's a UDF that displays an IE splash screen complete with title, picture and message ... it floats around during script and goes away at the end ...
break on
$company = "Acme Inc."
$picture = "http://kixtart.org/board/bbtitle5.jpg"
$message = "Please be patient while your login script executes"
$Splash = Splash($company,$picture,$message)
?"Mapping drives ..." sleep 1
?"Poking the registry ..." sleep 3
?"Puring temp internet cache ..." sleep 1
?"Done!" sleep 1
$Splash.Quit()
$Splash = 0
exit
function Splash($company,$picture,$message)
dim $ie
$ie = createobject("internetexplorer.application")
$ie.menubar = 0
$ie.statusbar = 0
$ie.toolbar = 0
$ie.width = 200
$ie.height = 250
$ie.navigate("about:blank")
while $ie.busy and $ie.readystate <> 4 and @error = 0 loop
$html="
<html>
<head>
<title>$title</title>
</head>
<body scroll=no>
<img src='$picture'>
<center><h3>$message</h3></center>
</body>
</html>
"
$ie.document.write($html)
$ie.visible = 1
$Splash = $ie
endfunction
-Shawn
