Convertire codice da Js a VBS

[Colino]

Ciao,
devo convertire questo codice da JS a vbs come si fa?

  <%
   var Path = Server.MapPath("/mdb-database/counter.txt");
   var Fso = new ActiveXObject("Scripting.FileSystemObject");
   var OpenStr = Fso.OpenTextFile(Path);
   var Str = OpenStr.ReadLine();
   OpenStr.Close();
   var Counter = parseInt(Str);
   Counter++;
   var CloseStr = Fso.CreateTextFile(Path);
   CloseStr.WriteLine(Counter);
   CloseStr.Close();
   Response.Write(Counter);
%>