<% @LANGUAGE = JavaScript %>
<%
// =================================================================
// START SK 01-05-04
// =================================================================
// =================================================================
// The following three lines of code are used to
// ensure that this page is not cached on the client.
// =================================================================
Response.CacheControl = "no-cache"
Response.AddHeader("Pragma", "no-cache")
Response.Expires = -1
// =================================================================
// Get CentreID
// =================================================================
var nCentreID = Application("CENTREID")
// =================================================================
// get pass page number - if none passed then default to 0!
// =================================================================
var nPage = Request.Querystring("page").item
nPage = (typeof(nPage)=="undefined") ? 0 : parseInt(nPage)
// =================================================================
// Open up database connection
// =================================================================
var oConnection = Server.CreateObject("ADODB.Connection")
oConnection.Open(Application("ConnectionString"))
// =================================================================
// Get news counts
// =================================================================
cQuery = "select count(*) as cnt from rcpressreleases where centreid="+nCentreID
oNewsRS = oConnection.Execute(cQuery)
nNewsCount = parseInt(oNewsRS("cnt").value)
// =================================================================
// Sort out Paging
// =================================================================
var nPageSize=10
var nMaxPage=parseInt(nNewsCount/nPageSize)
var nPageStart = (nPage * nPageSize) + 1
var nPageEnd = nPageStart + nPageSize - 1
nPageEnd = Math.min(nPageEnd,nNewsCount)
// =================================================================
// Set the number of characters to desplay of the description
// NB Set this to 6000 or bigger for all of the description
// =================================================================
var nDescriptionSize = 200
// =================================================================
// Get news articles
// =================================================================
//cQuery = "select title,description,convert(char,releasedate,103) as releasedate from rcpressreleases where centreid="+nCentreID+" order by releasedate desc,title"
cQuery=""
cQuery += "select top "+nPageSize+" uid,title,description,convert(char,releasedate,103) as releasedate2,case when len(convert(varchar,description))>"+nDescriptionSize+" then left(convert(varchar,description),"+(nDescriptionSize-5)+")+' ....' else convert(varchar,description) end as description "
cQuery += "from rcpressreleases "
cQuery += "where centreid="+nCentreID+" and uid not in "
cQuery += "( select top "+(nPage*nPageSize)+" uid "
cQuery += "from rcpressreleases where centreid="+nCentreID+" "
cQuery += "order by releasedate desc,title ) "
cQuery += "order by releasedate desc,title "
oNewsRS = oConnection.Execute(cQuery)
// =================================================================
// function to display date in a pretty way!!!
// =================================================================
function DisplayDate(cDateStr, lHideMonth) {
if(typeof(cDateStr)!="string") {
return " "
}
var cDay = cDateStr.substring(0,2)
var cMonth = cDateStr.substring(3,5)
var cYear = cDateStr.substring(6,10)
if (cDay.substring(0,1)=="0") {
cDay = cDay.substring(1,2)
}
switch (cDay){
case "1" :
var cSuffix = "st"
break
case "21" :
var cSuffix = "st"
break
case "31" :
var cSuffix = "st"
break
case "2" :
var cSuffix = "nd"
break
case "22" :
var cSuffix = "nd"
break
case "3" :
var cSuffix = "rd"
break
case "23" :
var cSuffix = "rd"
break
default:
var cSuffix = "th"
}
switch (cMonth) {
case "01":
var cMonthName = "January"
break
case "02":
var cMonthName = "February"
break
case "03":
var cMonthName = "March"
break
case "04":
var cMonthName = "April"
break
case "05":
var cMonthName = "May"
break
case "06":
var cMonthName = "June"
break
case "07":
var cMonthName = "July"
break
case "08":
var cMonthName = "August"
break
case "09":
var cMonthName = "September"
break
case "10":
var cMonthName = "October"
break
case "11":
var cMonthName = "November"
break
case "12":
var cMonthName = "December"
break
}
cRetValue = cDay +" "//+ "" + cSuffix + " "
if (!lHideMonth) {
cRetValue += cMonthName + " " + cYear
}
return cRetValue
}
// =================================================================
// END SK 01-05-04
// =================================================================
%>
Thornfield Properties : News
<%
// =================================================================
// START SK 01-05-04
// create a list on months & years
// =================================================================
Response.Write("\r")
Response.Write("
![](\"images/blank.gif\"){kind=spacer}
