'****************************************************
' Software name:XXNIC CMS 8.0
qq:8558460
' Copyright (C) Comxin Network All Rights Reserved.
'****************************************************
Set KSCls = New SiteIndex
KSCls.Kesion()
Set KSCls = Nothing
Const AllowSecondDomain=false
'是否允许开启空间二级域名 true-开启 false-不开启
Class SiteIndex
Private KS,AppCls
Private Sub Class_Initialize()
If (Not Response.IsClientConnected)Then
Response.Clear
Response.End
Set AppCls=New KesionAppCls
Set KS=New PublicCls
Private Sub Class_Terminate()
Set KS=Nothing
Set AppCls=Nothing
Call CloseConn()
Public Sub Kesion()
If AllowSecondDomain=True And KS.IsNul(Request.QueryString("do")) Then
SecondDomain
Call AppCls.HomePage()
Public Sub SecondDomain()
dim From,gourl,sdomain,title,username,domain
From = LCase(Request.ServerVariables("HTTP_HOST"))
sdomain = LCase(KS.SSetting(15))
sdomain = Replace(sdomain,"http://","")
sdomain = Replace(sdomain,"/","")
dim domain1,domain2
domain = LCase (from)
domain = Replace (domain,"http://","")
domain = Replace (domain,"/","")
If lcase(domain)=lcase(KS.Setting(69)) or lcase(domain)=lcase(KS.JSetting(41)) or (sdomain=domain and sdomain"") Then
Call AppCls.Domain(domain)
domain1= Replace (Left (domain,InStr (domain,".")),".","")
if Trim (domain1)="" or (domain1="www" and domain=replace(lcase(KS.Setting(2)),"http://","")) or (Request.ServerVariables("HTTP_HOST")="http://" & KS.Setting(2)) or ("http://" & lcase(Request.ServerVariables("HTTP_HOST"))=lcase(KS.Setting(2))) Then
Call AppCls.HomePage() : Exit Sub
'=====================这里定义其它系统非个人空间的二级域名转向，如论坛等=============================
if instr(Request.ServerVariables("SERVER_NAME"),"")>0 then
response.redirect KS.GetDomain & "bbs/index.asp"
elseif instr(Request.ServerVariables("SERVER_NAME"),"")>0 then
response.redirect KS.GetDomain & "news/"
elseif instr(Request.ServerVariables("SERVER_NAME"),"")>0 then
response.redirect KS.GetDomain & "help/"
'============================================================================
Set AppCls=New KesionAppCls
if instr(domain,replace(replace(lcase(KS.Setting(2)),"http://",""),"www.",""))=0 and domain1="www" then
Call AppCls.Domain(domain)
Call AppCls.Domain(domain1)网络刷单靠谱吗，为什么还有那么多人被骗？
网上淘宝兼职刷信誉是真的吗，为什么一些人会被骗，我来给你分析“网络兼职,日赚几百元;淘宝刷单/刷信誉,坐在家里就能赚钱……”这类兼职可以相信吗，随着各大网购商城的兴起，越来越多的人开始在网上进行购物，网店的竞争程度也愈演愈烈，“淘宝刷单”等提高网店信誉的业务随之掀起热潮，可这些兼职信息真的靠谱吗？
&如果大家有想要具体了解的，可以加我进行咨询，我带您了解正规的淘宝刷单、刷信誉兼职平台。
&面对生活中和工作中的压力，我们的钱包也许难免显得有些囊中羞涩，淘宝刷单/刷信誉兼职现在也成为大街小巷，群众口中热议的话题，也就有人开始寻思着找这个兼职工作来干，但是当我们在各大搜索引擎进行搜索寻找的时候，会出现大量的广告信息，看的能让我们眼花缭乱了都，其中最具有诱惑性的就是”日赚几百，月赚万元的广告“，可能许多人都会去点击、会去尝试，但是结果呢，只会是四个字上当受骗！那么我们究竟该如何选择正规平台，如何识破是不是骗子呢？下面小编带大家来一探究竟。
先给大家介绍一下什么叫正规平台和刷单刷信誉步骤：
&首先正规的淘宝代刷平台佣金都是在最低五块钱一单，并不会像骗子那样刷一单让你赚个几十块甚至几百块的高额佣金，大家思考一下，如果说刷一单真能赚那么多，那么谁还上班啊，那些毕业的学生好考什么公务员，进什么国企等等，都来干这个得了。
&其次，正规平台都是需要缴纳一个一次性的入会费，很多人在网上寻找兼职，都是抱着能找到免费的兼职工作心态来搜索，在此我想说，就此打住这种心理，你找免费的，第一那种免费平台根本没几个人，也没有商家放单，打出免费招人刷单的广告，也是为了让你充当他们平台的在线人数，以此来吸引更多的人，来发展壮大他们平台。第二免费的刷单刷信誉平台，前期是不收你费用，但是后期他们会想尽一切办法，用尽一切手段来诈取你手中的钱财成为他们的囊中物，嘴中食。
&再次，一些人的防骗意识较差，利用大家对网络防骗意识的空白，用钓鱼链接为主，高佣金为＂鱼饵＂，对一些人进行所谓的＂钓鱼＂，如果大家＂咬钩＂，就会让骗子得逞，那样损失的就不是所谓几十块钱的会费，而是几百／几千／几万元的血汗钱．所以我们要加强自身的网络防骗意识，对想做这块兼职的家人／亲朋好友进行防骗意识的普及，以免他们上当受骗．
咨询淘宝兼职可以加菲儿QQ：点我联系，不用流动资金，工资立结返支付宝。&
很多人把昵称改为菲儿的QQ号进行欺骗，加我的时候请认准第一个QQ，菲儿没有QQ群和其它QQ。
下面给大家进行总结，骗子行骗的几大特征：
1.高佣金，一个任务几十或几百元不等，直接给你网址拍虚拟物品（如充话费、游戏卡）
&例：在网上和QQ群里经常看到这样的兼职广告，“只要在家里工作，就能日进百元”，看似很诱人，其实很多都是诈骗陷阱。近日，集美警方连续打掉了3个这样的诈骗团伙，抓获犯罪嫌疑人9人，破获虚假信息诈骗案50多起，涉案金额达50多万元。
犯罪嫌疑人指认，犯罪嫌疑人所做的电子账本
多名大学生兼职当“刷客”被骗
去年下半年以来，集美辖区有不少大学生向警方报警称，他们在网上看到一些兼职广告，号称兼职当“刷客”帮忙代刷网店信誉，结果相继被骗了不少钱，有的甚至被骗走上万元。根据前期的调查，上周二，集美刑侦大队对杏林街道鹤浦路9号6楼的一处出租房进行了冲击，抓获以陈某兴为首的5名诈骗嫌疑人，当场缴获手机、笔记本电脑、银行卡、无线网卡等作案工具，以及赃款3万多元。同时，民警还冲击了位于杏林高埔和灌口的两处诈骗窝点，抓获4名诈骗嫌疑人。
关系：犯罪嫌疑人基本上都是老乡
根据警方的调查，这3个诈骗团伙的9名嫌疑人，全部来自安溪，从去年下半年以来，他们辗转泉州、厦门两地，实施代刷信誉诈骗50多起。集美公安分局刑侦大队民警刘雨波告诉记者，他们基本上都是老乡关系，互相之间也都认识，然后还有极个别的还有亲属关系，也相当于是说，互相之间会有经常交流，交流一下骗术，也会互相教一下、带一下。
& & 幕后 给佣金尝甜头降低防范心理
是什么让这些读过书的大学生频频上当呢？其实，不过是每单五块钱的佣金。这些诈骗团伙一般都是通过网上发布信息，招聘所谓的“网络兼职”，只要完成购买游戏点卡或话费充值卡的任务，就能获取佣金。据了解，这样的兼职号称“低门槛、零风险”，能够轻轻松松地挣到钱，这让不少爱上网的大学生很是心动。民警刘雨波告诉记者，一般犯罪嫌疑人会发一个链接给被害人，让其购买并将点卡或充值卡的卡号和密码发回。
&“当完成第一单之后，这些被害人基本上都能拿到五块钱的佣金，在尝到一点小甜头之后，被害人的防范心理就降低了。”刘雨波说。一看真有佣金进账，被害人就会觉得这兼职可以做，而且可做更多单。在犯罪嫌疑人的怂恿下，被害人就开始大量购买点卡，一次多为10单或是20单，而就在这个时候，骗子开始进一步设下圈套。当被害人付完款，就把卡号和密码发回之后，犯罪嫌疑人就消失不见。据警方透露，犯罪嫌疑人后面几乎都将拿到密码的充值卡进行倒卖，非法获取钱财。
&2.要几百的流动资金用来买商品，要你填申请表，其中包括要你的支付宝或者网银余额截图，或者直接给你发送虚假链接，套取你的个人信息
例：“上网动动手指给淘宝刷信誉，坐在家里做兼职!”在合肥某医院实习的女护士小平，因轻信给淘宝刷信誉可获取佣金，不料被骗子“刷”了，几分钟内遭遇4次诈骗，对方远程操控其电脑，划走其支付宝内2000多元总存款。对方企图通过远程操控刷客电脑，引导刷客付款从而套取支付宝账户存款。对方企图通过远程操控刷客电脑，诱导刷客付款从而套取支付宝账户存款。
要求截图提供银行账户余额小平是一名护士，在合肥某医院实习，为了挣点生活费，小平在赶集网上寻找起了兼职，“网上动动手指当刷客，坐在家里做兼职!”看到这则诱人的广告后，小平就加了对方的QQ号。
&对方网名为“王绮玉”，QQ签名上醒目地写着“现结工作，诚信第一!”据小平介绍，对方先发过来一份项目申请表，要求小平填写手机号码、银行卡号，并截图余额。在被问及为何需要这些信息时，对方称：“刷信誉需要流动资金!没有流动资金你如何拍宝贝、刷交易量?”“当时觉得对方说得蛮有道理的，就把其中一张银行卡上仅剩的560多元余额截图发过去了。”小平说道。
遭远程操控电脑被迫4次打款，随后，对方发过来信息：“刷500-1000元的，每单返还30-60元的佣金，1000元以上的返还7%，做完一单结算一单。任务完成5分钟之内，我们就结账将本金和佣金返还到你的账号上。”接着，对方
以向小平示范如何做第一单为由，请求远程操控小平电脑，“操作的速度很快，没看清是在淘宝平台上交易，好像是进入了一个游戏充值网站。”到最后一关支付宝账户付款阶段时，小平输入账户号和密码，支付出第一笔钱。可是，对方并没有向一开始承诺的那样在5分钟之内返款，而是以系统操作超时未收到打款为由，要求小平再打款一次，就这样，小平连续被迫4次打款。当时我还问同学借了钱，总共2127元，全部打给对方了。对方还让我打款过去，不然前4次的本金都将不返还。”眼看着生活费打水漂还欠了债，小平流下了眼泪。
看到这里，大家也难免心中有一些的后怕，可能会想到找个兼职就这么难找到吗，说句实在话，并不难，最难得一点是自己过不了自己那一关，一味的想着天上掉馅饼，能遇到免费的午餐，想赚大钱，靠这个来发家致富，发一个横财，但只要大家剔除掉自身的这些寻找兼职的缺点，绝对能找到，自己称心如意的平台，另外小编想告诉大家，兼职就是兼职，不要想着发家致富，能赚多少多少钱之类的，这个兼职只能挣个日常生活中开支和零用钱．
网上淘宝兼职刷信誉是真的吗，为什么一些人会被骗，我来给你分析，
一份付出一份收获！现在网上的骗子太多，希望大家提高警惕！看完上面这些之后希望能帮助大家少受骗！ 不管
& 你懂不懂，但是如果你想要在网上赚钱，那么你就必须要懂！
大家想做的话也可以找我了解，做不做不重要，最起码能让自己开阔视野．
咨询淘宝兼职可以加菲儿QQ：点我联系，不用流动资金，工资立结返支付宝。&
很多人把昵称改为菲儿的QQ号进行欺骗，加我的时候请认准第一个QQ，菲儿没有QQ群和其它QQ。
&衷心的希望大家少走弯路,擦亮自己的眼睛,认准辨别,在网上能赚钱,补充自己的家用钱,最重要的是让生活变得更充裕,有一个自己温暖的家!！！
已投稿到：
以上网友发言只代表其个人观点，不代表新浪网的观点或立场。'****************************************************
' Software name:XXNIC CMS 8.0
qq:8558460
' Copyright (C) Comxin Network All Rights Reserved.
'****************************************************
Set KSCls = New SiteIndex
KSCls.Kesion()
Set KSCls = Nothing
Const AllowSecondDomain=false
'是否允许开启空间二级域名 true-开启 false-不开启
Class SiteIndex
Private KS,AppCls
Private Sub Class_Initialize()
If (Not Response.IsClientConnected)Then
Response.Clear
Response.End
Set AppCls=New KesionAppCls
Set KS=New PublicCls
Private Sub Class_Terminate()
Set KS=Nothing
Set AppCls=Nothing
Call CloseConn()
Public Sub Kesion()
If AllowSecondDomain=True And KS.IsNul(Request.QueryString("do")) Then
SecondDomain
Call AppCls.HomePage()
Public Sub SecondDomain()
dim From,gourl,sdomain,title,username,domain
From = LCase(Request.ServerVariables("HTTP_HOST"))
sdomain = LCase(KS.SSetting(15))
sdomain = Replace(sdomain,"http://","")
sdomain = Replace(sdomain,"/","")
dim domain1,domain2
domain = LCase (from)
domain = Replace (domain,"http://","")
domain = Replace (domain,"/","")
If lcase(domain)=lcase(KS.Setting(69)) or lcase(domain)=lcase(KS.JSetting(41)) or (sdomain=domain and sdomain"") Then
Call AppCls.Domain(domain)
domain1= Replace (Left (domain,InStr (domain,".")),".","")
if Trim (domain1)="" or (domain1="www" and domain=replace(lcase(KS.Setting(2)),"http://","")) or (Request.ServerVariables("HTTP_HOST")="http://" & KS.Setting(2)) or ("http://" & lcase(Request.ServerVariables("HTTP_HOST"))=lcase(KS.Setting(2))) Then
Call AppCls.HomePage() : Exit Sub
'=====================这里定义其它系统非个人空间的二级域名转向，如论坛等=============================
if instr(Request.ServerVariables("SERVER_NAME"),"")>0 then
response.redirect KS.GetDomain & "bbs/index.asp"
elseif instr(Request.ServerVariables("SERVER_NAME"),"")>0 then
response.redirect KS.GetDomain & "news/"
elseif instr(Request.ServerVariables("SERVER_NAME"),"")>0 then
response.redirect KS.GetDomain & "help/"
'============================================================================
Set AppCls=New KesionAppCls
if instr(domain,replace(replace(lcase(KS.Setting(2)),"http://",""),"www.",""))=0 and domain1="www" then
Call AppCls.Domain(domain)
Call AppCls.Domain(domain1)