<%
sqlstr = "SELECT newsid,news FROM dhnews order by newsid+orderid,orderid"
set rs = Conn.execute(sqlstr)
if rs.bof and rs.eof then
response.write "There is no news! You must add news first."
else
alldata = rs.getrows
numrow = Ubound(alldata,2)
for rowcounter = 0 to numrow
response.write "
" & alldata(1,rowcounter)
'response.write "
"
next
response.write "