Something like this.


Code:

Break On
 
Dim $Path
$Path = ReadValue ('HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders','AppData')
If Exist($Path+'\microsoft\word\startup\')
  'Path found: ' + $Path+'\microsoft\word\startup\' ?
  Copy '\\mm_cluster\mltwdata\mltw common\microsoft user\wd global\MLTWwd2k3.dot' $Path+'\microsoft\word\startup\' /c /r 
  'Copy error was: ' + @ERROR + '  ' + @SERROR ?
Else
  'Path not found' + @ERROR + '  ' + @SERROR ?
EndIf

 
 

Edited by NTDOC (2006-02-07 09:35 PM)