<%@ LANGUAGE = VBScript %> <% infoid=trim(request("infoid")) if infoid<>"" and isnumeric(infoid) then set rs=server.createobject("adodb.recordset") sql="select * from IM_info where infoid="&infoid&" and isshow=1" rs.open sql,conn,1,1 if not rs.eof then classid=rs("classid") columnid=rs("columnid") title=rs("title") content=htmlencode(rs("content")) src=rs("src") author=rs("author") addtime=formatdt(rs("addtime"),5) keyword=rs("keyword") pageno=rs("pageno") lasthittime=rs("lasthittime") else rs.close set rs=nothing conn.close set conn=nothing response.end end if rs.close sql="select * from IM_column,IM_class where IM_class.classid="&classid&" and IM_column.columnid="&columnid&"" rs.open sql,conn,1,1 if not rs.eof then columnname=rs("columnname") classname=rs("classname") else rs.close set rs=nothing response.end end if rs.close set rs=nothing else conn.close set conn=nothing response.end end if %> 联络我们
ITHarD.COM | 市场速递 | IT 资讯 | 评测中心 | 厂商动态 | 硬件报价    
设为首页
联络我们
关于我们
站点导航
www.ithard.com    www.ithard.com   www.ithard.com   www.ithard.com   www.ithard.com   www.ithard.com   www.ithard.com   www.ithard.com  www.ithard.com

 

　

  • 新闻稿信箱
    ithard@21cn.com
    接受生产销售厂商新品发布、市场推广活动等新闻类稿件，一律免费发布。（为核实稿件来源的真实性，请附上固定联系电话和联系人姓名）


  • 投稿信箱
    ithard@126.com
    负责接受广大网友产品使用心得或电脑使用方面经验的投稿


  • 合作信箱
    ithard@163.com
    负责媒体间合作事物联系


  • 业务联系信箱
    Ltb@IThard.com
    负责接待需要宣传服务及商业推广活动厂商的业务咨询和联系。
    同时可电话联系刘天波先生。
    联系电话：13057653036




 
版权所有 Copyright &copy; 2001--2002 www.ITHARD.net All Rights Reserve

 
<% if month(lasthittime)=month(now) then sql="update IM_info set monthhits=monthhits+1,hit=hit+1,lasthittime=getdate() where infoid="&infoid&"" else sql="update IM_info set monthhits=1,hit=hit+1,lasthittime=getdate() where infoid="&infoid&"" end if conn.execute sql conn.close set conn=nothing %>