开机批处理整理 

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