Error con el objeto window

[ubrain]

Hola, ¿alguien me puede decir por qué en el siguiente código me da un error en el alert?

Código:

<script LANGUAGE="VBScript">
<!--
  sub Visualiza()
    Dim w
    w=window.open("reloj.htm", null, "directories=no,location=no,menubar=no,status=no,resizable=yes,scrollbars=yes,toolbar=no,titlebar=no")
    alert w.document.fgcolor
  end sub
-->
</script>

Gracias

ubrain