%
'''This vote application was code 5 years ago and modify to fit this porject.'''
submitID=trim(FormatTextHTML(request.querystring("submitID")))
votedID=request.Cookies("votedID")
if order="" or order="title" then
order="YourEditorial"
elseif order="firstname" then
order="FirstName"
end if
'Get the Editorial Body
set rsDetail=server.CreateObject("ADODB.RecordSet")
SQLDetail="select * from tbFREditorial where submitID=" & submitID
rsDetail.open SQLDetail, "DSN=dotcom", 1,3
'Get the list of article
set rs=server.CreateObject("ADODB.RecordSet")
SQL="select submitID, YourEditorial, FirstName, LastInitial from tbFREditorial where intStatus = 2 order by " & order
rs.open SQL, "DSN=dotcom", 1,3
TotalRecord=rs.RecordCount
HalfRecord=round(TotalRecord/2)
%>
Inkheart: Speak Your Mind | Scholastic.com
<% doMenu %>