<%@ Language=VBScript %>

<% 'create a htm file in the same directory where this asp file is executing Set a = fso.CreateTextFile(Server.MapPath("testfile.htm"), True, True) 'overwrite and unicode a.WriteLine("This is a test2.") a.Close %>