| |
| 洗衣技巧 |
<%
t=0
Set rs=Server.CreateObject("ADODB.RecordSet")
sql="SELECT * from NEWS order by id desc"
rs.Open sql,conn,1,1
if not Rs.eof then
do while not rs.eof
t=t+1
%>
|
|
<%
if t>=1 then exit do
rs.movenext
loop
else
response.write "| 尚无收录 | "
end if
rs.close
%>
|
|
|
| 内部新闻 |
<%
t=0
Set rs=Server.CreateObject("ADODB.RecordSet")
sql="SELECT * from NEWS order by id desc"
rs.Open sql,conn,1,1
if not Rs.eof then
do while not rs.eof
t=t+1
%>
|
|
<%
if t>=1then exit do
rs.movenext
loop
else
response.write "| 尚无收录 | "
end if
rs.close
%>
|
|
|
|
|
