<%
strCurrMenu=GetVariable("mnid")
if GetVariable("id")="" then
ShowMsg "You visted information can't being！"
end if
'新闻阅读次数＋1
conn.execute "Update web_news Set nHits=nHits + 1 Where id=" & GetVariable("id"),0,1
'读新闻
strSQL="Select * From v_web_news Where id=" & GetVariable("id")
rs.open strSQL,conn,1,1
if rs.recordcount<=0 then
ShowMsg "Can Not Fund!"
end if
%>
上海白鹤易人企业策划咨询有限公司
