Environmental Update Archives
November 1, 2002 and later
|
|
<%
Product.Open "SELECT *, format(EventStartDate,'MMMM D, yyyy') as StartDate from StuyEvents where category like '%ENV%' order by EventStartDate desc"
If product.BOF And product.EOF Then
Response.write "No News at this time. Please check back."
Else
product.moveFirst
Do Until product.EOF
Response.write "| "
if product.fields("Title").value <> "" then
Response.write ""
Response.write product.fields("Title").value
Response.write " | "
end if
Response.write "| "
Response.write product.fields("EventBrief").value
Response.write product.fields("details").value
Response.write " | "
if product.fields("Contact1").value <> "" then
if product.fields("ConEmail1").value <> "" then
Response.write "Contact "
Response.write product.fields("Contact1").value
Response.write ""
else
Response.write "Contact "
Response.write product.fields("Contact1").value
end if
end if
if product.fields("Contact2").value <> "" then
if product.fields("ConEmail2").value <> "" then
Response.write " and "
Response.write product.fields("Contact2").value
Response.write ""
else
Response.write " and "
Response.write product.fields("Contact2").value
end if
end if
if product.fields("ConPhone").value <> "" then
Response.write "
"
Response.write product.fields("ConPhone").value
end if
Response.write " | "
Response.write " | "
if product.fields("Linktohtm").value <> "" then
Response.write ""
Response.write " details"
end if
Response.write "
| "
product.MoveNext
Loop
end if
%>
|
Archives
|
