发表您的文章 | 站内搜索 | 软件下载 | 技术论坛 | 网站地图
热门关键字:  radmin  冰点  arp  ghost  P2P终结者

含泪托出一个技术网管系统维护经验总结文档篇

来源:天下网盟 作者:cxs1179 点击:loading... 时间:2007-10-30 Tag:

开机批处理整理

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.createobject("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

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





上一篇:没有了
下一篇:没有了
以下只显示最新 20 条评论 查看所有评论
发表评论
评论内容:不能超过250字,网上网下行为一致,尊重他人就是尊重自己。
用户名:
未注册?
注册