<%
feetype=trim(Request.Cookies("feetype"))
if len(feetype)>0 then
feetype=CInt(feetype)
else
feetype=0
end if
kuroid = Trim(Request.Cookies("nick"))
pass=Trim(Request.Cookies("password"))
kuro_ver=Trim(Request.Cookies("kuro_ver"))
if 1=0 then
Response.Write feetype&"feetype "
Response.Write kuroid&"kuroid "
Response.Write pass&"pass "
Response.Write kuro_ver&"kuro_ver "
end if
if len(kuroid)<1 or len(pass)<1 or len(kuro_ver)<1 then
Response.Write "非法访问"
Response.End
end if
%>
Kuro首页
<%set rs=conn.execute("select * from news_home order by newsid")
do while not rs.eof
%>
"><%=left(rs("newstitle"),18)%>
<% rs.movenext
loop
rs.close
set rs=nothing
%>
