无忧启动论坛

 找回密码
 注册
搜索
系统gho:最纯净好用系统下载站广告联系 微信:wuyouceo QQ:184822951
12
返回列表 发新帖
楼主: shuren

[原创] Radmin Server 3.5 x86 and x64 Portable-20160722

    [复制链接]
发表于 2018-12-9 14:00:51 | 显示全部楼层
回复

使用道具 举报

发表于 2019-4-2 13:04:21 | 显示全部楼层
以前的版本不支持win10
回复

使用道具 举报

发表于 2019-8-24 23:15:36 | 显示全部楼层
我也支持支持一下
回复

使用道具 举报

发表于 2021-4-17 08:28:48 | 显示全部楼层
求支持ljycslg老师Win10 RS3 16299 PE x86+x64 (10.31 更新)这个版本能用的radmin
回复

使用道具 举报

发表于 2023-11-22 08:11:54 | 显示全部楼层
win10能用吗?
回复

使用道具 举报

 楼主| 发表于 2024-1-1 19:44:07 | 显示全部楼层
wein7、win10、win11,应该都能用

点评

好像有使用期限,,用过3.5的各破解版本,大约一两个月后就提示试用期结束、输入授权码  详情 回复 发表于 2024-2-16 09:43
回复

使用道具 举报

发表于 2024-2-16 09:43:59 | 显示全部楼层
shuren 发表于 2024-1-1 19:44
wein7、win10、win11,应该都能用

好像有使用期限,,用过3.5的各破解版本,大约一两个月后就提示试用期结束、输入授权码
回复

使用道具 举报

 楼主| 发表于 2024-2-16 10:03:52 | 显示全部楼层
可以试试 NewTrial.v23
NewTrial.v23.rar (60.25 KB, 下载次数: 2)

点评

是对我说的吗 ? 还有,你的RadminInstall.cmd,好像没有网上流传的bluefish的功能全啊,没有自动加入防火墙白名单等功能,, 附:@echo off ver|findstr "5\.[0-9]\.[0-9][0-9]*" > nul && (goto init) ver|  详情 回复 发表于 2024-2-16 11:03
回复

使用道具 举报

发表于 2024-2-16 11:03:34 | 显示全部楼层
shuren 发表于 2024-2-16 10:03
可以试试 NewTrial.v23

是对我说的吗 ?      
   还有,你的RadminInstall.cmd,好像没有网上流传的bluefish的功能全啊,没有自动加入防火墙白名单等功能,,
附:@echo off
ver|findstr "5\.[0-9]\.[0-9][0-9]*" > nul && (goto init)
ver|findstr "\<6\.[0-9]\.[0-9][0-9]*\> \<10\.[0-9]\.[0-9][0-9]*\>" > nul && (goto admin)

:admin
rem 申请管理员权限
%1 %2 mshta vbscript:createobject("shell.application").shellexecute("%~s0","goto :init","","runas",1)(window.close)&goto :eof

:init
title Radmin Server v3.5.2.1 汉化破解绿色版 - 安装程序
color 80
echo.
echo      欢迎使用 Radmin Server v3.5.2.1 汉化破解绿色版
echo.
echo      绿化制作:Bluefish
echo.
echo      博客地址:http://www.cnblogs.com/radmin
echo.
echo.

rem 判断系统位宽
if /i %PROCESSOR_IDENTIFIER:~0,3%==x86 (
        goto x86
) else (
        goto x64
)
exit

:x64
set RserverPath=%windir%\SysWOW64\rserver30
set RsetupPath=%RserverPath%\rsetup64.exe
set MirrorPath=x64
goto Run
exit

:x86
set RserverPath=%windir%\System32\rserver30
set RsetupPath=%RserverPath%\rsetup.exe
set MirrorPath=x86
goto Run

:Run
rem 生成防火墙白名单规则,兼容XP和2003系统
set FirewallAdd64=netsh advfirewall firewall add rule name="Radmin Server 3" dir=in action=allow program="%RserverPath%\rserver3.exe" enable=yes profile=any
set FirewallDel64=netsh advfirewall firewall delete rule name="Radmin Server 3"
set FirewallAdd86=netsh firewall add allowedprogram program="%RserverPath%\rserver3.exe" name="Radmin Server 3" ENABLE scope=ALL profile=ALL
set FirewallDel86=netsh firewall delete allowedprogram program="%RserverPath%\rserver3.exe" profile=ALL

ver|findstr "5\.[0-9]\.[0-9][0-9]*" > nul && (set FirewallAdd=%FirewallAdd86% & set FirewallDel=%FirewallDel86% & set is32=)  
ver|findstr "\<6\.[0-9]\.[0-9][0-9]*\> \<10\.[0-9]\.[0-9][0-9]*\>" > nul && (set FirewallAdd=%FirewallAdd64% & set FirewallDel=%FirewallDel64% & set is32=/reg:32)

%~d0
cd "%~dp0"

if NOT exist %RserverPath%\rserver3.exe (goto CopyRadmin35)
echo 卸载已安装的 Radmin Server ...
%RsetupPath% /stop
%RsetupPath% /intuninstall
echo 删除防火墙规则.
%FirewallDel%
echo 删除 radmin server 的注册表配置信息.
reg delete HKEY_LOCAL_MACHINE\SOFTWARE\Radmin /f %is32%
echo 卸载破解补丁并清空目录
START /B /WAIT rundll32 %RserverPath%\wsock32.dll,ntsclean
rd /s /q %RserverPath%

:CopyRadmin35
echo 拷贝当前版本的文件到系统目录
if not exist "%RserverPath%" (mkdir %RserverPath%)
copy rserver30\*.* %RserverPath%
copy reg\*.* %RserverPath%
copy 卸载.bat %RserverPath%
copy %MirrorPath%\*.* %RserverPath%

echo 增加到防火墙白名单...
%FirewallAdd%

echo 安装 Radmin Server 服务和虚拟显卡驱动...
%RsetupPath% /intsetup

echo 导入注册表设置...
reg import %RserverPath%\install.reg %is32%
sc failure RServer3 reset= 0 actions= restart/3000/restart/3000/restart/3000

echo 启动 Radmin Server 服务...
%RsetupPath% /start

echo 注册破解补丁
rundll32 "%RserverPath%\wsock32.dll",ntskd noreboot

echo 创建快捷方式
%SYSTEMDRIVE%
cd %RserverPath%
mshta VBScript:Execute("Set a=CreateObject(""WScript.Shell""):Set b=a.CreateShortcut(a.SpecialFolders(""Desktop"") & ""\Radmin Server 设置.lnk""):b.TargetPath=""%RserverPath%\rserver3.exe"":b.WorkingDirectory=""%RserverPath%"":b.Arguments=""/setup"":b.Save:close")
mshta VBScript:Execute("Set a=CreateObject(""WScript.Shell""):Set b=a.CreateShortcut(a.SpecialFolders(""Desktop"") & ""\Radmin Server 卸载.lnk""):b.TargetPath=""%RserverPath%\卸载.bat"":b.WorkingDirectory=""%RserverPath%"":b.IconLocation=""%RserverPath%\rserver3.exe, 0"":b.Save:close")

rem 清理多余文件
del /f /q %RserverPath%\install.reg

pause

安装 - 副本.txt

3.39 KB, 下载次数: 2, 下载积分: 无忧币 -2

批处理安装代码

回复

使用道具 举报

发表于 2024-2-16 12:56:04 来自手机 | 显示全部楼层
谢谢分享
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|捐助支持|无忧启动 ( 闽ICP备05002490号-1 )

闽公网安备 35020302032614号

GMT+8, 2024-3-28 19:52

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表