Otprilike da dobiješ ideju. Možeš napraviti vbs skriptu, koja sa harkodiranim imenom fajla (mojfajl.txt) i destinacije (Desktop) izgleda ovako:
Code:
On Error Resume Next
Set WSHShell = CreateObject("Wscript.Shell")
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery _
("Select * from Win32_UserAccount Where LocalAccount = True")
For Each objItem in colItems
strAccount = objItem.Name
'Komanda za kopiranje
cmd = "COPY C:\TEMP\mojfajl.txt ""C:\Documents And Settings\" & strAccount & "\Desktop"""
WSHShell.Run cmd
Next
Sada možeš kao ulazne parametre ubaciti ime fajla, destinaciju foldera u profilu, pa od toga sastaviti string cmd. Ili hoćeš sve na pladnju...