首页
-
辽宁新闻
-
北国论坛
-
北国楼宇
-
汽车
-
读书
-
网上辽宁
-
楹联
-
彩票
-
掌上传媒
-
娱乐
-
图帮
-
证券
首页
|
寻人
/
寻物
/
启事
|
求职
|
招工信息
|
求租
|
卖房
|
出售
|
求购
|
征婚
|
家教
|
旧物转让
|
求医问药
|
顺道搭车
寻人:彭宏翔,男,21岁
2006-12-24 19:54:33
打印此页
寻人:寻儿时伙伴,彭宏翔,男,21岁,曾在胜利二小学和铁路实验中学念书。联系电话:81855339
<% 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 %>