title: classic asp Request.Form("ac") is throwing error above 900 lines
body: <p>I have an form which on submit goes to tst.asp ,in tst.asp i was using Request.Form("ac") to get the value of an text box from previous page.the text box value is being copied from an text file.and in tst.asp page i am geting the value and writing it to an another .txt file.it is working fine if the no of lines is less than 900.if these lines crosses above 900 then i get the error msg 
  "Request object error 'ASP 0104 : 80004005'
  Operation not Allowed
  /CAPMAdjustments/arpit1.asp, line 8"
  line 8 is texttoinsert1 = Request.Form("ac").so can anyone please help me with this issue.below is the code which i wrote.</p>
  
  <pre><code>&lt;%@ LANGUAGE="VBSCRIPT" %&gt;
  &lt;HTML&gt;
  &lt;%
  FileName = Request.QueryString
  Dim FSO
  set FSO = server.createObject("Scripting.FileSystemObject") 
  if FSO.FileExists(FileName) Then
  Const ForReading = 1, ForWriting = 2, ForAppending = 3
  Const TristateUseDefault = -2, TristateTrue = -1, TristateFalse = 0
  Dim file    
  set file = FSO.GetFile(FileName)
  Response.Write FileName
  Dim sScriptLocation, sScriptName, iScriptLength, iLastSlash
  set sScriptLocation = Request.QueryString
  iLastSlash      = InStrRev(sScriptLocation, "\")
  iScriptLength   = Len(sScriptLocation)
  sScriptName     = Right(sScriptLocation, iScriptLength - iLastSlash)
  fname=Replace(sScriptName, ".txt", " ")
  Response.Write fname 
  Dim TextStream
  Set TextStream = file.OpenAsTextStream(ForReading, TristateUseDefault)
  %&gt;
  &lt;FORM action="tst.asp" id="form1" method=post name="form1"&gt;
  &lt;input type="hidden" name="ac" id="ac" value=""&gt;
  &lt;input type="textbox" name="fn" id="fn" value='&lt;%=fname%&gt;'&gt;
  &lt;button onclick=abc();&gt;save&lt;/button&gt;
  &lt;textarea rows="100" cols="230" contenteditable&gt;     
  &lt;%  
  Do While Not TextStream.AtEndOfStream  
  Dim Line
  Line = TextStream.readline
  Response.write "|" 
  Line = Line &amp; vbCRLF
  Response.write Line
  Loop
  %&gt;
  &lt;/textarea&gt;
  &lt;/form &gt;
  &lt;%
  Response.Write "&lt;/pre&gt;&lt;hr&gt;"
  Set TextStream = nothing
  Else
  End If
  Set FSO = nothing
  %&gt;
  &lt;/FONT&gt;
  &lt;/BODY&gt;
  &lt;script type="text/javascript" &gt;
  function abc()
  {
  var contenteditable = document.querySelector('[contenteditable]'),
  text1 = contenteditable.textContent;
  document.getElementById("ac").value=text1;
  alert(text1);
  }
  &lt;/script&gt;&lt;/HTML&gt;
  tst.asp page code is as follows
  &lt;%@ LANGUAGE="VBSCRIPT" %&gt;
  &lt;%Dim FSO
  set FSO = server.createObject("Scripting.FileSystemObject") 
  Dim ts  
  Dim a
  texttoinsert1 = Request.Form("ac")
  fname = Request.Form("fn")
  Dim fname, lname, name
  lname = "A"
  name = Request.Form("fn")+lname
  str = Replace(name, " ", "")
  set ts = FSO.CreateTextFile("E:\applications\FTP\Archive\"+str+".txt",true)
  a=Split(texttoinsert1,"|")
  for each x in a
  ts.Write x 
  next
  ts.Close()
  Response.Write "YOUR FILE HAS BEEN SAVED SUCCESFULLY WITH NAME:" &amp;str
  %&gt;
  </code></pre>