新足迹

 找回密码
 注册

精华好帖回顾

· Westpac Bank:Home Loan,Business Loan(咨询) (2007-9-29) newaussie · 酱酱相传——贵州糍粑辣椒酱以及贵州特色辣子鸡 (2011-6-6) cncsc
· 移民往返路 (2009-3-2) HOLLY2008 · 从严冬到酷暑—Lake Entrance 4天3夜(2010.12.27—2010.12.30)VIC(finish) (2011-2-2) t_guoguo
Advertisement
Advertisement
查看: 734|回复: 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
返回顶部