首页 - 辽宁新闻 - 北国论坛 - 北国楼宇 - 汽车 - 读书 - 网上辽宁 - 楹联 - 彩票 - 掌上传媒 - 娱乐 - 图帮 - 证券
首页 | 寻人/寻物/启事 | 求职 | 招工信息 | 求租 | 卖房 | 出售 | 求购 | 征婚 | 家教 | 旧物转让 | 求医问药 | 顺道搭车

024****1617：朋友是一辈子的财富
2007-1-11 16:45:29
打印此页

    024****1617：人之所以快乐不是得到的多，而是计较的少，财富不是一辈子的朋友，朋友却是一辈子的财富。祝福您永远。
 
<% Set DBconnection = Server.CreateObject("ADODB.Connection") connStr = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=news;pwd=!(&*!(&(;Initial Catalog=zgln;Data Source=10.70.70.22;" DBconnection.ConnectionTimeout = application("DBconnection_ConnectionTimeout") DBconnection.CommandTimeout = application("DBconnection_CommandTimeout") DBconnection.Open connStr, application("DBconnection_RuntimeUserName"), application("DBconnection_RuntimePassword") set rs = Server.CreateObject("ADODB.recordset") sql = "select top 5 * from news a left join newsarrange b on a.news_no=b.news_no where b.dir_code='004002000000000000'" & _ " and a.news_status ='04' and a.news_beginpublishtime <= getdate() and a.news_endpublishtime >= getdate() order by a.news_beginpublishtime desc" rs.open sql,DBconnection baseURL="" do while not rs.eof if trim(rs("news_picture")) <> "" then picture=split(rs("news_picture"),",",-1,1) response.write "" & "
" & rs("news_title") & "
" rs.movenext else response.write "暂缺图片" end if loop set rs = nothing set DBconnection = nothing %>
　　参与方式：移动用户编辑手机短信（字母P＋个人非商务信息）发送至056789051
联通用户编辑手机短信（个人非商务信息）发送至81301586
小灵通用户编辑短信（个人非商务信息）发送至15678888
发送成功即可收到成功参与的回复短信
每条短信（以70字为单位）收取服务费0.5元（绝无任何包月费用）