首页
-
辽宁新闻
-
北国论坛
-
北国楼宇
-
汽车
-
读书
-
网上辽宁
-
楹联
-
彩票
-
掌上传媒
-
娱乐
-
图帮
-
证券
首页
|
寻人
/
寻物
/
启事
|
求职
|
招工信息
|
求租
|
卖房
|
出售
|
求购
|
征婚
|
家教
|
旧物转让
|
求医问药
|
顺道搭车
130****2255：最近迷上电视剧《桔子郡男孩》
2006-11-22 18:52:43
打印此页
130****2255：最近迷上一部美国电视连续剧，名叫《桔子郡男孩》。忍不住很想和大家分享一下，真的特别的好看。它既不是悬疑风格，也不是搞笑路线，而是一部很有深度的写实电视剧。这部电视剧改变了我对美国电视剧的固有印象。
<% 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 %>
