<%@ Language=VBScript %>
<%
dim intDocumentID
dim strTitle
dim strContent
dim adoCn
dim strSQL
set adoCn = Server.CreateObject("ADODB.Connection")
adoCn.Open strConn2
'Claire - This is where you change the page ID!!!
intDocumentID = 204
dim adoRs
set adoRs = Server.CreateObject("ADODB.Recordset")
strSQL = "Select * From Documents where DocumentID=" & intDocumentID
set adoRs = adoCn.Execute(strSQL)
If not adoRs.EOF then
strTitle = adoRs("Title")
strContent = adoRs("Content")
'strPageProperties = adoRs("PageProperties")
End If
adoRs.Close
set adoRs = nothing
adoCn.Close
set adoCn = nothing
%>
Street lights, sports and architectural lighting, road traffic signs and signage - AK Lighting and Signs
