Arduino Result to text file

According to this microsoft article
http://support.microsoft.com/kb/115831
COM ports higher than 9 are named like this: \.\COM10

I don't have windows 7 to test it, but I think it will work if you change the line to:

  com = fso.OpenTextFile("\\\\.\\COM25:9600,N,8,0", ForReading)