Re: Copy a file to multiple servers with the same location on each

Because the ARRAY example I provided cycles through the machine names you
will have to put into the script in place of the names I used (computer1,
computer2, etc...)

The ARRAY reads each machine name, executes the portion of the script you
provided to the forum, then through the use of "NEXT" cycles to the next
machine name in the list.

p.s. It is true. "objWMIService" is not needed in this script ;-)

ESP





"kb" wrote:

> In the below code is strComputer still going to work being it's not defined
> anywhere?
>
> "Santos Soler" wrote:
>
> > objFSO.CopyFile "C:\SandBox\lpt$vpn.103" , "\\" & strComputer &
> > "\c$\SProtect\", OverwriteExisting
> >
> > "kb" <kb@xxxxxxxxxxxxxxxxxxxxxxxxx> wrote in message
> > news:8BFD0C44-D447-401C-9F4F-BFF05FE0769C@xxxxxxxxxxxxxxxx
> > > But what about the line
> > >
> > > objFSO.CopyFile "C:\SandBox\lpt$vpn.103" , "\\usnsmcw040\c$\SProtect\",
> > >
> > > Wouldn't that copy it to just that server?
> > >
> > > "ESP" wrote:
> > >
> > >> <Watch the word-wrap>
> > >>
> > >> Const OverwriteExisting = True
> > >> arrDC =
> > >> Array("computer1","computer2","computer3","computer4","computer5", _
> > >> "computer6","computer7","computer8","computer9","computer10")
> > >> For Each strComputer in arrDC
> > >> Set objWMIService = GetObject("winmgmts:" _
> > >> & "{impersonationLevel=impersonate}!\\" & strComputer &
> > >> "\root\cimv2")
> > >> Set objFSO = CreateObject("Scripting.FileSystemObject")
> > >> objFSO.CopyFile "C:\SandBox\lpt$vpn.103" , "\\usnsmcw040\c$\SProtect\",
> > >> OverwriteExisting
> > >> Next
> > >>
> > >>
> > >> ESP
> > >>
> > >>
> > >>
> > >>
> > >> "kb" wrote:
> > >>
> > >> > Ok, below is what I have so far but it only copies the file to one
> > >> > server. I
> > >> > need it to be able to copy that same file to a bunch of servers. Can
> > >> > anyone
> > >> > direct me as to how I would go about this? Thanks.
> > >> >
> > >> >
> > >> > Const OverwriteExisting = TRUE
> > >> >
> > >> > strComputer = "usnsmcw040"
> > >> > Set objWMIService = GetObject("winmgmts:" _
> > >> > & "{impersonationLevel=impersonate}!\\" & strComputer &
> > >> > "\root\cimv2")
> > >> >
> > >> >
> > >> > Set objFSO = CreateObject("Scripting.FileSystemObject")
> > >> > objFSO.CopyFile "C:\SandBox\lpt$vpn.103" , "\\usnsmcw040\c$\SProtect\",
> > >> > OverwriteExisting
> > >> >
> >
> >
.

Relevant Pages

  • Re: Logon script - function array and select case not working
    ... this all works well, except, the function i am using for the rules in the control script causes alot of querrys to AD. as there are alot of groups. ... objTSout.writeline retrv ... So if you think that this will assign an array value to the variable, how do you think the case select statement is going go compare this array value with the literal string values such as "group name here"? ... However, by not assigning ANY value to checkgrp in the function, you are guaranteeing that, should the function ever exit, it will return no information. ...
    (microsoft.public.scripting.vbscript)
  • Re: string retrieval issue
    ... Chicago Bears|NFC North ... not writing the third element back to the array). ... You didn't include it in your script. ... Fear is the mind-killer. ...
    (comp.lang.perl.misc)
  • Re: even rows for checkbox forms with no splitting of boxes from values
    ... 'mod' on the array length with a denominator equal to the width of the row, ... State saving really depends on what the script is already doing. ... So I usually roll my own checkboxes. ... #this is to create an array with 25-50 strings 2-10 in length ...
    (comp.infosystems.www.authoring.cgi)
  • Re: settimeout needs alert() ???
    ... function slider { ... and use script to replace the src and title attributes. ... are downloaded completely. ... The usual strategy is to load all of the images in to an array of image ...
    (comp.lang.javascript)
  • Re: BinaryStream.Write ByteArray erroring with Code 800A0BB9, Source ADODB.Stream
    ... script is reaching out to a SQLServer database and grabbing some data ... BinaryStream.Write method expects a byte array, ...     Else ... I made the changes to the script using your code, ...
    (microsoft.public.scripting.vbscript)
Quantcast