rem file name daily.bat rem batch process reload db backup rem rem author frank.fan rem modification history created 2012-05-07 rem modified rem for /f tokens=1-3 delims=/ %%i in ('date /t') do @set filenamedt=%%i%%j%%k #取系统当前日期：
rem file name daily.bat
rem batch process
reload db backup
rem
rem author frank.fan
rem modification history
created 2012-05-07
rem modified
rem
for /f tokens=1-3 delims=/ %%i in ('date /t') do @set filenamedt=%%i%%j%%k
#取系统当前日期：年月日(中文格式)、月日年(英文格式)
for /f tokens=1,2 delims=: %%i in ('time /t') do @set filenametm=%%i%%j
#取系统当前时间：时分
set username=system #oracle帐号
set userpasswd=123456 #oracle密码
set servicename=qeway #oracle sid
set schemasname=iscop #oracle schema帐号
set rartool=c:program fileswinrar #设定winrar路径(各个机器不同)
set dbbackuppath=d:dbbak #设定被导出的文件路径
set dbadirectories=dbbak #oracle内设置的directory目录名
set dbbackupfilename=qeway_%filenamedt%-%filenametm%
goto main
:main
echo exporting schemas.......
expdp %username%/%userpasswd%@%servicename% dumpfile=%dbadirectories%:%dbbackupfilename%.dmp schemas=%schemasname% logfile=%dbadirectories%:%dbbackupfilename%.log
echo done exporting schemas.
echo =======================================================
echo ...done export
if exist %dbbackuppath%%dbbackupfilename%.rar del %dbbackuppath%%dbbackupfilename%.rar
%rartool%winrar.exe a -ep %dbbackuppath%%dbbackupfilename%.rar %dbbackuppath%%dbbackupfilename%.dmp
del %dbbackuppath%%dbbackupfilename%.dmp
echo ...compression complete
forfiles /p %dbbackuppath% /m *.rar -d -30 /c cmd /c del /f @path
#删除30天之前的rar文件
rem -----------send a mail to notification-----------
start d:dbbakbatch_notification_daily.vbs #调用邮件通知vbs文件
exit
邮件通知vbs文件内容：
namespace =
set email = createobject(cdo.message)
email.from = xxxx@exchange.com
email.to = xxxx@163.com
email.subject = gongxtpt batch daily task
email.textbody = gongxtpt batch daily task was done!! starting at 00:00am
with email.configuration.fields
.item(namespace&sendusing) = 2
.item(namespace&smtpserver) = 10.0.0.12
.item(namespace&smtpserverport) = 25
.item(namespace&smtpauthenticate) = 0
.item(namespace&sendusername) =
.item(namespace&sendpassword) =
.update
end with
email.send
set email=nothing