Results 1 to 1 of 1

Thread: Newbie

  1. #1

    Thread Starter
    New Member
    Join Date
    Jul 2011
    Posts
    2

    Newbie

    Hey everyone I need some help with a VB Script I'd like to write to back up several computers through agents on my sever. This is the code I have been using. I want this to be a VB Script. Please help or direct to some help, thanks

    Code:
    set DateString=%Date:~6,4%.%Date:~3,2%.%Date:~0,2%
    
    %WinDir%\system32\ntbackup.exe backup "@C:\BackupTasks\Daily.bks" /n
    "Backup_%DateString%" /d "Backup_%DateString%" /v:no /r:yes /rs:no /hc:off /m normal
    /j "Backup_%DateString%" /l:s /f "C:\Bckups\Backup-%DateString%.bkf"
    
    Batch file:
    ECHO OFF
    SETLOCAL ENABLEDELAYEDEXPANSION
    
    REM ***********************************************************************
    REM Set time and date variables	
    FOR /f "Tokens=1-4 Delims=/ " %%i in ('date /t') DO SET DT=%%i-%%j-%%k-%%l
    FOR /f "Tokens=1" %%i in ('time /t') DO SET TM=-%%i 
    SET TM=%TM::=-% 
    SET DTT=%DT%%TM% 
    REM ***********************************************************************
    
    SET BkupShare=%~dp0
    SET Hostname=%computername%
    SET BksFile="@%BkupShare%%Hostname%\%Hostname%.bks"
    SET BkupFile="%BkupShare%%hostname%\%Hostname%_%DT%_Backup.bkf"
    SET BkupJob="%DT% Full Backup"
    
    SET BkupCmd=C:\WINDOWS\system32\ntbackup.exe backup %BksFile% /v:yes /m normal /j %BkupJob% /l:s /f %BkupFile%
    
    REM ECHO DT         = %DT%
    REM ECHO TM         = %TM%
    REM ECHO DTT        = %DTT%
    REM ECHO Hostname   = %Hostname%
    REM ECHO BkupShare  = %BkupShare%
    REM ECHO BksFile    = %BksFile%
    REM ECHO BkupFile   = %BkupFile%
    REM ECHO BkupJob    = %BkupJob%
    REM ECHO BkupCmd    = %BkupCmd%
    
    REM PAUSE
    
    %BkupCmd%
    Last edited by Hack; Jul 11th, 2011 at 11:19 AM. Reason: Added Code Tags

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  



Click Here to Expand Forum to Full Width