var linkcode;linkcode=" mfkiqpl.openmdb
set rs=conn.execute("select id,n5,n3 from setos where id=1")
tt=rs("n5")
whow=rs("n3")
mfkiqpl.closers(rs)
set rs=server.createobject("adodb.recordset")
set rs.activeconnection=conn
if whow then
sql="select * from links where ok=true order by webtop,id"
else
sql="select * from links order by webtop,id"
end if
rs.open sql,,3,1
response.write("")
d=0
do while d response.write ("")
if rs("weblogo")"" then
response.write("")
else
response.write(""&rs("webname")&"")
end if
response.write("")
rs.movenext
d=d+1
if rs.eof then
exit do
end if
loop
mfkiqpl.closers(rs)
mfkiqpl.closeconn
response.write("")
%>";
document.write(linkcode)
