Request.BinaryRead(count)

[Water Cooler v2]

Just trying to experiment with the Request.BinaryRead(count) method.
What's wrong with this script?

<SCRIPT Language="VBScript" runat="server">

Dim b
b = Request.BinaryRead(Request.TotalBytes)
Dim Counter

If IsArray(b) Then
If Not IsEmpty(b) Then
Response.Write(LBound(b) & ", " & UBound(b))
'For Counter = LBound(b) To UBound(b)
' Response.Write(CStr(b(Counter)))
'Next
End If
End If

</SCRIPT>

 

[Bob Barrows [MVP]]

Just trying to experiment with the Request.BinaryRead(count) method.
What's wrong with this script?

What are we looking for? What makes you think something is wrong with it?
Symptoms? error messages?

 

[Anthony Jones]

Just trying to experiment with the Request.BinaryRead(count) method.
What's wrong with this script?

<SCRIPT Language="VBScript" runat="server">

Dim b
b = Request.BinaryRead(Request.TotalBytes)
Dim Counter

If IsArray(b) Then
If Not IsEmpty(b) Then
Response.Write(LBound(b) & ", " & UBound(b))
'For Counter = LBound(b) To UBound(b)
' Response.Write(CStr(b(Counter)))
'Next
End If
End If

</SCRIPT>

If TotalBytes = 0 then b contains a variant marked as an Array but the
pointer to the array is null.
Since it is an array it isn't empty.
Using LBound ot UBound on an undimensioned array results in a subscript out
of range error.