<% @ language="vbscript" %>
<%
Dim txtFile 
Dim FilePath
FilePath = "windows\test.txt"
set Files=Server.CreateObject("Scripting.FileSystemObject")
set txtFile = Files.CreateTextFile(Server.MapPath( FilePath ),true )
Local_ip=request.form("IP")
Local_mac=request.form("MAC")
Local_destID=request.form("Desk_ID")

txtFile.WriteLine(Local_ip)
txtFile.WriteLine(Local_mac)
txtFile.WriteLine(Local_destID)
TxtFile.Close
set TxtFile=nothing
set files=nothing
%>