<% Dim myObject set myObject = Server.CreateObject("tstresponse.test") myObject.objWriteHeader("<H1>test 2</H1>")%>