|
|
|
|
Ordner kopieren |
|
Ordner kopieren |
|
Hi,
könnt ihr mir sagen wie der befehl zum einen
Ordner kopieren ist?
wenn ja dann schreibt mir.
ciao
|
|
29.03.2003 17:51 |
|
|
phlox81
Bote des Lichts und Moderator
Dabei seit: 19.10.2002
Beiträge: 3.028
Herkunft: Irgendwo im Nirgendwo
|
|
Such mal nach CopyFile:
CopyFile(quelle,zielordner,FALSE);
Devil
__________________ Intelligenz ist eine Illusion des Menschen
phlox81.de | codenode.de
|
|
29.03.2003 18:43 |
|
|
ARSCHmitOHREN
Neuling
Dabei seit: 29.03.2003
Beiträge: 3
Themenstarter
|
|
Hi,
habs probiert:
CopyFile C:/Eigene Dateien/Versuche
"Versuche" sollte ein Ordner sein.
Sorry. Hab Datei geschrieben.
Aber das geht auch nicht.
danke für den tipp.
|
|
30.03.2003 10:03 |
|
|
ARSCHmitOHREN
Neuling
Dabei seit: 29.03.2003
Beiträge: 3
Themenstarter
|
|
Ach nee sorry ich hab ja Ordner geschriben.
Was hab ich denn?
|
|
30.03.2003 10:04 |
|
|
gandalf
der mit ohne
Dabei seit: 06.01.2002
Beiträge: 2.099
Herkunft: Mittelerde
|
|
|
30.03.2003 13:24 |
|
|
Medusa
Senior Member
Dabei seit: 10.09.2001
Beiträge: 356
Herkunft: ...von da, wo mein Haus wohnt...
|
|
Es gibt keinen Befehl, um ganze Ordner zu kopieren. Man kann mit 'CopyFile' (oder wars 'FileCopy') nur einzelne Dateien kopieren.
Wenn du ein wenig programmier-erfahrung hast, is das kein Problem.
Alle Unterverzeichnisse und Dateien im Ordner müssen erfasst werden, und die Dateien alle einzeln kopiert werden. Danach in die einzelnen Unterverzeichnisse wechseln und das selbe mit denen machen, usw.
Hab grad keine Zeit, um dir was zusammen zu basteln. Es gibt auch eine weniger elegante Lösung, indem du den Dos-Befehl 'xcopy' mit entsprechenden Paramenter über 'shell xcopy...' ausführst.
Gib mal in der Eingabe-Auff. 'xcopy/?' ein, damit du weißt, was du als Paramenter anhängen musst.
Damit man das Dosfenster nicht sieht, wenn der Befehl dann ausgeführt wird, kannst du hinten noch ',vbhide' anfügen.
Wie gesagt, diese Methode is ganz Böse, und ich glaub dieses Xcopy gibts auch net auf allen Windows-Systemen, weils ja eigendlich für Dos ist.
Grüßle, Medi
__________________ Grüßle, Medi
Dieser Beitrag wurde 1 mal editiert, zum letzten Mal von Medusa: 30.03.2003 13:50.
|
|
30.03.2003 13:49 |
|
|
Lektor
gesperrt
Dabei seit: 27.07.2001
Beiträge: 298
|
|
code: |
1:
|
FileSystemObject.CopyFolder "c:\naseweiß\Rubenhanz\*", "c:\WagnersTempOrdner" |
|
@Medusa: Gibt sich auch ne Folder-Methode, nicht nur File!
Bitte an Syntax denken.
Grüßle
Lektor
_________________
My prime love is immortal C64!
SYS 64738
|
|
05.04.2003 03:36 |
|
|
Compuholic
knows where he wants to go tomorrow
Dabei seit: 19.10.2002
Beiträge: 819
Herkunft: München
|
|
Ich kenne mich zwar nicht wirklich mit Visual Basic aus, aber das, was Du da gepostet hast Lektor sieht mir doch eher wie Visual Basic Script aus oder?
Meines Wissens kann man das auch nicht in VB einbinden (außer natürlich als ShellExecute-Aufruf oder ähnliches *g*)
|
|
05.04.2003 12:05 |
|
|
Lektor
gesperrt
Dabei seit: 27.07.2001
Beiträge: 298
|
|
Nee Ihr Beiden, da ich nu gut viele Jahre gesrkiptet hab, iss sich das die CopyFolder-Methode!
"Scripting.FileSystemObject"
Gibt Zugriff aus das Dateisystem eines Computers.
code: |
1:
2:
3:
4:
5:
|
Set fs = CreateObject("ScriptingFileSystemObject")
Set a = fs.CreateTextFile("C:\textfile.text", True)
a.Close
|
|
Verwendung zur Rückgabe eines TextstreamObjekt, von dem gelesen und geschrieben werden kann.
@Compuholic:
Du sagst: Ich kenne mich zwar mit VB net aus, aber was Du alter Skipter da postest.......
oder schaust Du mal dies:
code: |
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
|
Sub ShowDriveList
Dim fs, d, dc, s, n
Set fs = CreateObject("Scripting.FileSystemObject")
Set dc = fs.Drives
For Each d in dc
s = s & d.DriveLetter & " - "
If d.DriveType = 3 Then
n = d.ShareName
Else
n = d.VolumeName
End If
s = s & n & vbCrLf
Next
MsgBox s
End Sub |
|
Ich hab gedacht, daß Du Medusa mich tadelst, weil daß vielleicht nur bei VB 6 und net bei 5 funzt.
Nachlesen in VB-6-Referenz.
Glaubet mir, kann Microsoft-Gedrucktes lügen?
Grüßle
Lektor
_________________
My prime love is immortal C64!
SYS 64738
|
|
08.04.2003 23:02 |
|
|
|
|
|
|