FileCopy zu Windows Verzeichnis

DerSchatten

Folgendes Problem:

Ich möchte gerne Dateien von einem Netzwerk in ein lokales Verzeichnis in C:\Programme kopieren.
Das ganze betrifft ein Firmennetzwerk.

Der besagte Benutzer besitzt Administratorrechte.
Wenn ich nun versuche die Datei direkt von dem netzlaufwerk in den ordner zu kopieren erhalte ich die Fehlermeldung das die gesuchte resource nicht verfügbar ist.
Ok, denke ich mir liegt an irgendwelchen Rechten.

Nun kann ich die Datei über Umwege (zuerst nach C: Temp und anschließend nach C:Programme verschieben. das funktioniert auch, allerdings erscheint dazwischen der Hinweis, das dafür Administrator Berechtigungen erforderlich sind und man mittels der Schaltfläche "Fortsetzen" bestätigen soll. Dann ist die Datei kopiert.

Wenn ich das nun mittels FileCopy versuche landet die Datei im TEMP-Verzeichnis, aber nicht mehr weiter im Programme Ordner.
Ich vermute mal das liegt daran weil hier auf eine Bestätigung gewartet wird. Diese wird aber nicht angezeigt bei einem FileCopy.

Was kann ich da tun?

Wenn ich dem Script ein #RequireAdmin hinzufüge, erhalten die Dateien nach dem kopieren ein Schloss im Symbol. Das sollte nicht sein.

Code

#Include <File.au3>
#Include <Array.au3>


#RequireAdmin
$pfadsrc = "T:\SC\Softphone neu\MTM\NgASP\"
$pfaddst = "C:\Program Files\MTM\NgASP\"


Local $datei[3]
$datei[0] = "AgentSoftPhone.Config.ini"
$datei[1] = "AgentSoftPhone.exe"
$datei[2] = "UniLib.dll"


While 1
 If FileExists($pfaddst) Then
  If FileGetSize ($pfadsrc & $datei[1] <> FileGetSize ($pfaddst & $datei[1])) Or FileGetTime ($pfadsrc & $datei[1],0,1) <> FileGetTime ($pfaddst & $datei[1],0,1) Then
   If WinExists ("AgentSoftPhone") Then
    $hinweis1 = msgbox (49, "Fehler!", "Bitte SoftPhone beenden und 'OK' klicken!")
    If $hinweis1 == 2 Then Exit
   Else
    For $i = 0 To UBound($datei) -1
     FileCopy ($pfadsrc & $datei[$i], @TempDir, $FC_OVERWRITE)
     FileMove (@TempDir & "\" & $datei[$i], $pfaddst, $FC_OVERWRITE)
    Next
    $hinweis2 = msgbox (65, "Hinweis!", "SoftPhone wurde aktuallisiert!" & @CRLF & "'OK' klicken um SoftPhone zu starten.")
    If $hinweis2 == 1 Then Run($pfaddst & $datei[1])
    Exit
   EndIf
  Else
   msgbox (64, "Hinweis!", "SoftPhone ist aktuell!")
   Exit
  EndIf
 Else
  msgbox (48, "Fehler!", "Verzeichnis '" & $pfaddst & "' konnte nicht gefunden werden!")
 EndIf
WEnd

Alles anzeigen