<% Set FSO = Server.CreateObject("Scripting.FileSystemObject") Set tso = FSO.CreateTextFile("\\local ip address of computer\c$\inetpub\wwwroot\FileStatus.txt", True) tso.WriteLine "Read" tso.Close Set tso = Nothing Set FSO = Nothing %>