<%@LANGUAGE="VBSCRIPT"%> <% Dim our_news Dim our_news_numRows Set our_news = Server.CreateObject("ADODB.Recordset") our_news.ActiveConnection = MM_creativeconcern_STRING our_news.Source = "SELECT * FROM our_news ORDER BY myDate DESC" our_news.CursorType = 0 our_news.CursorLocation = 2 our_news.LockType = 1 our_news.Open() our_news_numRows = 0 %> <% Dim RSnewsMain__MMColParam RSnewsMain__MMColParam = "2" if (Request("MM_EmptyValue") <> "") then RSnewsMain__MMColParam = Request("MM_EmptyValue") %> <%=workspaceName%>
our news
<% if our_news.Fields.Item("image").Value <> "" then %>

" border="1">

<% end if %>

<%=(our_news.Fields.Item("headline").Value)%>

<%=(our_news.Fields.Item("intro").Value)%>

<% response.write(Replace(our_news("body"), vbCrLf, "
"))%>


<%= DoDateTime((our_news.Fields.Item("myDate").Value), 1, 1033) %>

 
<% our_news.Close() %>