News Articles
For more information please contact:
Rachel Flint
Director of Marketing
Hubbell Realty Company
6900 Westown Parkway
West Des Moines, IA 50266
rachel.flint@hubbellrealty.com
|
|
<%
Dim objConn, strConn, objRS, strSQL
strConn = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=m:\web\databases\hubbellrealty.mdb"
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open strConn
strSQL = "SELECT * FROM NewsArticles where ArticleCL=yes order by ArticleDate DESC"
Set objRS = Server.CreateObject("ADODB.Recordset")
objRS.Open strSQL, objConn
While not objRS.EOF
%>
<% if objRS("ArticleURL") = "0" then %>
" target="_blank">
<% else %>
" target="_blank">
<% end if %>
<%= objRS("ArticleTitle") %>
<%= MonthName(Month(objRS("ArticleDate"))) %> <%= Day(objRS("ArticleDate")) %>, <%= Year(objRS("ArticleDate")) %>
Reproduced with permission of <%= objRS("ArticleNewspaper") %> |
<%
objRS.MoveNext
Wend
objRS.Close
Set objRS = Nothing
objConn.Close
Set objConn = Nothing
%>
|
