I have this code, it should show me the computername:

LISTING 2: VBScript to Read the Machine Name Environment Variable

Dim Shell
Dim CompName

Set Shell = WScript.CreateObject("WScript.Shell"
CompName = Shell.ExpandEnvironmentStrings("%COMPUTERNAME%"

Msgbox "The computer name is " & CompName

But how do i use it on a webpage. I cant get it work.