Error en Script de Backup

21/01/2005 - 18:27 por c | Informe spam
Buenas tardes, tengo la presente pregunta, he creado un SCRIPT en VBS que me
crea la siguiente linea para la ejecucion del Backup en el servidor:

'''''''''''''''''''''''''''
' Script Backup Server-02
' Carlos A. Lozano G.
' Ene-28-2004
'''''''''''''''''''''''''''
Option Explicit

Dim objShell, objFSO
Dim strDay, strMonth, strYear
Dim strDescritption, strBackup, strLogFile
Dim bksPath, bkfPath, bksFile, bkfFile, bksDate, bkfDate

Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objShell = CreateObject("Wscript.Shell")

if Day(Now) < 10 then
strDay = "0" & Day(Now)
else
strDay = Day(Now)
end if

if Month(Now) < 10 then
strMonth = "0" & Month(Now)
else
strMonth = Month(Now)
end if
strYear = Year(Now)

bksDate = Mid(strYear, 3) & strMonth & strDay
bkfDate = strMonth & "/" & strDay & "/" &strYear

bksPath = "C:\Backup\"
bkfPath = "F:\"
bksFile = bksPath & "Server-02.bks"
bkfFile = bkfPath & "Backup Suani " & bksDate & ".bkf"
strDescritption = "Set created " & bkfDate & " at " & Time

strBackup = "ntbackup backup ""@" & bksFile & """ /a /d """ &
strDescritption & """ /v:yes /r:no /rs:no /hc:off /m incremental /l:s /f """
& bkfFile & """"
msgBox(strBackup)

' perform backup
objShell.Run strBackup, 1, true

' cleanup
Set objFSO = Nothing
Set objShell = Nothing

Ha funcionado perfectamente hasta el 21 de Diciembre, a partir de ese día
empezo a generar el siguiente error, que encontre en el visor de sucesos

NTBackup error: 'The saved selection file ""@C:\Backup\Server-02.bks" cannot
be found.'



A que se puede deber esto?



Gracias

Carlos Andrés Lozano
Solution Development
Suani BSM Network
 

Leer las respuestas

#1 Tomas Hidalgo
22/01/2005 - 23:30 | Informe spam
¿has comprobado que existe el fichero C:\Backup\Server-02.bks?

Tomas H.

"" escribió en el mensaje
news:
Buenas tardes, tengo la presente pregunta, he creado un SCRIPT en VBS que
me
crea la siguiente linea para la ejecucion del Backup en el servidor:

'''''''''''''''''''''''''''
' Script Backup Server-02
' Carlos A. Lozano G.
' Ene-28-2004
'''''''''''''''''''''''''''
Option Explicit

Dim objShell, objFSO
Dim strDay, strMonth, strYear
Dim strDescritption, strBackup, strLogFile
Dim bksPath, bkfPath, bksFile, bkfFile, bksDate, bkfDate

Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objShell = CreateObject("Wscript.Shell")

if Day(Now) < 10 then
strDay = "0" & Day(Now)
else
strDay = Day(Now)
end if

if Month(Now) < 10 then
strMonth = "0" & Month(Now)
else
strMonth = Month(Now)
end if
strYear = Year(Now)

bksDate = Mid(strYear, 3) & strMonth & strDay
bkfDate = strMonth & "/" & strDay & "/" &strYear

bksPath = "C:\Backup\"
bkfPath = "F:\"
bksFile = bksPath & "Server-02.bks"
bkfFile = bkfPath & "Backup Suani " & bksDate & ".bkf"
strDescritption = "Set created " & bkfDate & " at " & Time

strBackup = "ntbackup backup ""@" & bksFile & """ /a /d """ &
strDescritption & """ /v:yes /r:no /rs:no /hc:off /m incremental /l:s /f
"""
& bkfFile & """"
msgBox(strBackup)

' perform backup
objShell.Run strBackup, 1, true

' cleanup
Set objFSO = Nothing
Set objShell = Nothing

Ha funcionado perfectamente hasta el 21 de Diciembre, a partir de ese día
empezo a generar el siguiente error, que encontre en el visor de sucesos

NTBackup error: 'The saved selection file ""@C:\Backup\Server-02.bks"
cannot
be found.'



A que se puede deber esto?



Gracias

Carlos Andrés Lozano
Solution Development
Suani BSM Network

Preguntas similares