搭建ORACLE的exp备份机

oracle服务端装的版本为10.1，IP地址为129.1.9.90
在备份机上安装oracle10.1，配IP地址为129.1.9.91，关闭防火墙。
并修改tnsnames.ora文件，添加如下内容：
JMYBJS =
(DESCRIPTION =
(ADDRESS = (PROTOCOL = TCP)(HOST = 129.1.9.90)(PORT = 1521))
(CONNECT_DATA =
(SERVER = DEDICATED)
(SERVICE_NAME = jmybjs)
)
)

在D盘新建文件夹：
d:\backup\dmp
d:\backup\log
用来存放dmp文件和备份的日志。

修改备份脚本如下：
'Nightly Bulk copy export for the customers table&veiw
'Write output to clarentYYMMDD.txt and errors to ERRYYMMDD.txt
''strssql="bcp demo.clrnuser.bill_recordview out c:\bibak\"+outfile+" -U jl_voip -P jlvoip -c -k -t,"
Dim outfile,aa,bb,stroption1,stroption2,A,B,C,strsql
set ws=WScript.CreateObject("WScript.shell")
A=cint(month(dateadd("d",0,date())))
B=cint(day(dateadd("d",0,date())))
C=cint(year(dateadd("d",0,date())))
if A<10 then aa=cstr(0)+cstr(A)
if A>=10 then aa=cstr(A)
if B<10 then bb=cstr(0)+cstr(B)
if B>=10 then bb=cstr(B)
outfile=cstr(C)+aa+bb
stroption1="D:\oracle_bf\product\10.1.0\Db_1\BIN\exp system/******@jmybjs full=y buffer=900000 file=d:\backup\dmp\jmybjs"+outfile+" log=d:\backup\log\jmybjs"+outfile+".log"""
strsql=stroption1
ret=ws.Run(strsql)

测试后，备份正常。

修改删除脚本，使备份数据在备份机上保留30天
'Nightly Bulk copy export for the customers table&veiw
'Write output to clarentYYMMDD.txt and errors to ERRYYMMDD.txt
''strssql="bcp demo.clrnuser.bill_recordview out c:\bibak\"+outfile+" -U jl_voip -P jlvoip -c -k -t,"
Dim outfile,aa,bb,stroption1,stroption2,A,B,C,strsql
set ws=WScript.CreateObject("WScript.shell")
A=cint(month(dateadd("d",-30,date())))
B=cint(day(dateadd("d",-30,date())))
C=cint(year(dateadd("d",-30,date())))
if A<10 then aa=cstr(0)+cstr(A)
if A>=10 then aa=cstr(A)
if B<10 then bb=cstr(0)+cstr(B)
if B>=10 then bb=cstr(B)
outfile=cstr(C)+aa+bb
stroption1="C:\WINDOWS\system32\Delete d:\backup\dmp\jmybjs"+outfile+".dmp"
strsql=stroption1
ret=ws.Run(strsql)

测试，提示不正确，检查后，发现这个备份机中的sytem32文件夹下没有delete.exe文件，从其他系统中拷贝delete.exe文件到这个备份机的system32下，测试正常。
最后，添加到windows的定时任务中。