相关代码 |
|
cellspacing="0" cellpadding="0">
width="161" height="36">
bgcolor="#96A9E9" cellpadding="0" cellspacing="0">
rs.Open sql,conn,3,1
if not rs.EOF then%>
——
rs.close%>
本栏目主编愿为网友答疑解难
width="7" height="3">
border="0" width="100%" bgcolor="#FAFAFA">
rs.Open sql,conn,3,1
if not rs.EOF then%>
rs.close%>
rs.Open sql,conn,3,1
if not rs.EOF then
for i=1 to rs.RecordCount
%>
href="../looknews.asp?menuid=&infoid="
target="_blank">
next
end if
rs.Close
%>
width="129" height="30">
关键字： style="background-color: rgb(2,128,217); color: rgb(255,255,255); border: 1px solid rgb(0,0,0)">
日 期： style="background-color: rgb(2,128,217); border: 1px solid rgb(0,0,0)">- name="month" size="2" maxLength=2 style="background-color: rgb(2,128,217); border: 1px solid rgb(0,0,0)">- type="text" name="day" size="2" maxLength=2 onChange="daychange();"
style="background-color: rgb(2,128,217); border: 1px solid rgb(0,0,0)">
style="font-size: 9pt; background-color: rgb(2,128,217); color: rgb(255,255,255)">
sql="select * from news2_menu where visible='1' order by menuindex "
rs8.Open sql,conn,3,1
%>
for i=1 to rs8.RecordCount
if left(rs8("menuid"),3)"012" then
%>
end if
rs8.MoveNext
next
else
Response.Write "menu erro!"
end if
rs8.Close
set rs8=nothing%>
相关资源 |
|