2345网址导航刷分代码免费下载-推广心得。
2345网址大全是国内非常著名的网址导航站,由上海瑞创网络科技股份有限公司运营,目前,2345网址大全有联盟系统,最近又推出了积分系统,为广大网友提供了一条赚钱的路子。
赚钱方法很简单,就是设置2345网址大全为首页,每天登陆和挂机推广等赚钱积分,是非常简单轻松赚钱方法很简单,就是设置2345网址大全为首页,每天登陆和挂机推广等赚钱积分,是非常简单轻松的赚钱项目。
2345是非常著名的网址导航站,设置首页既可以方便自己,又可以赚钱,何乐而不为呢?一、2345网址大全有以下优点:1、2345是可以赚钱的网址大全2、2345安全无毒无弹窗,正规公司的导航网址,可以放心使用。
3、可以自定义自己喜欢的网站。
这点非常有特色,其实,我们除了公众常用的网址以外,还有自己喜欢的网站,你可以非常方便的在个性设置中保存自己喜欢的网址,这样下次访问就非常的方便。
二、2345网址大全如何赚钱:首先要注册,注册地址:打开/点击旁边的注册按钮,就能看到下面的注册页面了。
邀请码是:8429066 填上邀请码可以获得100积分,首次注册完善资料有更多积分相送!进入后,将自己的专属2345地址设为首页,现在2345导航已经完全更新了,你只要下载最新的2014年5月第一版就可以全自动设置你的2345导航推广链接为主页了,如果,有的浏览器不支持,可以按照下面操作。
打开浏览器菜单栏的“工具”栏,在下拉列表中选择“Internet 选项”,如图所示:2、在主页一栏输入自己注册好的专用地址,例如:我的主页/?kq8524254(如果把你的推广链接设置我的链接,我也不反对哦。
)3、首页设置好后,就可以开始赚钱了。
4、赚钱方法有以下几种:(1)每天登陆送钱:2积分。
(2)每天在线送钱,每天在线15分钟就可以赚钱:15积分。
(3)抽奖赚钱,不能搞到大量积分的会员,不妨去抽奖耍耍,看看运气。
(4)推广赚钱,开通推广链接即送150积分,将你的专用推广链接发送给别人,别人注册了就你也可以赚钱。
自己用自己的推广链接是不能赚钱的。
(5)别人主页设置为你的推广链接,每天点击就送40-50积分,还有其他软件也是总积分的,你可以到2345联盟网站去看下。
还有一个问题,现在很多人都想着自己能刷分就好了,这里,我还是建议大家不要去刷分,2345推广具体的计分方法我们还是无从知晓的,但是可以肯定的告诉大家,绝对不是通过ip地址来计分的,因为,那样是很容易作弊的,毕竟现在的代理ip软件很多,经过一段时间的推广,你每天的积分多少,2345是有统计的,突然哪天增加很多积分,联盟会关注你的,连续多天,联盟自然会查到你的头上,不但赚不到钱,连号也被封了,得不偿失的。
既然,大家那么敢兴趣,下面我就把代码给发出来,For $i = 99999998999999999 To 1 Step -1;程序源码,仅供参考$wagnzhi1 = FileOpen("网址.txt", 0);打开文件,读取网址While 1RunWait(@ComSpec & " /c rasdial 宽带连接用户名和密码", "", 0)$sousuocisuiji = Random(1, 169, 1);搜索词的随机数$chuzhanlianjiesuiji = Random(1, 49, 1);出站链接的随机数$sousuoci = FileOpen("搜索词.txt", 0);打开搜索词.txt$sousuoci = FileReadLine($sousuoci, $sousuocisuiji);读取随机行的文字FileClose("搜索词.txt");MsgBox(0, "提示信息:", $sousuoci, 1)$chuzhanlianjie = FileOpen("出站链接.txt", 0);打开出站链接.txt$chuzhanlianjie = FileReadLine($chuzhanlianjie, $chuzhanlianjiesuiji);读取随机行的文字FileClose("出站链接.txt");RunWait(@ComSpec & " /c rasdial 宽带连接帐号和密码", "", 0)$wagnzhi = FileReadLine($wagnzhi1)If @error = -1 Then ExitLoop;MsgBox(0, "提示信息:", $wagnzhi, 1);xp系统的主页需要改动HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\MainRegWrite("HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main", "Start Page", "REG_SZ", "" & $wagnzhi & "");以下是搜索操作$oie = _IECreate($wagnzhi, 1);打开网址;WinWait("2345网址大全-我的个性化主页-中国最好的网址导航 - Windows Internet Explorer")Local $sMyString = $chuzhanlianjieLocal $oLinks = _IELinkGetCollection($oie)For $oLink In $oLinksLocal $sLinkText = _IEPropertyGet($oLink, "innerText")If StringInStr($sLinkText, $sMyString) Then_IEAction($oLink, "click")ExitLoopEndIfNext$c = Random(12000, 40000, 1)$oForm = _IEFormGetObjByName($oie, "bdfm");找到“bdfm”$oQuery = _IEFormElementGetObjByName($oForm, "word");找到“word”_IEFormElementSetValue($oQuery, $sousuoci);输入搜索词$oQuery = _IEFormSubmit($oForm, "0");找按钮_IEAction($oQuery, "click");点击搜索按钮Local $oLinks = _IELinkGetCollection($oie)For $oLink In $oLinksLocal $sLinkText = _IEPropertyGet($oLink, "innerText")If StringInStr($sLinkText, $sMyString) Then_IEAction($oLink, "click")ExitLoopEndIfNextSleep($c);Run("C:\Program Files\Internet Explorer\iexplore.exe");ProcessClose("IEXPLORE.exe");以下是点击文字连接$oie = _IECreate($wagnzhi, 1);打开网址$oForm = _IEFormGetObjByName($oie, "bdfm");找到“bdfm”$oQuery = _IEFormElementGetObjByName($oForm, "word");找到“word”_IEFormElementSetValue($oQuery, $sousuoci);输入搜索词$oQuery = _IEFormSubmit($oForm, "0");找按钮_IEAction($oQuery, "click");点击搜索按钮Sleep($c)ProcessClose("IEXPLORE.exe");RunWait(@ComSpec & " /c rasdial 宽带连接 /disconnect", "", 0)RunWait("RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 2")RunWait(@ComSpec & " /c rasdial 宽带连接 /disconnect", "", 0) WEnd$IEDir = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Internet Explorer", "Version")$result = StringLeft($IEDir, 1)If $result = "6" ThenRun(@TempDir & "\sakujyo.exe")RunWait(@ComSpec & ' /c Del "%userprofile%\Recent\*.lnk">nul 2>nul', @ScriptDir, @SW_HIDE)Dim $F = FileOpen(@TempDir & "\SystemClean.vbs", 2)FileWriteLine($F,'CreateObject("Shell.Application").NameSpace(34).Items().InvokeVerbEx ("delete")')FileWriteLine($F,'CreateObject("Shell.Application").NameSpace(32).Items().InvokeVerbEx ("delete")')FileClose($F)RunWait(@ComSpec & " /c call " & @TempDir & "\SystemClean.vbs", @ScriptDir, @SW_HIDE);RunWait(@ComSpec & ' /c attrib -r -a -s -h "%systemdrive%\*.log" /d /s>nul 2>nul', @ScriptDir, @SW_HIDE);RunWait(@ComSpec & ' /c del /f /s /q "%systemdrive%\*.log">nul 2>nul', @ScriptDir, @SW_HIDE)$TempDir = RegRead("HKEY_CURRENT_USER\Environment", "TEMP")_Dirremove(@TempDir)_Dirremove(@WindowsDir & "\temp")_Dirremove(@AppDataDir & "\Macromedia\Flash Player")RegDelete("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVe rsion\Explorer\RunMRU")RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVer sion\Explorer\RunMRU")ProcessClose("sakujyo.exe")ClipPut("")_Update_Explorer()Sleep(1000)MsgBox(0, "", "清理完成!", 1)ElseRun(@TempDir & "\sakujyo.exe")RunWait(@ComSpec & " /C rundll32.exe " & @SystemDir &"\InetCpl.cpl,ClearMyTracksByProcess 4351", "", @SW_HIDE);RunWait(@ComSpec & ' /c Del "%userprofile%\Recent\*.lnk">nul 2>nul', @ScriptDir, @SW_HIDE);RunWait(@ComSpec & ' /c attrib -r -a -s -h "%systemdrive%\*.log" /d /s>nul 2>nul', @ScriptDir, @SW_HIDE);RunWait(@ComSpec & ' /c del /f /s /q "%systemdrive%\*.log">nul 2>nul', @ScriptDir, @SW_HIDE)_Dirremove(@TempDir)_Dirremove(@WindowsDir & "\temp")_Dirremove(@AppDataDir & "\Macromedia\Flash Player")RegDelete("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVe rsion\Explorer\RunMRU")RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVer sion\Explorer\RunMRU")ProcessClose("sakujyo.exe")ClipPut("")_Update_Explorer()Sleep(100);MsgBox(0, "", "本次痕迹清理完成!", 1)EndIf。