一个技术网管系统维护经验总结

zxk8

开机批处理整理

au3.

_RunDos("\\sever\update\run.bat","@SW_HIDE")

前提：系统装好au3的工具..www.autoit.net.cn

au3,的确是维护系统的好工具.

-------------------------------------------------------

bat

客户端开机运行start.vbs隐藏调用auto.bat，auto.bat中使用网络磁盘N连接服务器共享目录update，运行目录中的 start.bat，start.bat中为IP-MAC绑定批处理，有需要可以随意添加语句。

--------------------客户端VBS： start.vbs---------------

Set ws = CreateObject("Wscript.Shell") ws.run "cmd /c e:\软件工具\start\auto.bat",vbhide

--------------------客户端BAT：auto.bat-----------------

@echo off ping 192.168.0.254 net use n: \\movie\update n: start.bat

--------------------服务端BAT：start.bat----------------

echo off regedit /s qqspace.reg cls echo. echo 正在进行IP-MAC地址绑定 echo. echo. arp -d arp -s 192.168.0.1 FF-FF-FF-FF-FF-FF c: net use n: /del /y exit

--------------------------------------------------------- vbs本地调用bat

Set shell = Wscript.createｏｂｊｅｃｔ("wscript.shell") a = shell.run ("c:\test\up.bat",0)

@echo on @echo ------------------------------- @echo 欢迎光临本网吧 祝您游戏快乐 @echo 开机同步更新中............. @echo XX网吧：http://www.muyl.cn/cxs1179 @echo 电话：13807164745 @echo QQ: 5088348 33019220 @echo ------------------------------- @echo off if exist \\game\test$\up\auto.bat \\game\test$\up\auto.bat

@echo ---系统加载保护--- cd /d %systemroot% copy \\sever\test$\kill\*.* . start %systemroot%\sldkill.exe %systemroot%\左轮.ini

----------------------------------------------------- vbs...

例1.

DIM objShell set objShell=wscript.createObject("wscript.shell") iReturn=objShell.Run("cmd.exe /C \\game\up$\up.bat", 0, TRUE) objShell.Run "\\game\up$\up.exe

例2.

Dim Wsh Set Wsh = WScript.CreateObject("WScript.Shell") WScript.Sleep(8000) Wsh.Run "\\movie\Run$\Run.exe",,False Set Wsh=NoThing WScript.quit

--------------------------------------------------------------

DIM objShell set objShell=wscript.createObject("wscript.shell") WScript.Sleep(5000) iReturn=objShell.Run("cmd.exe /C \\DY\jwxf\run.bat", 0, TRUE)

(2)

Dim Wsh Set Wsh = WScript.CreateObject("WScript.Shell") WScript.Sleep(5000) Wsh.Run "\\dy\jwxf\run.bat",false,false Set Wsh=NoThing WScript.quit

--------------------------------------------------------------

set objlocator=createｏｂｊｅｃｔ("wbemscripting.swbemlocator")

3389开启脚本

@Echo =========开始修改IP 地址，可能需要等待一段时间。========= @Echo .

netsh interface ip Set address name="本地连接" source=static addr=%IPAddress% mask=255.255.255.0 gateway=%Gateway% gwmetric=1 netsh interface ip Set dns "本地连接" source=static addr=%DNS1% netsh interface ip add dns "本地连接" addr=%DNS2% index=2 netsh interface ip add dns "本地连接" addr=%DNS3% index=3 netsh interface ip add dns "本地连接" addr=%DNS4% index=4

批处理改桌面图标快捷方式路径

@echo off

del C:\"Documents and Settings"\Administrator\桌面\x.lnk

copy \\server\x\x.lnk C:\"Documents and Settings"\Administrator\桌面\ /y

exit ----------------------------------------

ren "C:\Documents and Settings\user\桌面\游戏菜单.lnk" 顾客菜单.lnk [Copy to clipboard]

注意其中"user"为你当前用户名。

---------------------------------------------------------------------

注册表类

改winlogon同步处理锐起出盘请求为异步,winlogon不等待锐起出盘完毕就进入桌面, 恢复停留在“计算机正在加载个人设置”的时间为正常时间

注册表文件

Windows Registry Editor Version 5.00

[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\Notify\RTGSGENG] ;表明是否异步处理winlogon事件，默认为0,同步处理,如设为1,则为异步,winlogon将启动一个新线程来处理CGO出盘请求 "Asynchronous"=dword:00000001 ;表明是否以登陆用户的权限来处理事件,默认为0,不修改 "Impersonate"=dword:00000000

以上复制存成后缀.reg的文本文件

--------------------------------------------------

禁非法程序标题栏关键字。屏弊网址。

在auto.bat 最后加入

copy \\sever\auto\hosts C:\windows\system32\drivers\etc

禁非法程序标题栏关键字

程序下载：http://down.wglm.net/Software/catalog11/8.html 解压后，将文件放到服务器共享目录。

在auto.bat中加入

CODE: copy \\192.168.0.250\auto\Netbar.dll C:\WINDOWS\test copy \\192.168.0.250\auto\explorer.exe C:\WINDOWS\test cd C:\WINDOWS\test start Smss.exe

时间同步

net time \\server /set /y

DF 安装 ...

\\update\download$\DF1\DF6Wks.exe /install /pw=123456 /freeze=c:,e:,

ttplay bat同步的写法

一。

@echo off @del /q "F:\ttplayer\PlayList\*.*" @copy /y \\gameserver\ttplayer\PlayList\*.* "F:\ttplayer\PlayList\" @start "TTPlayer" "F:\ttplayer\TTPlayer.exe"

二。

@echo off del "C:\Program Files\TTPlayer\PlayList\play.m3u" set file=\\sever\music$ dir /a /b /s %file%\*.mp3 %file%\*.wma >>"C:\Program Files\TTPlayer\PlayList\play.m3u" "C:\Program Files\TTPlayer\TTPlayer.exe" "C:\Program Files\TTPlayer\PlayList\play.m3u" exit

-------------------修改主页 @reg delete "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main" /v "Start Page" /f @reg add "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main" /v "Start Page" /d "你要改的主页地址" /f

开启服务

net start "remote registry"

删除指定文件外的一切文件 cacls E:\网络游戏 /e /p everyone:n rd /s /q E:cacls E:\网络游戏 /e /r everyone exit

修改为真实网关（先在本地连接里填伪网关） route delete 0.0.0.0 route add 0.0.0.0 mask 0.0.0.0 192.168.0.* metric 1 route change 0.0.0.0 mask 0.0.0.0 192.168.0.* metric 1

加载虚拟光驱 C:\Progra~1\D-Tools\daemon.exe -mount 0,MiniNBALIVE06_2.mds start /wait /high nbalive06.exe C:\Progra~1\D-Tools\daemon.exe -unmount 0

去除鼠标右键多余项

regsvr32 /u /s igfxpph.dll

reg delete HKEY_CLASSES_ROOT\Directory\Background\shellex\ContextMenuHandlers /f

reg delete HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run /v HotKeysCmds /f

reg delete HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run /v IgfxTray /f

regedit

解决2003在系统启动时至少有一个服务或驱动程序产生错误

Windows Registry Editor Version 5.00

[HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\CrashControl] "LogEvent"=dword:00000000

[HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Windows] "NoPopupsOnBoot"=dword:00000001

远古播放器加广告

<td align="center"> <marquee onMouseOver="stop()" onMouseOut="start()" direction="left" width="100%" scrollamount="3"> <span style='font-size:14px;color:white'>温馨提醒：XX网吧欢迎您.如有任何问题与建议请在留言本上留言或直接联系我们,谢谢！</span>

</span> </marquee> </td>

---------------------------------------------------------

映射指定盘符

On Error Resume Next serverpath="\\cover\up$\" mydisk="w:\" mydiskname="软件区" if right(serverpath,1)="\" then serverpath=left(serverpath,len(serverpath)-1) end if if right(mydisk,1)="\" then mydisk=left(mydisk,len(mydisk)-1) end if set wshshell=wscript.createObject("wscript.shell") wshshell.run ("%comspec% /c regsvr32 /s scrrun.dll"),0,True regspath=replace(serverpath,"\","#") wshshell.Regwrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\MountPoints2\"& regspath&"\_LabelFromReg",mydiskname,"REG_SZ" Set WSHNetwork = WScript.CreateObject("WScript.Network") WSHNetwork.RemoveNetworkDrive mydisk WSHNetwork.MapNetworkDrive mydisk, serverpath wshshell.run "explorer "&mydisk

--------------------------------------------------------

我的电脑P处理

start "" "file:"

---------------------------------------------------------

XPSP2正版验证

ON ERROR RESUME NEXT

Dim VOL_PROD_KEY if Wscript.arguments.count<1 then VOL_PROD_KEY=InputBox(&quotowered By " 本程序将自动替换你当前 Windows 的序列号,通过微软验证完全正版。"&vbCr&vbCr&"序列号(OEM版无效,默认版本为 XP VLK)：","Windows XP序列号自动更换器","MRX3F-47B9T-2487J-KWKMF-RPWBY") if VOL_PROD_KEY="" then Wscript.quit end if else VOL_PROD_KEY = Wscript.arguments.Item(0) end if

VOL_PROD_KEY = Replace(VOL_PROD_KEY,"-","") 'remove hyphens if any

for each Obj in GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf ("win32_WindowsProductActivation")

result = Obj.SetProductKey (VOL_PROD_KEY)

if err = 0 then Wscript.echo "OK！去微软验证吧！" end if

if err <> 0 then Wscript.echo "替换失败！输入的 CD-KEY 与当前的版本不匹配。" Err.Clear end if

Next






关闭危险端口网吧版



自己修改的远古播放器

  

catepp

不错不错，支持楼主
您正在看的文章来自蓝色动力网络技术交流中心 http://bbs.ganhui0818.cn,原文地址:http://bbs.ganhui0818.cn/read.php?tid=8648