Save request to a file (VB.net) : Save Request « Request « ASP.Net






  1. ASP.Net
  2. Request
  3. Save Request

Save request to a file (VB.net)

<%@ Page Language=VB Debug=true %>
<script runat=server>
Sub SubmitBtn_Click(Sender As Object, E As EventArgs)
    Dim I as Integer
    lblMessage4.Text = "Total number of Form fields: " _
        & Request.Form.Count & "<BR>"
    For I = 0 to Request.Form.Count - 1
        If Request.Form.GetKey(I) = "__VIEWSTATE" Then
            lblMessage4.Text  = lblMessage4.Text _
                & Request.Form.GetKey(I) & ": " _
                & Left(Request.Form(I), 20) & "<BR>"
        Else
            lblMessage4.Text  = lblMessage4.Text _
                & Request.Form.GetKey(I) & ": " _
                & Request.Form(I) & "<BR>"
        End If
    Next
    Request.SaveAs("therequest.txt", True)
End Sub
</SCRIPT>
<HTML>
<HEAD>
<TITLE>Form Sample Page</TITLE>
</HEAD>
<BODY >
<form runat="server">
<Font Face="Tahoma">
<asp:Label
    id="lblMessage1"
    runat="Server"
    Font-Bold="True"
    Text="Field 1: "
/>
<asp:TextBox
    id="Field1"
    runat="Server"
/>
<BR><BR>
<asp:Label
    id="lblMessage2"
    runat="Server"
    Font-Bold="True"
    Text="Field 2: "
/>
<asp:TextBox
    id="Field2"
    runat="Server"
/>
<BR><BR>
<asp:Label
    id="lblMessage3"
    runat="Server"
    Font-Bold="True"
    Text="Field 3: "
/>
<asp:TextBox
    id="Field3"
    runat="Server"
/>
<BR><BR>
<asp:button 
    id="butOK"
    runat="server"
    text="OK"
    Type="Submit"
    OnClick="SubmitBtn_Click" 
/>
<BR><BR>
<asp:Label
    id="lblMessage4"
    runat="Server"
    Font-Bold="True"
/>    
</Font>
</Form>
</BODY>
</HTML>








Related examples in the same category

1.Request Save in ASP.NET