如何将下列vbs脚本的内容输出到一个.txt里啊？在线等~！

set ws=wscript.createobject("wscript.shell") 
v=ws.regread("HKEY_LOCAL_MACHINE\SOFTWARE\ceb\gts\version") 
Set Fso = CreateObject("Scripting.FileSystemObject")
Set Output = Fso.OpenTextFile("Output.txt",2)
Output.WriteLine N() & "的gts版本号是：" & v
Output.Close

Function N()
    strComputer = "."
    Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
    Set colComputers = objWMIService.ExecQuery("Select * from Win32_ComputerSystem")
    For Each objComputer in colComputers
        N = objComputer.Name
        Exit For
    Next
End Function