新足迹

 找回密码
 注册

精华好帖回顾

· 煮夫手记二十五 庆六一 炸三样 (2011-5-31) amon54 · 新疆拉条子+辣炒鱿鱼+绿豆粥 (2008-11-13) 净心
· 大头怀念的北京小吃(三) -- 元宵 (2007-3-4) datou2z · 大头家常菜 -- 香酥小虾,八珍豆腐,红烧肉 (2007-11-3) datou2z
Advertisement
Advertisement
查看: 766|回复: 1

[IT] 请教高手帮我把以下的批处理文件改成vbscript文件 [复制链接]

发表于 2009-11-13 15:15 |显示全部楼层
此文章由 caliven 原创或转贴,不代表本站立场和观点,版权归 oursteps.com.au 和作者 caliven 所有!转贴必须注明作者、出处和本声明,并保持内容完整
@echo off
@echo register BootUp action
call "C:\WINDOWS\system32\GroupPolicy\Logger.bat" /STARTUP
rem exit
只需要改上边的文件就好,下边的只是参考
华丽的分割线
==================================================================
logger.bat的文件内容是
@echo off
cls

Rem Use IPConfig /all command to list and find the last IP address from the list
FOR /F "TOKENS=2* DELIMS=:" %%A IN ('IPCONFIG /ALL ^| FIND "IP Address"') DO FOR %%B IN (%%A) DO SET IPADDR=%%B

Rem Use IPConfig /all command to list and find the MAC ADDRESS
FOR /F "TOKENS=2* DELIMS=:" %%A IN ('IPCONFIG /ALL ^| FIND "Physical Address"') DO FOR %%B IN (%%A) DO SET MACaddress=%%B

if %1==/LOGON GOTO LogonRecord
if %1==/LOGOFF GOTO LogoffRecord
if %1==/STARTUP GOTO StartupRecord
if %1==/SHUTDOWN GOTO ShutdownRecord

: LogonRecord
set Line=%Date% %Time% LOG ON %Username% on %ComputerName% %IPAddr% %MACaddress%
echo %Line% >> c:\WINDOWS\system32\GroupPolicy\Log-%ComputerName%.txt
goto FINISH

: LogoffRecord
set Line=%Date% %Time% LOG OFF %Username% on %ComputerName% %IPAddr% %MACaddress%
echo %Line% >> c:\WINDOWS\system32\GroupPolicy\Log-%ComputerName%.txt
goto FINISH

: StartupRecord
set Line=%Date% %Time% STARTUP %ComputerName% %IPAddr% %MACaddress%
echo %Line% >> c:\WINDOWS\system32\GroupPolicy\Log-%ComputerName%.txt
goto FINISH

: ShutdownRecord
set Line=%Date% %Time% SHUTDOWN %ComputerName% %IPAddr% %MACaddress%
echo %Line% >> c:\WINDOWS\system32\GroupPolicy\Log-%ComputerName%.txt
goto FINISH


: FINISH
::net use U: \\Imaxime2\UtzonScripts
::echo \\Imaxime3\NetLog\NetworkLog LN %ComputerName% %UserName%

小弟不胜感激
Advertisement
Advertisement

发表于 2009-11-13 21:07 |显示全部楼层
此文章由 caliven 原创或转贴,不代表本站立场和观点,版权归 oursteps.com.au 和作者 caliven 所有!转贴必须注明作者、出处和本声明,并保持内容完整
没人哦

发表回复

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

本版积分规则

Advertisement
Advertisement
返回顶部