ASP.Net/Request/Request Filter

Материал из .Net Framework эксперт
Перейти к: навигация, поиск

Filtering the HTTP Request body using InputStream (VB.net)

   <source lang="csharp">

<%@ Page Language="vb" %> <%@ import namespace = "System.IO" %> <html>

  <head>
     <title>Filtering the HTTP Request body using InputStream</title>
  </head>

<body>

<% Dim intvar As Integer intvar = Request.TotalBytes Response.Write("The size of the current request body is:
") Response.Write(intvar & " bytes.
") Dim InStream As Stream Dim iCounter, Len, iRead As Integer Dim OutString As String Dim Found As Boolean InStream = Request.InputStream Len = CInt(InStream.Length) Dim ByteArray(Len) As Byte Trace.Write("Len", Len) iRead = InStream.Read(ByteArray, 0, Len) For iCounter = 0 to Len - 1 If Found = True Then OutString = OutString & Chr(ByteArray(iCounter)) End If If Chr(ByteArray(iCounter)) = "A" Then Trace.Write("Found", "Found an "A"") Found = True OutString = OutString & Chr(ByteArray(iCounter)) End If Trace.Write("Loop Number", iCounter) Trace.Write("CurrentChar", Chr(ByteArray(iCounter))) Next iCounter Response.Write("Output: " & OutString) %>

</body> </html>

      </source>