clock/date..

hej..
jeg har et lille script her, som jeg gerne vil have udvidet så den også kan skrive hvilken uge det er og hvilken ugedag det er..
nogen der kan hjælpe mig med dette ?
koden ser sådan her ud:
    Sub Window_Onload()
        window.setTimeout "UpdateTime",100
    End Sub
   
    Sub UpdateTime()
        Dim ClockString
        ClockString = ClockString & " Klok: " & Time & " - Dato: "
        ClockString = ClockString
        ClockString = ClockString & Date
        nowtime.innerText = ClockString
        window.setTimeout "UpdateTime",100
    End Sub

på forhånd mange tak..