<% MM_HomeOffice_STRING = "DSN=Home_Office;" '----- Read the news set oDBCon = Server.CreateObject("ADODB.Connection") oDBCon.ConnectionString = MM_HomeOffice_STRING oDBCon.open set oRSNews = Server.CreateObject("ADODB.Recordset") oRSNews.ActiveConnection = oDBCon oRSNews.Source = _ "SELECT TOP 8 * FROM BB_Bulletin " & _ "WHERE (Type_ID = 1) AND (Status = 'A') AND (Extra like '%Theme=NewCouncil%') AND (CONVERT(DATETIME, Date_From, 102) <= CONVERT(DATETIME, '" & day(now) & " " & monthname(month(now)) & " " & year(now) & "', 102)) " & _ "ORDER BY Sort_Ranking ASC, Date_From DESC" oRSNews.CursorType = 0: oRSNews.CursorLocation = 2: oRSNews.LockType = 3 oRSNews.Open() %>
    <% if not oRSNews.eof then do while not oRSNews.eof %> <%' dDate = oRSNews.fields("Date_From").value %> <%' =day(dDate) & " " & left(monthname(month(dDate)),3) & " " & year(dDate)%> <% oRSNews.movenext loop end if oRSNews.close: set oRSNews = nothing %>

Northumberland Election 2008 Video

Polling Station... How to vote in a polling station

 

Tynedale Council show us how to vote in a polling station.