backup system state on remote servers

Forums

My Profile

Inbox

Address Book

My Subscription

My Forums

backup system state on remote servers

Logged in as: Guest

arrSession:exec spGetSession 2,2,62169

	Active Users: There are 0 members and 0 guests.
	Users viewing this topic: none

Printable Version

All Forums >> [Scripting] >> WSH & Client Side VBScript >> backup system state on remote servers
Do you like VisualBasicScript.com? Link to us and help spread the word about our forum. Thanks!

Page: [1]

Message

<< Older Topic Newer Topic >>

backup system state on remote servers - 7/5/2008 7:21:52 PM

fornikator

Posts: 2
Score: 0
Joined: 7/4/2008
Status: offline

Hi!
I have found script for backing up system state on local machine and now I need
to implement this script on remote servers.
How can I do this from one location?
Is it posible to backup system state on remote machines from one location?
Thanks in advanced!

This is original script

DIM strDate
DIM strComputerName
DIM strBytes

Set WshNetwork = WScript.CreateObject("WScript.Network")
strComputerName = WshNetwork.ComputerName
strDate = month(Now) & "-" & day(Now) & "-" & year(Now)
Const HARD_DISK = 3

strComputer = "."

Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colDisks = objWMIService.ExecQuery _
("SELECT * FROM Win32_LogicalDisk WHERE DriveType = " _
& HARD_DISK & "")
For Each objDisk in colDisks
strBytes = FormatNumber((objDisk.FreeSpace / 1073741824),2)
If strBytes <= 0.30 then
Wscript.Echo "You do not have enough disk space to place the System State backup on this drive. Please find another location."
Else
Wscript.Echo objDisk.DeviceID & " has " & " " & strBytes & "GB of space available"
End If

Set oWshShell = CreateObject("WScript.Shell")

strDest=inputbox("Please enter the location you would like to save the system state. The location must have a minimum 300MB of space." & vbCr & vbCr & "Example: C:\Systemstate","CSC System State Backup","C:\systemstate")

oWshShell.Run "ntbackup backup systemstate /f " & strDest & "\Systemstate" & "_" & strDate & "_" & strComputerName & ".bkf /m copy"

and i have modify script to run without administrator interference

Post #: 1

RE: backup system state on remote servers - 7/7/2008 4:02:51 AM

ebgreen

Posts: 5041
Score: 31
Joined: 7/12/2005
Status: offline

try searching for remote. There are several discussions around remotely running scripts.

_____________________________

"... when you are good and crazy, oooh, oooh, oooh, the sky is the limit!" - The Tick
Goog places to start:http://www.visualbasicscript.com/m_24727/tm.htm
http://www.visualbasicscript.com/m_47117/tm.htm

(in reply to fornikator)

Post #: 2

If you found our site useful please link to us <a href="http://www.visualbasicscript.com">VisualBasicScript.com</a>.

All Forums >> [Scripting] >> WSH & Client Side VBScript >> backup system state on remote servers

Page: [1]

Jump to:

New Messages	No New Messages
Hot Topic w/ New Messages	Hot Topic w/o New Messages
Locked w/ New Messages	Locked w/o New Messages

Post New Thread

Reply to Message

Post New Poll

Submit Vote

Delete My Own Post

Delete My Own Thread

Rate Posts