|
<%
'-------------- Fokus Kita Query ---------------------
sql11="SELECT top 10 * FROM tbl_fokus WHERE published=1 order by tgl_fokus DESC"
on error resume next
set rs11=my_conn.execute(sql11)
if rs11.bof and rs11.eof then
response.write "Fokus Kita tidak dapat diturunkan!
"
'response.write sql
else
while not rs11.eof
response.write ""&FormatTanggal(rs11("tgl_fokus"))&"
"
response.write ""&rs11("txt_fokus")&"
"
response.write ""&left(rs11("txt_penjelasan"),200)&"... "
response.write "| "
response.write " | "
'response.write "Berita lainnya » |
"
rs11.movenext
wend
end if
'end if
rs11.close
set rs11=nothing
%>
