So, das ganze funktioniert jetzt bei mir.
Wen es interessiert:
<script language="VBScript">
public function getUser()
Set sysinfo = CreateObject("WScript.Network")
window.document.FormName.User.value = sysinfo.username
end function
</script>
und im Body-Tag dann einfach:
onLoad="getUser()"