| |
|
<%
dim rs1
set rs1=server.CreateObject("adodb.recordset")
rs1.open "select * from shop_pinglun where id="&owen&"",conn,1,1
if rs1.eof and rs1.bof then
response.write""
else do while not rs1.eof
%>
<%rs1.movenext
loop
rs1.close
set rs1=nothing
end if%>
|
|