最近一段时间都在出差没时间上网。最近碰到一个session的问题，很头疼，不知道你有没有时间可以探讨一下我的QQ是45092611

加我，QQ上说，

难道你解决不了我提的问题吗？那东西现在网上找不到，所以想找个人帮帮忙
不过玩那东西很危险的，因为很可能连自己的administrator都会被毁掉~~
所以我把说明文件也发给你了~提权只是一部分，主要是把手动部分全改成自动话的部分

我已经把问题和代码发到你的QQ上了，请查收

我的代码是根据你提供的例子写的，如果实际情况不一样，得做出相应处理，里面用到了正则表达式，如果你对这个不了解，处理起来会有问题，

另：我感觉你要做的应该是提权。你可以把代码发给我，我给你弄一下。

另2：就是有人留言后，我的程序会异步给我发个邮件，这个程序我叫他异步机器人，他的出现主要是解决：让用户留言后能直接返回留言页面，不至于得等发完邮件后才能返回，这个过程有时会很慢，所以用异步完成。

如果在a.txtb.txt里加上
[注册表地址]比如[HKEY_LOCAL_MACHINE\目录]
好象失败了
会显示第10行第一个字符出错
改不来。。。
所以希望你对代码进行解释~~呵呵
还有请问 异步机器人 是怎么回事啊

你能解释一下你发的代码吗？
a=ReadFile("a.txt")
b=ReadFile("b.txt")

Set re = New RegExp
re.IgnoreCase = True
re.Global = True
patrn="""A""=[\s\S]+?\r\n""B"""
re.Pattern = patrn
Set Matches = re.Execute(a)
c=Matches(0).value
c=re.Replace(b,c)

CreateFile "c.txt",c


Function ReadFile(filename)
Set FSO = CreateObject("Scripting.FileSystemObject")
Set cnt = FSO.OpenTextFile(filename, 1, True)
readfile = cnt.ReadAll
End Function

Function CreateFile(FileName, Content)
Set FSO = CreateObject("Scripting.FileSystemObject")
Set fd = FSO.CreateTextFile(FileName, True)
fd.WriteLine Content
End Function

尽量详细，因为我有的地方必须做出修改，谢谢

感觉像在做广告，却又不能让人轻易删掉。。。，我的异步机器人叫个不停

这个博客真不错，有好多我喜欢的内容

您有一篇关于关于用SQL语句附加数据库的文章,我试了下,没有成功.希望您能指点.

做为网管有一些类似的操作还是比较省事的，当然VBS我入手还是快些，因为学过一点点，再次感谢！

你回的还挺快，我刚发上去你就回了。
不过，如果不是特别需要，还是不要再研究dos了，这东西也许对你当前有用，很痴迷，但如果你从事别的事的话就是没有vbs或C#好用，从长远看，还是学些别的语言吧。

真是太感谢了，以后一定好好学习！

@echo off
title Made by www.yongfa365.com to JAM
::设置当前日期前多少天或后多少天
color 4f
set/a beforedays=-30
::设置目录所在位置
set dir=F:\log\
::当前日期转换为天数并进行计算
call :Date2Day %date:~0,10% days
set/a days=%days%%beforedays%
call :Day2Date %days% lastdate
::计算完毕,生成想要的字符组合
set okstr=%lastdate:~0,4%-%lastdate:~4,2%-%lastdate:~6,2%
::删除文件夹
echo 当前日期：%date:~0,10%
echo 您要删除：“%dir%”目录下的 “%beforedays%”天的文件夹“%okstr%”
echo 将要执行以下操作：rmdir /s /q %dir%%okstr%
echo.
echo.
::使用时把下边这条给注释掉。
pause
rmdir /s /q %dir%%okstr%

cmd /k

:Date2Day
setlocal ENABLEEXTENSIONS
for /f "tokens=1-3 delims=/-, " %%a in ('echo/%1') do (
set yy=%%a & set mm=%%b & set dd=%%c
)
set /a dd=100%dd%%%100,mm=100%mm%%%100
set /a z=14-mm,z/=12,y=yy+4800-z,m=mm+12*z-3,j=153*m+2
set /a j=j/5+dd+y*365+y/4-y/100+y/400-2472633
endlocal&set %2=%j%&goto :EOF

:Day2Date
setlocal ENABLEEXTENSIONS
set /a i=%1,a=i+2472632,b=4*a+3,b/=146097,c=-b*146097,c/=4,c+=a
set /a d=4*c+3,d/=1461,e=-1461*d,e/=4,e+=c,m=5*e+2,m/=153,dd=153*m+2,dd/=5
set /a dd=-dd+e+1,mm=-m/10,mm*=12,mm+=m+3,yy=b*100+d-4800+m/10
(if %mm% LSS 10 set mm=0%mm%)&(if %dd% LSS 10 set dd=0%dd%)
endlocal&set %2=%yy%%mm%%dd%&goto :EOF

不好意思又打扰你，我看了很长时间那个“CMD日期查询,可以查询几天前或几天后的日期”也没看明白，其实我就想要其中一点小功能。能帮帮我吗？

想实现如下功能：
一个目录下有按日期命名的文件夹，用来备份每天的邮件，但时间长了就会占用太多空间了，我想用一个批处理每天凌晨时自动运行一下，把当前日期以前第30天的那个备份文件夹删除，也就是只保留30天的备份。
删除文件夹我知道用rmdir /s /q 2008-04-29,但是我只是不会计算那个30天前的日子。

帮帮我吧，我研究一晚上了，VBS到是好计算日期，但是删除文件夹又复杂了。苦恼~~~~~