Top-Themen

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 Kopieren von A nach B ohne überschreiben bei vorhanden

Mitglied: kinggunta

kinggunta (Level 2) - Jetzt verbinden

19.05.2009, aktualisiert 13:42 Uhr, 4165 Aufrufe, 4 Kommentare

Hallo!

Ich möchte gerne folgendes umsetzen:

Ich möchte mit einem "Kopier-Tool" welches ich selbst in VB bastle, Dateien von A nach B kopieren.
Jedoch soll eine eventuell schon vorhandene Zieldatei nicht ersetzt werden sondern fortlaufend nummeriert werden.

Also wenn die Datei Brief.doc am Ziel schon vorhanden ist soll er z.b. eine weitere Datei mit Brief(1).doc machen.

Hat jemand einen TIP?
Mitglied: LotPings
19.05.2009 um 15:30 Uhr
Zitat von kinggunta:
Hat jemand einen TIP?

Hallo kinggunta,

ich liebe ja diese selbstbeweihräuchernden Pseudonyme (schließlich hab ich selbst eines, aber wenigstens nicht soo offensichtlich.)
aber sowas als Anrede benutzen zu müssen fällt schon schwer

Eigemtlich bastelt man VB nicht - man programmiert. Die Bastler wollen oft genug andere basteln lassen. (bastla DU bist ausdrücklich nicht gemeint )

Die Aufgabenstellung ist doch klar beschrieben. Wofür brauchst du einen Tip?

Einen Tip habe ich aber doch: du solltest schon genauer bei deiner VB Version sein.
  • VBDos
  • VB1 bis 6
  • Vb.Net welches Framework / VS Studio / Express welcher Jahrgang etc.

Die Ausführung einer Funktion die ggfs. rekursiv aufgerufen werden muss, um eine freie Nummer zu finden, hängt schon von deiner Umgebung ab.

Gruß
LotPings
Bitte warten ..
Mitglied: bastla
19.05.2009 um 15:38 Uhr
Hallo kinggunta und LotPings!

Schematisch (unter VBS) etwa so:
01.
Datei = "Test.txt" 
02.
Quelle = "Z:\Quellordner" 
03.
Ziel = "Z:\Zielordner" 
04.
 
05.
Set fso = CreateObject("Scripting.FileSystemObject") 
06.
DateiName = fso.GetBaseName(Datei) 
07.
DateiTyp = fso.GetExtensionName(Datei) 
08.
Zusatz = "" 
09.
Nr = 1 
10.
Do While fso.FileExists(Ziel & "\" & DateiName & Zusatz & "." & DateiTyp) 
11.
    Zusatz = "(" & CStr(Nr) & ")" 
12.
    Nr = Nr + 1 
13.
Loop 
14.
 
15.
fso.CopyFile Quelle & "\" & Datei, Ziel & "\" & DateiName & Zusatz & "." & DateiTyp
Grüße
bastla

P.S.: @LotPings: Danke für die Ausnahmegenehmigung - und sorry, dass ich schon wieder Deine pädagogischen Bemühungen störe ...
Bitte warten ..
Mitglied: kinggunta
19.05.2009 um 15:46 Uhr
@bastla

Es gibt eben doch noch bastla
Verwende Express Studio 2005.

DANKE
Bitte warten ..
Mitglied: LotPings
19.05.2009 um 15:57 Uhr
Zitat von bastla:
P.S.: @LotPings: Danke für die Ausnahmegenehmigung - und sorry, dass ich schon wieder Deine pädagogischen Bemühungen störe ...

Kein Problem - und sehr geschickte Lösung mit Anfangs leerem Zusatz.

Gruß
LotPings
Bitte warten ..
Ähnliche Inhalte
Windows Server

Kopieren des Verzeinisses A nach B (Daten überschreiben)

Frage von expetrovWindows Server1 Kommentar

Hallo zusammen, Auf ein Server muss ich ein Script erstellen, welches folgendes macht: 1. stoppen des Dienstes: "XY" 2. kopieren des ...

Batch & Shell

FTP mit wput nur vorhandene Dateien im Ziel kopieren

gelöst Frage von Otto1699Batch & Shell7 Kommentare

Hallo, ich habe Dateien auf einer Windows Maschine und Dateien auf einer Linux Maschine im gleichen Netzwerk. Nun möchte ...

Microsoft Office

Excel nur kopieren wenn Datum nicht schon vorhanden VBA

gelöst Frage von hugoundertakerMicrosoft Office12 Kommentare

Hallo zusammen, folgendes Aufgabe: In einer ExceltabelleEingabe steht im Blatt2 A3 ein Datum. Dieses soll nun mit der anderen ...

Datenbanken

Datensatz hinzufügen, nicht überschreiben Access

gelöst Frage von Dr.CornwallisDatenbanken19 Kommentare

Liebe Gemeinde, ich habe folgenden Code (bei Button klick): Wähle ich mit diesem Code einen anderen Wert im Kombifeld ...

Neue Wissensbeiträge
Google Android

Googles "Android Enterprise Recommended" für Unternehmen

Information von kgborn vor 8 StundenGoogle Android3 Kommentare

Hier eine Information, die für Administratoren und Verantwortliche in Unternehmen, die für die Beschaffung und das Rollout von Android-Geräten ...

Sicherheit

Intel gibt neue Spectre V2-Microcode-Updates frei (20.02.2018)

Information von kgborn vor 8 StundenSicherheit

Intel hat zum 20. Februar 2018 weitere Microcode-Updates für OEMs freigegeben, um Systeme mit neueren Prozessoren gegen die Spectre ...

Microsoft
ARD-Doku - Das Microsoft Dilemma
Tipp von Knorkator vor 11 StundenMicrosoft3 Kommentare

Hallo zusammen, vor einigen Tagen lief in der ARD u.a. Reportage. Das Youtube Video dazu dürfte länger verfügbar sein. ...

Windows 10

Neue Sicherheitslücke in Windows 10 (Version 1709) durch Google öffentlich geworden

Information von kgborn vor 1 TagWindows 10

Vor ein paar Tagen haben Googles Sicherheitsforscher vom Projekt Zero eine Sicherheitslücke im Edge-Browser publiziert. Jetzt wurde eine weitere ...

Heiß diskutierte Inhalte
Windows Server
AD DS findet Domäne nicht, behebbar?
Frage von schapitzWindows Server40 Kommentare

Guten Tag, ich habe bei einem Kunden ein Problem mit den AD DS. Umgebung ist folgende: Windows Server 2016 ...

Router & Routing
LANCOM VPN CLIENT einrichten
Frage von Finchen961988Router & Routing27 Kommentare

Hallo, ich habe ein Problem und hoffe ihr könnt mir helfen, wir haben einen Kunden der hat einen Speedport ...

Router & Routing
ISC DHCP 2 Subnetze
gelöst Frage von janosch12Router & Routing19 Kommentare

Hallo, ich betreibe bei mir im Netzwerk einen ISC DHCP Server auf Debian, der DHCP verwaltet aktuell ein /24 ...

Switche und Hubs
Cisco SG350X-48 AdminIP in anderes VLAN
Frage von lcer00Switche und Hubs14 Kommentare

Hallo zusammen, ich habe ein Problem mir einem Cisco SG350X-48 bei der Erstinstallation wurde eine IP 192.168.0.254 (Default VLAN ...