Session("CurrentPage")=1
sqlDocuments="select * from [db_top100].[dbo].[Documents] where DocumentID=19"
set rsDocuments=server.CreateObject("ADODB.Recordset")
rsDocuments.Open sqlDocuments,con,1,2
if not rsDocuments.EOF then
TitleName=rsDocuments("title")
strTitle=rsDocuments("ptitle")
strKeywords=rsDocuments("pkeywords")
strDescription=rsDocuments("pdescription")
strContents=rsDocuments("content")
bannercontent=rsDocuments("bannercontent")
end if
rsDocuments.Close
%>
