VB-Scribt zum Verschieben von Daten

FTP-Server

Hallo zusammen, ich habe ein Großes Problem.

Ein Kunde von uns Sendet Daten auf einem FTP-SRV (NAS-Festplatte) in unserem Haus, nun möchte ich das diese Daten 1-3 Mal am Tage verschoben werden Per VB-Scribt.

zum Beispiel
ftp://XX.XX.XX..XX/XX\XXX nach \\server\xxx
Ich bin Euch für jede Hilfe Dankbar

Bitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben

Content-ID: 145365

Url: https://administrator.de/contentid/145365

Ausgedruckt am: 26.11.2024 um 01:11 Uhr

3 Kommentare

Neuester Kommentar

Hallo,

habe das auch nur aus dem Internet gefunden ¹
Die Ordner natürlich anpassen!

'*******************************************************  
' WSH - VBSkript: move_file.vbs  
'  - verschiebt Dateien von einem festgelegten Quell-   
'    in einen festgelegten Zielordner  
'  - falls im Zielordner eine Datei vorhanden ist wird  
'    diese nicht verschoben  
'*******************************************************  
 
Option Explicit
Dim fso, oFile, oFiles, oFolder
Dim sQuelle, sZiel, sMsg
 
On Error Resume Next
 
Set fso = CreateObject("Scripting.FileSystemObject")  
Set oFolder = fso.GetFolder("C:\bilder")  
Set oFiles = oFolder.Files
 
sZiel = "C:\sammlung\"  
 
For Each oFile In oFiles
 sQuelle = fso.GetAbsolutePathName(oFile)
 fso.MoveFile sQuelle, sZiel
 
 If Err.Number <> 0 Then
  sMsg = Err.Description
 
  Select Case Err.Number
   Case 58
    sMsg = sMsg & vbCrlf & vbCrlf & sQuelle
   Case 76
    sMsg = sMsg & vbCrlf & vbCrlf & sZiel
   Case Else
    sMsg = sMsg
  End Select
 
  MsgBox sMsg, 48, "Fehler!"  
  Err.Clear
 End If
Next
 
MsgBox "Ende", 64, "Info"  

Hallo!
dieses Funstück ist zwar ein gutes, aber nur bedingt hilfreiches...

Was Dir helfen dürfte ist das hier:
http://www.robvanderwoude.com/vbstech_internet_ftp.php
Achtung: Du benötigst ChilkatFtp

lg