[VBS] CreateTextfile Met de datum als naam!

[maxuploader]

Hallo ik heb hieronder een scriptje!
Dat onderdeel is van een veel groter script, maar het gaat hierom:
Ik maak een textfile met: CreateTextFile en schrijf daar wat in.
Ik wil nu graag dat de naam van de .txt file de datum wordt:
Dus dat de naam niet is: jacomputer maar [dedatum].txt

Set fs = CreateObject("Scripting.FileSystemObject")
Set a = fs.CreateTextFile("C:\Check Script Output\jacomputer.txt", True)
a.WriteLine ("Computer was aan!")
a.Close

Wie helpt mij
Ik had zelf hieraan gedacht maar dat werkte niet:

Set fs = CreateObject("Scripting.FileSystemObject")
Set a = fs.CreateTextFile("C:\Check Script Output\"&date&".txt", True)
a.WriteLine ("Computer was aan!")
a.Close

maxuploader