rs1.Open "SELECT PageTitle,HeadText FROM SitePages WHERE SitePageId=" & CLng(Applify.PageParam("printID")), Applify.Connection,3,1
:
scriptbeg
!!!!!! Microsoft VBScript runtime error:Type mismatch: 'Clng' Line:58 Char:0
rs1.Open "SELECT * FROM SitePages WHERE SitePageId=" & CLng(Applify.PageParam("printID")), Applify.Connection,3,1
:
PageElement:printpage
!!!