<% '========================================================= '产品目录：产品N系列 '软件名称：图文信息系统 '当前版本：2003.8.0 '========================================================= 'Copyright (C) 2002-2003 Zhtc.com. All rights reserved. '网站: http://www.Zhtc.com '程序制作：轻风云(QQ:655071) skeen@Zhtc.com,skeen@263.net,skeen@sohu.com '论坛支持：论坛(bbs) '========================================================= %> <% filename=request.querystring("filename") conn.execute("update News set click=click+1 where filename='"&filename&"'") set rs = server.createobject("adodb.recordset") rs.source = "select click from News where filename='"&filename&"'" rs.open rs.source,conn,1,1 %> javastr="<%=rs("click")%>" document.write(javastr) <% rs.close set rs=nothing %>