Before this line:

$frmMessage = val ( "&" + olecallfunc ( $doc, "getElementById", "s", "frmMessage" ))

Insert this...

?"doc=$doc"

What's the value of $doc - zero ?

Shawn.