/asp/freeapps/pollmentor/pollmentorres.asp
<%
OPTION EXPLICIT
Response.Buffer = True
%>
<!--#include file="incpollmentor.asp"-->
<!--#include file="include_classes.asp"-->
<!--#include file="include_htmlgen.asp"-->
<!--#include file="template.asp"-->
<%
Dim sID
sID = Request.QueryString("id")
If sID = "" Then
sID = -1
End If
Dim sContent
Dim oPoll
Set oPoll = new Poll
oPoll.Open(sID)
sContent = Html_GeneratePoll(oPoll,true, 500)
Template_Write "PollMentor - demo from ASPCode.NET", sContent, "<h2>Hello</h2><p>This is a text of something bla bla</p>"
%>