<%
totalrec=Conn.Execute("select count(*) from Jobs")(0)
sql="Select * from Jobs order by ID desc"
Set Rs=Conn.Execute(sql)
if totalrec=0 then
Detail_Num=0
Else
Detail_Num=1
do while not rs.eof
ID=rs("ID")
call htmll("/CH/","/CH/",""&JobNameDiy&""&Separated&""&ID&"."&HTMLName&"","JobsView.asp","ID=",ID,"","")
call htmll("/EN/","/EN/",""&JobNameDiy&""&Separated&""&ID&"."&HTMLName&"","JobsView.asp","ID=",ID,"","")
Response.Write ""
Response.Flush
rs.movenext
Detail_Num=Detail_Num+1
loop
end if
rs.close
set rs=Nothing
conn.close
set conn=Nothing
%>