%@ LANGUAGE = VBScript %> <% Option Explicit %> <% Response.Buffer = true %>
<% Dim Obj Set Obj = Server.CreateObject("IISSample.WriteStream") Obj.writeBytes %>