<%
SET RS2 = CN.EXECUTE("SELECT * FROM Act_csv WHERE ACTIVE_industry=1 ORDER BY NAME, CONTACT")
WHILE NOT RS2.EOF
RESPONSE.WRITE "" & RS2.FIELDS("NAME") & "
"
RESPONSE.WRITE RS2.FIELDS("CONTACT") & "
"
RESPONSE.WRITE RS2.FIELDS("ADDR1") & "
"
RESPONSE.WRITE RS2.FIELDS("ADDR2") & "
"
RESPONSE.WRITE RS2.FIELDS("CITY") & ", " & RS2.FIELDS("STATE") & " " & RS2.FIELDS("ZIP") & "
"
RESPONSE.WRITE "Phone: " & RS2.FIELDS("PHONE") & "
"
RESPONSE.WRITE "Fax: " & RS2.FIELDS("FAX_PHONE") & "
"
RESPONSE.WRITE "" & RS2.FIELDS("WEBSITE") & "
"
RESPONSE.WRITE "
"
RS2.MOVENEXT
WEND
%>
