Upload - Enumerate text fields in a form.

<%
'Sample file Form-Texts.asp
' Enumerates all text (non-file) source fields.
'

'Create upload form
Dim Form: Set Form = Server.CreateObject("ScriptUtils.ASPForm")

'was the Form successfully received?
If Form.State = 0 Then
  'Number of text fields 
  Response.Write "<br>n of text fields:" & Form.Texts.Count
  '
  Response.Write "<br>" & vbCrLf

  Response.Write "Text field names and length:"
  'Enumerate texts 
  Dim Field: For Each Field In Form.Texts
    '
    Response.Write "<br> " & Field.Name & " - " & Field.Length
  Next

End If'Form.State = 0 then

%>  
<br>sample For <A Href=http://www.motobit.com>HugeASP upload</A>
<br>Enumerates all text (non-file) source fields.

<form name="file_upload" method="POST" ENCTYPE="multipart/form-data" >
File1:<input Name=SourceFile1 Type=File><br>
File2:<input Name=SourceFile2 Type=File><br>
Description:<input Name=Description1><br>
<input Type=CheckBox Name=Save>Also save<br>
<TextArea Name=LongText Cols=60 Rows=10></TextArea><br>
<input Type=HIDDEN Name=HIDDENField Value="Some hidden data">
<input Name=SubmitButton Value="Submit >>" Type=Submit><br>

</Form>