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

Nur Verzeichnisstruktur kopieren und eine Datei?

Mitglied: hudson

hudson (Level 1) - Jetzt verbinden

02.06.2006, aktualisiert 06.06.2006, 7997 Aufrufe, 5 Kommentare

Hi,

für viele von Euch wahrscheinlich was recht einfaches:

Ich möchte ab einem bestimmten Verzeichnis nur alle Unterverzeichnisse und nur ein file aus den jeweiligen verzeichnissen an eine andere stelle kopieren. welches file ist egal.

also zb.:

\export\home\testdir beinhaltet:
-dir1
-dir1a
-file1
-file2
-dir2
-file1
-file2
-file3

soll so nach dem cp job aussehen:
\export\home\testdir2
-dir1
-dir1a
-file1
-dir2
-file1


hoffe es ist verständlich...
Kann jemand helfen? evtl. ein kleines shell skript?

Danke
hudson
Mitglied: Tundra
02.06.2006 um 11:33 Uhr
Hallo Hudson,

möchtest Du alle Ordner (A) unterhalb von testdir haben, oder auch die dazugehörigen Unterordner (B)?

A)
- Dir1
- Dir2

B)
- Dir1\Dir1a
- Dir2\Dir2a\Dir2b

Grüße
Guido
Bitte warten ..
Mitglied: Tundra
02.06.2006 um 12:29 Uhr
01.
'Ordnerstruktur kopieren 
02.
'02.06.06/ge 
03.
 
04.
option explicit 
05.
 
06.
const C_Quelle = "c:\temp" 
07.
const C_Ziel = "c:\x" 
08.
 
09.
DIM O_FSO 
10.
 
11.
Set O_FSO = CreateObject("Scripting.FileSystemObject") 
12.
 
13.
call S_ReadDir(C_Quelle) 
14.
 
15.
'############# 
16.
'Ordnerstruktur einlesen 
17.
sub S_ReadDir(P_Quelle) 
18.
    DIM O_Dir 
19.
    DIM O_SubDir 
20.
     
21.
    Set O_Dir = O_FSO.GetFolder(P_Quelle) 
22.
    for each O_SubDir in O_Dir.subfolders 
23.
        call S_WriteDir(right(O_SubDir.Path,LEN(O_SubDir.Path)-LEN(C_Quelle))) 
24.
        'Aktivieren, falls Unterverzeichnisse auch angelegt werden sollen' 
25.
        S_ReadDir O_SubDir 
26.
        call S_WriteFile(right(O_SubDir.Path,LEN(O_SubDir.Path)-LEN(C_Quelle))) 
27.
    next 
28.
end sub 
29.
 
30.
'Schreibe Ordnerstruktur' 
31.
sub S_WriteDir(P_Ziel) 
32.
    on error resume next 
33.
    O_FSO.CreateFolder C_Ziel & P_Ziel 
34.
    on error goto 0 
35.
end sub 
36.
 
37.
'Kopiere Datei' 
38.
sub S_WriteFile(P_Ziel) 
39.
    DIM O_Datei 
40.
    DIM O_Dir 
41.
    DIM L_Quelle 
42.
    DIM L_Ziel 
43.
    L_Quelle = C_Quelle & P_Ziel 
44.
    L_Ziel = C_Ziel & P_Ziel & "\" 
45.
    set O_Dir = O_FSO.GetFolder(L_Quelle) 
46.
    for each O_Datei in O_Dir.Files 
47.
        O_FSO.CopyFile O_Datei.Path,L_Ziel 
48.
        exit for 
49.
    Next 
50.
end sub 
51.
 
52.
Grüße Guido 
53.
www.code-master.de
Bitte warten ..
Mitglied: hudson
02.06.2006 um 13:12 Uhr
sorry die tabs wurden hier eingerückt... ich machs mal so...

testdirquelle:
-dir1
---dir1a
-----file1
-----file2
-dir2
---file1
---file2
---file3


testdirziel
-dir1
---dir1a
---file1
-dir2
---file1

hm hast du das in visual basic gemacht? bräuchte eher nen copy job für unix... oder ein shellscript.
Bitte warten ..
Mitglied: Tundra
02.06.2006 um 14:34 Uhr
Hi,

das ist VBScript.
Für Linux/Unix wirst Du wohl auf perl oder eine bash-Sprache zurückgreifen müssen.

Grüße
Guido
Bitte warten ..
Mitglied: 7704
06.06.2006 um 14:56 Uhr
Es ist noch nicht ganz das, was du suchst, aber immerhin einen Anfang:

01.
  
02.
find /home/testuser/testquelle -type d -exec cp {} -r . \; 
Gruss
pame
Bitte warten ..
Ähnliche Inhalte
Batch & Shell

Dateien in einer Verzeichnisstruktur komprimieren und Ursprungsdatei löschen

gelöst Frage von kayes73Batch & Shell4 Kommentare

Hallo zusammen! Folgendes möchte ich bewerkstelligen: Ich habe auf einer Festplatte in einer bestimmten Datenstruktur xml Daten liegen. Diese ...

Windows 7

Verzeichnisstruktur inkl. Sicherheits- und Dateiinformationenohne ohne Inhalt kopieren

gelöst Frage von drapoelWindows 75 Kommentare

Servus, ich möchte mit Robocopy eine Verzeichnisstruktur ohne Inhalt copieren. (Auf die Verzeichnisse sind AD Berechtigungen gesetzt.) Mit XCOPY ...

Microsoft

Dateien kopieren

gelöst Frage von alex53842Microsoft2 Kommentare

Hallo zusammen, wir haben hier ein sehr tolles Phänomen. Eines unserer Dokumentenarchive hat einen kleinen Fehler. Es wurde eingerichtet ...

Batch & Shell

Verzeichnisstruktur mit datenbank abgleichen

Frage von woidl85Batch & Shell1 Kommentar

hallo zusammen, beine shell kentnisse sind leider nicht ausreichend, ich versuche ein script zu schreiben welches per cron-job alle ...

Neue Wissensbeiträge
Windows 10

USB Maus und Tastatur versagen Dienst unter Windows 10

Erfahrungsbericht von hardykopff vor 2 TagenWindows 105 Kommentare

Da steht man ziemlich dumm da, wenn der PC sich wegen fehlender USB Tastatur und Maus nicht bedienen lässt. ...

Administrator.de Feedback
Update der Seite: Alles zentriert
Information von Frank vor 2 TagenAdministrator.de Feedback18 Kommentare

Hallo User, die größte Änderung von Release 5.8 ist das Zentrieren der Webseite (auf großen Bildschirmen) und ein "Welcome"-Teaser ...

Humor (lol)

WhatsApp-Nachrichten endlich auch per Bluetooth versendbar

Information von BassFishFox vor 3 TagenHumor (lol)4 Kommentare

Genau darauf habe ich gewartet! ;-) Der beliebte Messaging-Dienst WhatsApp erhält eine praktische neue Funktion: Ab dem nächsten Update ...

Google Android

Googles "Android Enterprise Recommended" für Unternehmen

Information von kgborn vor 3 TagenGoogle 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 ...

Heiß diskutierte Inhalte
Router & Routing
Router auf Orginal Firmware zurück flashen mit Tftpd
Frage von ILeonardRouter & Routing21 Kommentare

Hallo, Ich habe zwei Router, einmal TP-Link 841n v11 und TP-Link 940N v5. Ich wollte fragen, ob jemand mir ...

Router & Routing
WRT keine Verbindung zum Web Interface
gelöst Frage von ILeonardRouter & Routing18 Kommentare

Hallo, Ich habe einen TP-Link WR841n mit wrt geflasht, das Problem ist ich kann mich mit 192.168.1.1 nicht verbinden. ...

Windows Server
Standortvernetzung zu einem Strato VServer (Windows)
Frage von matzefratze81Windows Server10 Kommentare

Moin, ich komme aus einem Enterprise-Umfeld und habe den Fehler gemacht, dass ich mich auf ein kleines Unternehmen eingelassen ...

TK-Netze & Geräte
Telefonie zweier Fritzboxen mit je eigenem DSL Anschluss verbinden
Frage von hannsgmaulwurfTK-Netze & Geräte10 Kommentare

Hallo zusammen, ich habe hier einen Haushalt mit zwei Anschlüssen. Einmal ISDN, einmal DSL. An jedem Anschluss hängt eine ...