Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

VB-Scribt zum Verschieben von Daten

Frage Entwicklung Installation

Mitglied: as1904

as1904 (Level 1) - Jetzt verbinden

22.06.2010 um 10:38 Uhr, 2627 Aufrufe, 3 Kommentare

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
Mitglied: michi1983
22.06.2010 um 11:46 Uhr
Hallo,

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

01.
'******************************************************* 
02.
' WSH - VBSkript: move_file.vbs 
03.
'  - verschiebt Dateien von einem festgelegten Quell-  
04.
'    in einen festgelegten Zielordner 
05.
'  - falls im Zielordner eine Datei vorhanden ist wird 
06.
'    diese nicht verschoben 
07.
'******************************************************* 
08.
  
09.
Option Explicit 
10.
Dim fso, oFile, oFiles, oFolder 
11.
Dim sQuelle, sZiel, sMsg 
12.
  
13.
On Error Resume Next 
14.
  
15.
Set fso = CreateObject("Scripting.FileSystemObject") 
16.
Set oFolder = fso.GetFolder("C:\bilder") 
17.
Set oFiles = oFolder.Files 
18.
  
19.
sZiel = "C:\sammlung\" 
20.
  
21.
For Each oFile In oFiles 
22.
 sQuelle = fso.GetAbsolutePathName(oFile) 
23.
 fso.MoveFile sQuelle, sZiel 
24.
  
25.
 If Err.Number <> 0 Then 
26.
  sMsg = Err.Description 
27.
  
28.
  Select Case Err.Number 
29.
   Case 58 
30.
    sMsg = sMsg & vbCrlf & vbCrlf & sQuelle 
31.
   Case 76 
32.
    sMsg = sMsg & vbCrlf & vbCrlf & sZiel 
33.
   Case Else 
34.
    sMsg = sMsg 
35.
  End Select 
36.
  
37.
  MsgBox sMsg, 48, "Fehler!" 
38.
  Err.Clear 
39.
 End If 
40.
Next 
41.
  
42.
MsgBox "Ende", 64, "Info"
Bitte warten ..
Mitglied: Edi.Pfisterer
22.06.2010 um 13:29 Uhr
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
Bitte warten ..
Mitglied: Edi.Pfisterer
22.06.2010 um 13:32 Uhr
[ edit: das untere der beiden angeführten Beispiele sollte Deine Bedürfnisse voll und ganz befriedigen...]
Bitte warten ..
Ähnliche Inhalte
Windows Server
Drucker entfernen in VB-Script (2)

Frage von NilsvLehn zum Thema Windows Server ...

Visual Studio
gelöst VB: Batchprogramm: Resultat zurückgeben an VB Form (Textfeld) (7)

Frage von PixL86 zum Thema Visual Studio ...

VB for Applications
gelöst VB Skript für mehrere Batch Befehle (37)

Frage von freshman2017 zum Thema VB for Applications ...

VB for Applications
gelöst VB-Script per Aufgabenplanung (2)

Frage von S4kar97 zum Thema VB for Applications ...

Neue Wissensbeiträge
Windows Update

Novemberpatches und Nadeldrucker bereiten Kopfschmerzen

(14)

Tipp von MettGurke zum Thema Windows Update ...

Windows 10

Abhilfe für Abstürze von CDPUsersvc auf Win10 1607 und 2016 1607

(7)

Tipp von DerWoWusste zum Thema Windows 10 ...

RedHat, CentOS, Fedora

Fedora 27 ist verfügbar

Information von Frank zum Thema RedHat, CentOS, Fedora ...

Heiß diskutierte Inhalte
Server
Bilder aus dem Web mit CSV runterladen (30)

Frage von Yannosch zum Thema Server ...

Windows Update
WSUS 4 (Server 2012 R2) - Windows 10 Updates nicht möglich (12)

Frage von c0d3.r3d zum Thema Windows Update ...

Windows Userverwaltung
gelöst Administrator hat alle Rechte verloren (10)

Frage von mrdead zum Thema Windows Userverwaltung ...