<%MDBname="news"%> <% 'on error resume next set conn=server.createobject("ADODB.CONNECTION") 'connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath(""&MDBpath&"../databases/data/"&MDBname&".asp") '如果你的服务器采用较老版本Access驱动,请用下面连接方法 connstr="driver={Microsoft Access Driver (*.mdb)};dbq=" & server.mappath(""&MDBpath&"../databases/data/"&MDBname&".asp") conn.open connstr %> <% newshu=2 '每个分类显示最新文章数 toplen=10 toplen_wz=13 chalen=2 search=search&"
" search=search&"

" search=search&"" search=search&"" search=search&"" set rs=server.CreateObject("ADODB.RecordSet") set rs_info=server.CreateObject("ADODB.RecordSet") set rs_yl=server.CreateObject("ADODB.RecordSet") set rs_t=server.CreateObject("ADODB.RecordSet") function Title(content) if content<>"" then Title=content Title=replace(Title,"[加粗]","") Title=replace(Title,"[倾斜]","") Title=replace(Title,"[下划线]","") Title=replace(Title,"[删除线]","") if instr(1,Title,"",1)<>0 then Title=Title+"" if instr(1,Title,"",1)<>0 then Title=Title+"" if instr(1,Title,"",1)<>0 then Title=Title+"" if instr(1,Title,"",1)<>0 then Title=Title+"" Title=replace(Title,"[红色]","") Title=replace(Title,"[蓝色]","") Title=replace(Title,"[绿色]","") Title=replace(Title,"[紫色]","") Title=replace(Title,"[酱色]","") Title=replace(Title,"[橙色]","") if instr(1,Title,"0 then Title=Title+"" Title=replace(Title,"[建议]","[建议]") Title=replace(Title,"[注意]","[注意]") Title=replace(Title,"[下载]","[下载]") Title=replace(Title,"[公告]","[公告]") Title=replace(Title,"[转载]","[转载]") Title=replace(Title,"[焦点]","[焦点]") Title=replace(Title,"[社会]","[社会]") Title=replace(Title,"[推荐]","[推荐]") Title=replace(Title,"[原创]","[原创]") end if End function function Site_Link(showType,showNum) dim link_i,link_ii link_i=0 link=0 if showType=1 then sql="select top "&showNum&" * from SiteLink where isLogo=1 order by DateTime" Rs.open sql,conn,1,1 if not(Rs.eof and Rs.bof) then do while not Rs.eof Site_Link = Site_Link & ""&vbcrlf link = link + 2 if link mod 6 =1 then Site_Link=Site_Link&"
" end if Rs.movenext loop end if rs.close else sql="select top "&showNum&" * from SiteLink where isLogo=0 order by DateTime" Rs.open sql,conn,1,1 if not(Rs.eof and Rs.bof) then do while not Rs.eof Site_Link = Site_Link & ""&rs("mySiteName")&""& vbcrlf link_i = link_i + 1 if link_i mod 8 =0 then Site_Link=Site_Link&"
" end if Rs.movenext loop end if rs.close end if end function strSite_Link_Text=Site_Link(0,8) strSite_Link_Logo=Site_Link(1,24) i=0 sql="select top 30 title,id,dj,date from info where date>Now()-7 order by hits desc" rs.open sql,conn,1,1 if rs.eof then top="还没有文章" else do while not rs.eof filetop=year(rs("date"))&month(rs("date"))&day(rs("date"))&hour(rs("date"))&minute(rs("date"))&second(rs("date")) if instr(rs("Title"),"0 then toplen1=toplen+20 if len(rs("Title"))>toplen1 then titley=left(rs("Title"),toplen1)&"
"&"..." else titley=rs("Title")&"
" end if else if len(rs("Title"))>toplen then titley=left(rs("Title"),toplen_wz)&"" else titley=rs("Title") end if end if if rs("dj")=6 then Txtop=Txtop&"·"&Title(titley)&"
" else Txtop=Txtop&"·"&Title(titley)&"
" end if i=i+1 if i>=30 then exit do rs.movenext loop end if rs.close '今日导读开始 i=0 sql="select top 12 id,title,tid,date from info order by date desc" rs.open sql,conn,1,1 if rs.eof then infolist="·还没有文章" else for i=1 to 12 if rs.eof then exit for rs_t.open "select * from infotype where id="&rs("tid"),conn,1,1 if not rs_t.EOF then TN=split(rs_t("tname"),"|") end if rs_t.close filetop=year(rs("date"))&month(rs("date"))&day(rs("date"))&hour(rs("date"))&minute(rs("date"))&second(rs("date")) datetime=year(rs("date"))&"_"&month(rs("date"))&"_"&day(rs("date"))'时间格式:年/月/日 datetime1=month(rs("date"))&"/"&day(rs("date"))'时间格式:月/日 '今日导读标题断行开始 if len(rs("Title"))>17 then titley=left(rs("Title"),17)&"..." else titley=rs("Title") end if '今日导读标题断行结束 infolist=infolist&""&lm&"·"&Title(titley)&"
" rs.movenext next end if rs.close '今日导读结束 rs2=conn.execute("select count(*) from info where year(date)&month(date)&day(date)=year(date())&month(date())&day(date())") shuinfo=rs2(0) Dim list_4(20) Dim list_5(20) Dim list_6(20) sql="select * from specialx where tj=1 and spics<>''" rs.open sql,conn,1,1 if NOT rs.EOF then do while not rs.eof kk=kk+1 SN=split(rs("sname"),"|") for i = 0 to ubound(SN)-1 next SSY_name=SN(0) list_4(kk)=""&SSY_name&"
"&rs("introduce")&"" list_5(kk)="" rs.MoveNext loop end if rs.close sql="select * from specialx where tj=1 and spics=''" rs.open sql,conn,1,1 if NOT rs.EOF then do while not rs.eof tt=tt+1 SN=split(rs("sname"),"|") for i = 0 to ubound(SN)-1 next SSY_name=SN(0) list_6(tt)=""&SSY_name&"" rs.MoveNext loop end if rs.close rs.open "select * from infotype ",conn,1,1 if not rs.eof then ts=rs("ts") TN=split(rs("tname"),"|") TI=split(rs("ts"), ",") for i = 0 to ubound(TN)-1 if i=ubound(TN)-2 and ubound(TN)>1 then TTY_id=TI(i) TTY_name=TN(i) end if all_type_top_id=TI(i) all_type_name=TN(i) thistype=thistype & "-> "&TN(i)&"" thistitle=thistitle & " - "&TN(i)&"" next end if rs.close i=0 sql="select * from info where pic<>'' and commend='1' order by date desc" rs.open sql,conn,1,1 if rs.eof then image="还没有图片文章" else do while not rs.eof if instr(rs("Title"),"0 then toplen1=toplen+20 if len(rs("Title"))>toplen1 then titley=left(rs("Title"),toplen1)&"
"&"..." else titley=rs("Title")&"
" end if else if len(rs("Title"))>toplen then titley=left(rs("Title"),toplen)&"" else titley=rs("Title") end if end if fileimg=year(rs("date"))&month(rs("date"))&day(rs("date"))&hour(rs("date"))&minute(rs("date"))&second(rs("date")) noid=noid&" and id<>"&rs("id")&"" i=i+1 if rs("dj")=6 then image=image&"" else image=image&"" end if pic=rs("pic") pic=Replace(pic, "../../", "") image=image& "
"&titley&"
" if i=6 then exit do rs.movenext loop end if rs.close '公告开始 sql="select top 1 id,newsname,addtime,newsnote from Announce order by addtime desc" rs.open sql,conn,1,1 if rs.eof then infolist="·还没有公告" else do while not rs.eof Announce=Announce&""&rs("newsnote")&"["&rs("addtime")&"]
" rs.movenext loop end if rs.close '图文混排开始 i=0 sql="select * from info where pic<>'' and commend='1' order by date desc" rs.open sql,conn,1,1 if rs.eof then DefaultPic="还没有图片文章" else do while not rs.eof infoy=left(rs("info"),108)&"..." if instr(rs("Title"),"0 then if len(rs("Title"))>10 then titley=left(rs("Title"),toplen1)&"
"&"..." else titley=rs("Title")&"" end if else if len(rs("Title"))>1 then titley=left(rs("Title"),16)&"..." else titley=rs("Title") end if end if fileimg=year(rs("date"))&month(rs("date"))&day(rs("date"))&hour(rs("date"))&minute(rs("date"))&second(rs("date")) noid=noid&" and id<>"&rs("id")&"" i=i+1 if rs("dj")=6 then DefaultPic=DefaultPic&"" else DefaultPic=DefaultPic&"" end if pic=rs("pic") pic=Replace(pic, "../", "") DefaultPic=DefaultPic&"
"&Titley&"

  "&infoy&"[详细报道]" if i>=1 then exit do rs.movenext loop end if rs.close '图文混排结束 list=list&"" rs.open "select * from infotype where tj=1 order by id",conn,1,1 if NOT rs.EOF then allshu=rs.recordcount Dim list_1(20) Dim list_2(20) Dim list_3(20) do while NOT rs.EOF ii=ii+1 list=list&""&split(rs("tname"),"|")(rs("tj")-1)&"|" list_1(ii)=""&split(rs("tname"),"|")(rs("tj")-1)&"" list_2(ii)="

更多内容 ...
" i=0 sqqq_yl="" sql_yl="select * from infotype where ts like '"&rs("ts")&"%'" rs_yl.open sql_yl,conn,1,1 if not rs_yl.eof then do while not rs_yl.eof sqqq_yl=sqqq_yl& " or tid="&rs_yl("id")&"" rs_yl.MoveNext loop end if rs_yl.close rs_info.open "select id,title,dj,date from info where tid="&rs("id")&""&sqqq_yl&" order by id desc",conn,1,1 if NOT rs_info.EOF then do while not rs_info.eof fileming=year(rs_info("date"))&month(rs_info("date"))&day(rs_info("date"))&hour(rs_info("date"))&minute(rs_info("date"))&second(rs_info("date")) if instr(rs_info("Title"),"0 then chalen1=chalen+20 if len(rs_info("Title"))>chalen1 then titlex=left(rs_info("Title"),chalen1)&""&"..." else titlex=rs_info("Title")&"" end if else if len(rs_info("Title"))>chalen then titlex=left(rs_info("Title"),chalen)&"..." else titlex=rs_info("Title") end if end if if rs_info("dj")=6 then list_3(ii)=list_3(ii)&"["&split(rs("tname"),"|")(rs("tj")-1)&"]"&Title(titlex)&""&datetime1&"
" else list_3(ii)=list_3(ii)&"["&split(rs("tname"),"|")(rs("tj")-1)&"]"&Title(titlex)&""&datetime1&"
" end if i=i+1 if i>=newshu then exit do rs_info.movenext loop end if rs_info.close rs.MoveNext loop end if rs.close set rs=nothing set rs_yl=nothing set rs_info=nothing conn.close set conn=nothing%> 香港文汇报珠三角新闻网_深幽灵电话党 手机软件骗财

您的位置:首页 > 广东新闻 > 深圳

 

深幽灵电话党 手机软件骗财

 

wwpprd.com 作者:wwpprd.com 来自:文汇报 点击:0 时间:2008-7-3


【本报珠三角新闻中心记者郑海龙深圳2日电】手机明明在自己的手中,另一个原本属他妻子的手机突然响起,屏幕上的来电显示竟是他自己的手机号码!当事主接听电话时,对方声称是他生意上的朋友,并称手机主人叫他打这个电话,且叫接听电话的人把订金存到账户上……这样奇怪的事情,发生在港商先生的身上。所幸的是打电话的人,并不知道接电话者就是他冒充的手机号码的主人。先生亦因为这个巧合才幸免受骗。

 

  刘先生在深圳从事印刷行业,因业务关系,他把自己及太太的联系方式一同放上网,以方便客户能够随时联络。前几天,由太太返港,便将手机留给先生。昨日中午,刘某在外办完事回到家中,把自己的手机充电,还没有来得及开机,便听到太太的手机响了起来。先生下意识地看了一眼,发现来电的号码竟是自己的手机号码,但实际上,他的手机仍「安静地躺在」电源器旁边充电。

 

来电显示 无机主名称

 

 刘某思索过自己的手机卡不可能遭复制后,马上接听了电话。

 

 「张老板吗?我是刘老板的朋友,刘老板刚刚跟我们签了印刷纸的合同,你看能不能先付一点订金啊,我叫刘总一会用这个手机把账号发给你,你把钱存进去就可以了,一共2万,记得啊!」对方说完就把电话挂断了。隔了一会,刘太的手机即收到一条发自刘某手机号码的账号短讯。奇怪的是,刘太的手机明明存有先生的电话,但无论是刚才的来电,还是刚收到的短信都没有显示手机通讯簿上的名称,而只是显示手机号码。

 

事主求助本报记者揭骗局

 

 在百思不得其解后,刘给本报记者挂了一个电话,说出接到奇怪来电的经过。记者后来经过多方调查和向从事手机业务的朋友查询,发现原来先生遇到的可能是一个通天骗局。

 

 在赛格从事电子行业多年的朋友告诉记者,先生接到的电话,很可能来自一个撒谎软件,这个软件在网上随时随地都可以下载,只要装到系统支持的智能手机中,即可仿真任何手机号码拨出电话。「这个软件已经几年了,刚刚出来的时候我们经常用来戏弄女孩,例如在午夜假冒女孩的男朋友致电跟她聊天,或者干脆就设定显示出该女孩自己的电话,然后装鬼吓人。这一般都是用在愚人节上的东西。」该名朋友称。

加强网站监管 斩断销售链条

 

■内地不少网站发布售卖「任意显示号码」的帖子,法律界人士促加强监管,严打网上违法行为。 本报深圳传真

 

 「小心察看每个接的电话,显然是治标不治本的方法。现在更重要的是对这些软件,以及发布这些软件的网站进行必要的监管。」法律界人士先生表示,只要能够管住发布渠道即可制止这些软件为歹人所利用。

 

 记者在GOOGLE上搜索,发现去年底就有类似的手机改号软件在网络以及论坛上热卖,警方证实现在网上比较流行的改号软件,是基于原本的蛊惑软件而被不法分子开发出来的。记者发现,网上多个智能手机软件的论坛都有叫卖这类改号软件的帖子,但交易大部分在私下进行。而软件下载的连接也被加密,需要付钱交换密码后才能进入下载。与此同时,大量的网友在网络上求助,如何才能弄到类似的软件。

 

网商发布改号软件属违法

 

 先生称,不论如何,类似的软件流窜出来,网站以及一些可能发布这些软件的渠道有不可推卸的责任。《互联网信息服务管理办法》15条明确指出,互联网信息服务提供者不得制作、复制、发布、传播含有法律、行政法规禁止的其它内容的。上述的软件明显违反了这一条,因此,发布这类信息的网站有着不可推卸的责任。他说,希望有关部门对网站加强监管,使得网站本身注意类似信息的发布,即可斩断销售链条。

 

误信子遭绑架 男子付赎2

 

  事实上,并非每个人都像刘先生那么幸运,由于这种新的诈骗手法具有很强的迷惑性,有不少人上当受骗。佛山警方日前就破获了一宗类似的案件,足以警醒世人。

 

致电勒索 10万入银行

 

 623日下午3许,家住佛山禅城区桂圆小区的姓雷男子,接到一名陌生男子的电话,来电显示是其在校读书的儿子的手机号码。陌生男子在电话里称:「你儿子已经被我们绑架,赶快存10万元到银行账户上。」先生害怕了,赶紧按该男子提供的账号存进了2万元。汇款后打电话给儿子,儿子却说他在学校上课,并没有被绑架。先生才知被骗,而报警求助。

 

 佛山警方经过调查,很快了解疑犯的作案手法──犯罪分子利用一种来电显示软件,首先以手机服务公司的名义打电话给机主,声称要向机主赠送话费,但所赠送的话费不能直接给机主本人用,只能赠送给其亲属,以此骗取机主亲属的电话号码、真实姓名以及住址。

 

藉孩子关机上课时段犯案

 

 骗徒接冒充电信业务部门的工作人员,打电话给机主亲属,要求其关机,让机主无法跟其亲属联系,接又用来电显示软件显示机主亲属的电话号码,打电话给机主,声称已绑架其亲属,恐吓机主,胁迫机主在短时间内将钱汇到指定的银行账号。

 

 疑犯作案时段大多选择在下午3时多,利用在校学生的上课时间,让其长时间关机,父母无法跟孩子联系;疑犯就有更充分的时间威吓事主、提取银行存款。目前,佛山公安刑侦部门与电信、移动等部门沟通,加强防范打击。

 

警吁勿滥泄亲属电话号码

 

 警方表示,市民要增强防范意识,接到类似的「绑架勒索」电话时,要冷静甄别对方的身份,不要方寸大乱,要想方设法确认子女的行踪。遇到赠送话费的信息,不要随便提供亲属的电话号码给别人。 ■本报珠三角新闻中心记者郑海龙深圳2日电

 

重输号码查询 助辨真伪

 

  【本报讯】「事实上,这些欺骗软件并不能真的达到盗用其它人的手机打电话或发短讯的程度。只是通过软件先把自己的号码做了隐藏,然后再编一个显示号码。」从事通讯软件开发的先生表示,市民只要在接到电话时多个心眼,就可叫这些冒充亲人号码的电话露出马脚。

 

接可疑来电 应及时核实

 

 鉴于这些诈骗电话多是冒充亲人以及好友的号码,而这些号码一般都会被储存机主的手机中,因此,这些亲友的来电,一般会显示出手机通讯簿中所储存的名称。先生表示:「如果没有名称只是有一个电话号码,那么这个号码就非常可疑了。」

 

 他又说,机主一旦发现来电的电话号码可疑,完全可以向运营商查询来电的真实号码。这样就可以确定号码真伪。切忌在已接或未接来电中直接回拨显示的号码,「那样手机一般都是默认了隐藏的号码,回过去只能被骗子接到电话。最好的办法是用手机一个字一个字地输入要拨号码进行查询。」

 

一家3口呃综援 表证成立

 

  【本报讯】于92年枪战中中流弹受伤的药房东主,涉嫌串谋妻子、外父隐瞒800万的资产骗取综援,案件昨日续审。前社署调查员作供指,夫妇两人获得巨额赔偿,仍再次申请综援。调查员认为个案有可疑拒绝,被告却带同神职人员理论,又死心不息多次上诉。直至上诉至东九龙的福利专员,才得偿所愿。结果被告在再次申请后,多领取逾10万元的综援。

 

 3名被告,分别是郑振辉(小图)和陈雅霜夫妇(分别48岁和47),以及次被告的父亲陈木成(75)。他们共被控诈骗、企图诈骗和向房委会作虚假陈述共17项控罪。案件表证成立,押后至周五续审。

 

前社福员揭被告大话连篇

 

 已退休的郭志刚供称,指郑于04年从暴力及执法赔偿中获得220万元赔偿后,社署便停止发放综援。郑随即再次申请,并声称赔偿需还债,由身为高级社会保障助理的郭负责调查。郑解释于96年和01年向「同乡」陈木成借钱共75万,余下需偿还予在乡下的10兄弟姊妹,每月又要从6千的综援金中,拨出5千元供养养母。调查员又指郑未交代陈木成其实是自己的外父。

 

再申综援不遂 越级投诉

 

 由于郑从未带同养母到社署,又未能提供还款的银行纪绿,他因此不建议批准。郑不满申请遭拒,联同一名神职人员,要求会见郭的上司。郑指自已「好惨,租都无得交」,神职人员亦以「神的名义」保证郑所言属实,但仍遭上司断然拒绝。

 

 两次受挫的郑「屡败屡战」,直接向社署的东九龙福利专员投诉。郭指专员利用自己的权力批准,并指示郭,即使未能联络陈木成作出声明,可退而求其次找被告的兄弟姊妹代替。然而,调查员指被告虽提供一份由陈姓女士亲人撰写的声明,但郄从没有见到该名女士。他大惑不解道:「佢()10兄弟姊妹十几年咁帮佢,我唔相信佢都唔肯。」

 

申请公屋 无报名下物业

 

 房屋主任关艳芳指夫妇和外父分别获批长亨和丽阁的公屋单位,但于复核时未有申报所有名下物业和资产。被告的代表大律师苏国强则指外父有老人痴呆,未真正填写复核表,妻子复核时并不知道丈夫拥有巨额资产。

责任编辑:cnred 文章页数第[1]页 

页面功能 【我来说两句】【字体: 】【打印】 【关闭

相 关 连 接
·还没有相关文章
网 友 评 论
·还没有相关的评论!
发 表 评 论
您的大名: (点击这里注册)
友情提醒:评论请限制在100字以内,有长篇大论欢迎到论坛发表:)
 

综合新闻|广东新闻|专题新闻

>> 本类热点新闻

·深圳凯宾斯基酒店求售
·深圳海关缴仿真枪增7倍
·盐田港再罢工 逾万货柜滞留
·深截116辆香港走私车
·深圳大铲湾码头一期动工
·深圳「新服务」赴港产子一条
·谷旺西部通道 深圳湾建商圈
·深圳中山建通道 拟公路铁路
·梁定邦与深圳女友照曝光
·深湘高速直通盐田港
·港禁区开放 莲塘先受益
·蛇口香港客轮班次增 下周二
·环球资源深圳中心区设总部
·深圳电池厂五千人罢工
·华侨城进军上海撼迪斯尼
·深圳水贝全国之最 亩产六万
·鹏城25年规划 深港同城化
·深港都市圈 五年见雏形
·中英街图变身 历史文化地标
·深蔡屋围20亿改建金融中心
·深圳港人侄 离奇堕楼亡
·深圳中信地铁商场港推售
·深南坪快速西段通车 免收费
·租不如买 深圳楼价升不止
·珠三角主题公园恶性重迭
·天利中央广场明年中发售
·深圳巴士乱撞 2死16伤
·两地数字电视划一标准
·和黄深圳三地产项目动工
·祥利工业园招港商建基地

 

合作媒体

合作及广告联系电话: 020-83825987


文汇报简介 | 广告服务 | 读者联谊 | 在线订报 | 在线投稿 | 站内公告 | 设为首页 | 收藏本站
新闻中心地址:广州市沿江中路323号临江国际大厦15楼 电话:020-83825987  传真:020-83817466
网管信箱:webmaster@wwpprd.com  编辑信箱:editor@wwpprd.com
香港文汇报珠三角新闻网 版权所有©Copyright 2004 www.wwpprd.com
来访统计:  技术支持:中国红电子商务频道