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

Kopieren von A nach B ohne überschreiben bei vorhanden

Frage Entwicklung VB for Applications

Mitglied: kinggunta

kinggunta (Level 2) - Jetzt verbinden

19.05.2009, aktualisiert 13:42 Uhr, 4130 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 ..
Neuester Wissensbeitrag
Ähnliche Inhalte
Heiß diskutierte Inhalte
Hardware
Laptop ins Salzwasser gefallen (18)

Frage von Marcel94 zum Thema Hardware ...

Switche und Hubs
LAG zwischen Cisco SG300 und Dlink DGS1100 herstellen - wie? (13)

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

Hardware
Lenovo Yoga 500 über angeschlossene USB Tastatur booten (13)

Frage von thomasreischer zum Thema Hardware ...

CPU, RAM, Mainboards
Hardware Fragen (12)

Frage von xaver-2 zum Thema CPU, RAM, Mainboards ...