I changed the text file name that this is written to, it doesn't solve my problem, but it sounds like it should solve yours. Good Luck.
<%@ LANGUAGE=VBScript %>
<head>
<title>Using The HTML Form POST Method For Data Entryes</title>
</head>
<body>
<p><font face="Comic Sans MS" size="4" style="BACKGROUND-COLOR: #99ff00">Using The HTML
Form POST Method For Data Entry</font></p>
<p><font face="Georgia">This HTML form uses the HTML Form POST method to transfer the HTML
Form data to the ASP application. The ASP form retrieves the data from the client data
entry form. It will then write all the information to a file called TextFile.txt</font></p>
<hr>
<p><font size="4">Thanks for submitting the HTML Form! </font></p>
<! -- Verisign response to transaction -- >
<! -- This section will take print the AMOUNT,TYPE,RESULT,AUTHCODE,RESPMSG,AVSDATA, and PNREF variable resulting from your transaction -->
<! -- It will also define variables to be written to a text file later in this ASP code -- >
<p><font face="Arial" size="3"><strong><%= "Total Cost: " & Request.Form ("AMOUNT") %><% TOTAL=Request.Form("AMOUNT") %><br>
<%= "Transaction Type: " & Request.Form ("TYPE") %><% TYPE1=Request.Form("TYPE") %><br>
<%= "Result: " & Request.Form ("RESULT") %><% RESULT=Request.Form("RESULT") %><br>
<%= "AuthCode: " & Request.Form ("AUTHCODE") %><% AUTHCODE1=Request.Form("AUTHCODE") %><br>
<%= "Respnse Message: " & Request.Form ("RESPMSG") %><% RESPMSG=Request.Form("RESPMSG") %><br>
<%= "AVS: " & Request.Form ("AVSDATA") %><% AVSDATA=Request.Form("AVSDATA") %><br>
<%= "Trans ID: " & Request.Form ("PNREF") %><% PNREF=Request.Form("PNREF") %><br>
<%= "INOVICE#: " & Request.Form ("INVOICE") %><% INVOICE=Request.Form("INVOICE") %><br>
<br>
</p>
<hr>
<! -- Prints out Posted data for Customer Billing Information -- >
<%= "Customer Billing Info:" %>
<p><br>
<br>
<%= "Name: " & Request.Form ("NAME") %><% NAME=Request.Form("NAME") %><br>
<%= "Address: " & Request.Form ("ADDRESS") %><% ADDRESS=Request.Form("ADDRESS") %><br>
<%= "City: " & Request.Form ("CITY") %><% CITY=Request.Form("CITY") %><br>
<%= "State: " & Request.Form ("STATE") %><% STATE=Request.Form("STATE") %><br>
<%= "Zip: " & Request.Form ("ZIP") %><% ZIP=Request.Form("ZIP") %><br>
<%= "Country: " & Request.Form ("COUNTRY") %><% COUNTRY=Request.Form("COUNTRY") %><br>
<%= "Phone: " & Request.Form ("PHONE") %><% PHONE=Request.Form("PHONE") %><br>
<%= "Fax: " & Request.Form ("FAX") %><% FAX=Request.Form("FAX") %><br>
<%= "Email: " & Request.Form ("EMAIL") %><% EMAIL=Request.Form("EMAIL") %><br>
<br>
</p>
<! -- Prints out Posted data for Customer Shipping Information -- >
<hr>
<%= "Customer Shipping Info:" %>
<p><br>
<br>
<%= "Name: " & Request.Form ("NAMETOSHIP") %><% NAMETOSHIP=Request.Form("NAMETOSHIP") %><br>
<%= "Address: " & Request.Form ("ADDRESSTOSHIP") %><% ADDRESSTOSHIP=Request.Form("ADDRESSTOSHIP") %><br>
<%= "City: " & Request.Form ("CITYTOSHIP") %><% CITYTOSHIP=Request.Form("CITYTOSHIP") %><br>
<%= "State: " & Request.Form ("STATETOSHIP") %><% STATETOSHIP=Request.Form("STATETOSHIP") %><br>
<%= "Zip: " & Request.Form ("ZIPTOSHIP") %><br>
<% ZIPTOSHIP=Request.Form("ZIPTOSHIP") %><%= "Country: " & Request.Form ("COUNTRYTOSHIP") %><% COUNTRYTOSHIP=Request.Form("RESULT") %><br>
<%= "Phone: " & Request.Form ("PHONETOSHIP") %><% PHONETOSHIP=Request.Form("PHONETOSHIP") %><br>
<%= "Fax: " & Request.Form ("FAXTOSHIP") %><% FAXTOSHIP=Request.Form("FAXTOSHIP") %><br>
<%= "Email: " & Request.Form ("EMAILTOSHIP") %><% EMAILTOSHIP=Request.Form("EMAILTOSHIP") %><br>
<%= " " %></p>
<! -- Prints out User field Information -- >
<hr>
<%= "User1 - User10 field" %>
<p><br>
<br>
<%= "User1: " & Request.Form ("USER1") %><% user1=Request.Form("UsER1") %><br>
<%= "User2: " & Request.Form ("USER2") %><% user2=Request.Form("USER2") %><br>
<%= "User3: " & Request.Form ("USER3") %><% user3=Request.Form("USER3") %><br>
<%= "User4: " & Request.Form ("USER4") %><% user4=Request.Form("USER4") %><br>
<%= "User5: " & Request.Form ("USER5") %><% user5=Request.Form("USER5") %><br>
<%= "User6: " & Request.Form ("USER6") %><% user6=Request.Form("USER6") %><br>
<%= "User7: " & Request.Form ("USER7") %><% user7=Request.Form("USER7") %><br>
<%= "User8: " & Request.Form ("USER8") %><% user8=Request.Form("USER8") %><br>
<%= "User9: " & Request.Form ("USER9") %><% user9=Request.Form("USER9") %><br>
<%= "User10: " & Request.Form ("USER10") %><% user10=Request.Form("USER10") %><br>
<%= "CustID: " & Request.Form ("CUSTID") %><% user11=Request.Form("CUSTID") %><br>
<br>
</strong></font></p>
<! -- Instantiated FileSystem object and write to a directory and file you specified -- >
<! -- Writes Payflow Link variables to a file called TextFile.txt -- >
<! -- /IISSamples/Default is the location of TextFiletxt to be written -- >
<! -- The location and name of the file can be anything. The below is just an example -- >
<% Set FileStreamObject=CreateObject("Scripting.FileSystemObject")
Set WriteStream=FileStreamObject.CreateTextFile(Server.MapPath ("\rtruong\db") _
& "\VFile.txt",True)
WriteStream.Writeline("Total: " & TOTAL)
WriteStream.Writeline("Transaction Type: " & TYPE1)
WriteStream.Writeline("Result: " & RESULT)
WriteStream.Writeline("Invoice #: " & INVOICE)
WriteStream.Writeline("AUTHCODE: " & AUTHCODE1)
WriteStream.Writeline("Response Message: " & RESPMSG)
WriteStream.Writeline("AVS Data: " & AVSDATA)
WriteStream.Writeline("Trans Id: " & PNREF)
WriteStream.Writeline(" ")
WriteStream.Writeline("Customer Billing Information:")
WriteStream.Writeline("Name: " & NAME)
WriteStream.Writeline("Address: " & ADDRESS)
WriteStream.Writeline("CITY: " & CITY)
WriteStream.Writeline("STATE: " & STATE)
WriteStream.Writeline("ZIP: " & ZIP)
WriteStream.Writeline("Country: " & COUNTRY)
WriteStream.Writeline("Phone: " & PHONE)
WriteStream.Writeline("Fax: " & Fax)
WriteStream.Writeline("Email: " & EMAIL)
WriteStream.Writeline(" ")
WriteStream.Writeline("Customer Shipping Information:")
WriteStream.Writeline("Name: " & NAMETOSHIP)
WriteStream.Writeline("ADDRESS: " & ADDRESSTOSHIP)
WriteStream.Writeline("CITY: " & CITYTOSHIP)
WriteStream.Writeline("STATE: " & STATETOSHIP)
WriteStream.Writeline("ZIP: " & ZIPTOSHIP)
WriteStream.Writeline("COUNTRY: " & COUNTRYTOSHIP)
WriteStream.Writeline("PHONE: " & PHONETOSHIP)
WriteStream.Writeline("FAX: " & FAXTOSHIP)
WriteStream.Writeline("EMAIL: " & EMAILTOSHIP)
WriteStream.Writeline(" ")
WriteStream.Writeline("User1 - User10 Fields")
WriteStream.Writeline("User1: " & user1)
WriteStream.Writeline("User2: " & user2)
WriteStream.Writeline("User3: " & user3)
WriteStream.Writeline("User4: " & user4)
WriteStream.Writeline("User5: " & user5)
WriteStream.Writeline("User6: " & user6)
WriteStream.Writeline("User7: " & user7)
WriteStream.Writeline("User8: " & user8)
WriteStream.Writeline("User9: " & user9)
WriteStream.Writeline("User11: " & user10)
WriteStream.Writeline(" ")
WriteStream.Writeline("Telecheck")
WriteStream.Close
%>
</body>