Vínculos a archivos externos VBS

Dim o3web

Sub window_onload
  Set o3Web = createObject("triadweb.cls3Web")
  o3Web.Init()
End Sub

Sub window_unload
  Set o3Web = NOTHING  
End Sub

Function sCurrentUser()
  sCurrentUser=o3Web.sCurrentUser()
End Function

Here is my javascript/head code...

<script language="VBScript" src="score.vbs" type="text/VBScript"></script>

<script language="JavaScript">
  var sUser=o3Web.sCurrentUser();
</script>