Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

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, 2596 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 ..
Neuester Wissensbeitrag
Off Topic

"Ich habe nichts zu verbergen"

(2)

Erfahrungsbericht von FA-jka zum Thema Off Topic ...

Ähnliche Inhalte
Webentwicklung
Angular Daten an localhost senden (1)

Frage von tobmes zum Thema Webentwicklung ...

Basic
gelöst Mit vb.net PDF in Word-Dok einfügen (10)

Frage von ahstax zum Thema Basic ...

VB for Applications
gelöst VB Skript Excel Datei (3)

Frage von Frager zum Thema VB for Applications ...

Heiß diskutierte Inhalte
Linux Netzwerk
gelöst DHCP vergibt keine Adressen (31)

Frage von Maik82 zum Thema Linux Netzwerk ...

Exchange Server
gelöst Bestehende eMails autoamatisch weiterleiten (22)

Frage von metal-shot zum Thema Exchange Server ...

Apache Server
gelöst Lets Encrypt SSL mit Apache2 (20)

Frage von banane31 zum Thema Apache Server ...

Switche und Hubs
LAG zwischen SG300-Switches macht Probleme. Wer weiß Rat? (20)

Frage von White-Rabbit2 zum Thema Switche und Hubs ...