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, 8007 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 ...

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 ...

Microsoft Office

Automatisierte Verzeichnisstruktur und Dokument Anpassungen

gelöst Frage von SIPSIPMicrosoft Office4 Kommentare

Hallo zusammen Ich soll für folgendes Szenario eine halb automatisierte Lösung finden. 1. Projektnummer und Name wird durch ein ...

Batch & Shell

Rekursives Auslesen einer Verzeichnisstruktur

gelöst Frage von MinionBatch & Shell4 Kommentare

Hallo all, heute habe ich mal ein Powershellproblem. Ich möchte den Inhalt eines Laufwerkes auslesen, in Abhängigkeit der Struktur. ...

Neue Wissensbeiträge
Backup

2016 - Restore mit WBAdmin - iSCSI Device als Sicherungsziel

Erfahrungsbericht von Henere vor 16 StundenBackup1 Kommentar

Servus zusammen, was mich eben einige graue Haare gekostet hat Server 2016. Ich habe meinem Server eine weitere M2 ...

Humor (lol)
(Part num your Hacked phone. +XX XXXXXX5200)
Erfahrungsbericht von Henere vor 2 TagenHumor (lol)7 Kommentare

Mein Handy hat aber ne ganz andere Endnummer. Muss ich mir jetzt Sorgen machen ? :-) Vielleicht betrifft es ...

Exchange Server

Letztes Update für Exchange 2016 CU9 war in gewisser Weise destruktiv

Erfahrungsbericht von DerWoWusste vor 2 TagenExchange Server8 Kommentare

Kurzer Erfahrungsbericht zu Exchange2016-KB4340731-x64 Der Exchangeserver hat wie gewöhnlich versucht, es in der Nacht automatisch zu installieren - abgesehen ...

Erkennung und -Abwehr

Neue Sicherheitslücke Foreshadow (L1TF) gefährdet fast alle Intel-Prozessoren

Information von Frank vor 3 TagenErkennung und -Abwehr3 Kommentare

Eine neue Sicherheitslücke, genannt Foreshadow (alias L1TF) wurde auf der Usenix Security 18 von einem Team internationaler Experten veröffentlicht. ...

Heiß diskutierte Inhalte
Windows Server
Server 2016 Autotiering Storage Space
Frage von HenereWindows Server10 Kommentare

Servus, ich habe jetzt ein StorageSpace auf einem Server 2016 in Betrieb zum Testen. 1x M2 mit 512GB (970pro) ...

Hyper-V
Hyper-V keinen Zugriff auf USB Gerät über USB Server
Frage von Barns83Hyper-V10 Kommentare

Normal bin ich ein stiller Leser und wühle mich im normal Fall durch Foren oder schau durch meine Bücher. ...

Netzwerke
SSH - Wieso werde ich nach VPN Verbindung rausgeschmissen?
Frage von VernoxVernaxNetzwerke10 Kommentare

Hallo, ich habe es endlich geschafft mein Handy mit einer VPN Verbindung an meinen Router anzuschließen. Nach der Login ...

Multimedia
Live TV mit Raspberry
Frage von honeybeeMultimedia9 Kommentare

Hallo, ich bin relativ neu im Umgang mit Raspberry und habe folgendes Problem: Ich habe keinen Fernsehanschluss über Kabel ...