skip to main content

News from CMS

<% Dim SQLQuery call s_DbaseConnect() SQLQuery = "SELECT m_id,m_name,m_date FROM " & cfgTableName & " WHERE m_active = 'Y' ORDER BY m_date desc;" call s_RSConnect(RS, SQLQuery, "adOpenForwardOnly", "adLockReadOnly") IF NOT RS.EOF THEN DO WHILE NOT RS.EOF %>

"><% response.write(f_displaydata("m_name")) %>
<% response.write(f_formatDateSQLOut(f_displaydata("m_date"),"shortdate")) %>

<% RS.MoveNext LOOP ELSE %>

Sorry, we have no news at present.

<% END IF call s_RSClose(RS) call s_DbaseClose() %>

Corporate Mailing Solutions Ltd
The Old Exchange
Mill Lane
Great Dunmow
Essex
CM6 1BG

Tel: 07000 781693
Fax: 07000 781694