|
||||||||||||||||||||||||||||||||||||||||
娱乐频道： 大头贴
动漫欣赏
同城交友
小游戏
QQ秀
笑话
免费电影
电脑学习
汽车资讯
网络小说
 网友意见反馈
|
||||||||||||||||||||||||||||||||||||||||
| -> 信息详细内容 | ||
| 信息标题 | 德州希望电脑有限责任公司 | |
| 有效日期 | 2008-8-15 --> 2009-8-15 | |
详细介绍 | 公司设及IT一切相关设备的销售安装和设备使用培训. 主营各大品牌电脑.服务器.数码产品.打印机. 汉王笔系列产品. 承接各类系统集成项目.如机房安装,视屏会议,多媒体教室,监控,综合步线. 公司主页:www.dzhope.com.cn 联系电话:2272272 手机:15066630011 陈经理(先生) | |
| 联系姓名 | 陈 | |
| 联系地址 | 山东德州 | |
| 联系电话 | 15066630011 | |
| 联系信箱 | bateyok@163.com | |
| 发布会员 | 德州希望电脑 | |
| <%set classad = Server.CreateObject("shuziren_com.huiyuan") classad.classad dh_l, x_top, z_top set classad=nothing '系统自动定时更新内容 If Application("classaddel_sj") <> "" Then If DateDiff("h", CDate(Application("classaddel_sj")), Now()) > 12 Then '更新24小时的分类广告顶置信息 conn.Execute ("Update gqxx set ding=0 where ding<>0 and ding<100 and datediff(d,sj3,getdate())>1") '更新48小时的分类广告标红信息 conn.Execute ("Update gqxx set tui=0 where tui<>0 and datediff(d,sj3,getdate())>2") '删除已过期的分类广告信息 Set rs = conn.Execute("select id from gqxx where datediff(d,sj,getdate())>sj2 order by id") If Not rs.EOF Then Do While Not rs.EOF del_wj_myfso "/html/classad/" & rs(0) & ".htm" rs.MoveNext Loop End If rs.Close: Set rs = Nothing conn.Execute ("Delete gqxx where datediff(d,sj,getdate())>sj2") Application("classaddel_sj") = Now() End If Else Application("classaddel_sj") = DateAdd("h", -13, Now()) End If conn.Close Set conn = Nothing%> |
 |