How to build an Oracle exp Backup Machine

The version installed on the Oracle server is 10.1 and the IP address is 129.1.9.90.
Install oracle10.1 on the backup machine with the IP address 129.1.9.91 and disable the firewall.
Modify the tnsnames. ora file and add the following content:
JMYBJS =
(DESCRIPTION =
(ADDRESS = (PROTOCOL = TCP) (HOST = 129.1.9.90) (PORT = 1521 ))
(CONNECT_DATA =
(SERVER = DEDICATED)
(SERVICE_NAME = jmybjs)
)
)
Create a folder on disk D:
D: ackupdmp
D: ackuplog
Used to store dmp files and backup logs.
Modify the backup script as follows:
Nightly Bulk copy export for the MERs table & veiw
Write output to clarentYYMMDD.txt and errors to ERRYYMMDD.txt
Strssql = "bcp demo. clrnuser. bill_recordview out c: ibak" + 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 ()
If A> = 10 then aa = cstr ()
If B <10 then bb = cstr (0) + cstr (B)
If B> = 10 then bb = cstr (B)
Outfile = cstr (C) + aa + bb
Stroption1 = "D: oracle_bfproduct10.1.0Db_1BINexp system/****** @ jmybjs full = y buffer = 900000 file = d: ackupdmpjmybjs" + outfile + "log = d: ackuplogjmybjs "+ outfile + ". log """
Strsql = stroption1
Ret = ws. Run (strsql)
After the test, the backup is normal.
Modify the deletion script so that the backup data is retained on the backup machine for 30 days.
Nightly Bulk copy export for the MERs table & veiw
Write output to clarentYYMMDD.txt and errors to ERRYYMMDD.txt
Strssql = "bcp demo. clrnuser. bill_recordview out c: ibak" + 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 ()
If A> = 10 then aa = cstr ()
If B <10 then bb = cstr (0) + cstr (B)
If B> = 10 then bb = cstr (B)
Outfile = cstr (C) + aa + bb
Stroption1 = "C: WINDOWSsystem32Delete d: ackupdmpjmybjs" + outfile + ". dmp"
Strsql = stroption1
Ret = ws. Run (strsql)
Upload the file to system32 on the backup machine. The test is normal.
Finally, add it to the scheduled task of windows.