CD Daten auf selbst gewählten lokalen Pfad kopieren

[noobi]

Hi,

an folgendem bin ich grad am kniffeln:

von einer image cd (läuft unter flash) wird ein applescript gestartet, das funktioniert problemlos.

dieses also soll nun den kompletten inhalt (mit unterordnern) der cd auf einen selbst gewählten pfad auf der lokalen platte kopieren.

die ermittlung des pfades der cd habe ich an den anfang gestellt:

*************************************************************
set StoredPath to (path to me) as string

set oldDelims to AppleScript's text item delimiters
set AppleScript's text item delimiters to ":"
set itemCount to (count text items of StoredPath)
set lastItem to the last text item of StoredPath
if lastItem = "" then
set itemCount to itemCount - 2 -- bei Pfad zu einem Ordner
else
set itemCount to itemCount - 1 -- bei Pfad zu einer Datei
end if

set myPath to \254
text 1 thru text item itemCount of StoredPath & ":"
set AppleScript's text item delimiters to oldDelims
*************************************************************

als nächstes würde ich den zielpfad waehlen lassen:

*************************************************************
set ZielOrdner to choose folder with prompt "Ziel-Ordner auswaehlen"
try
tell application "Finder"
set these_files to every file of the source_folder
repeat with i from 1 to the count of these_files
set this_path to (duplicate ((item i of these_files) as string) to \254
ZielOrdner with replacing) as alias
end repeat
end tell
on error error_message
display dialog error_message buttons {"OK"} default button 1
end try
*************************************************************

nur wie übergebe ich jetzt den als erstes ermittelten pfad der cd so, das er den gesamten ordner, also den cd namen als wurzelverzeichnis mit sämtlichen unterordnern auf den zielpfad kopiert? hab das mal mit einzelnen dateien geschafft, aber er hat nie die unterordner kopiert

...wenn der kopiervorgang erfolgreich beendet ist, soll von einer lokalen datei (liegend im gerade kopierten verzeichnis) eine Alias Datei auf dem Desktop erstellt werden.

Der Code dazu hat eigentlich gut funktioniert:

*************************************************************
try
set totalPath to (myPath & "intro_lokal") as alias

tell application "Finder"
make new alias file to totalPath at desktop with properties {name:"starte_intro"}
end tell
on error errMsg
display dialog errMsg
end try
*************************************************************

Kann mir jemand helfen die o.g. Puzzle Teile richtig zusammenzufügen?

Bin, weil AS-Neuling da jetzt etwas überfordert ^^

Danke schon mal für Eure Mühe,

Gruß noobi

[iScript]

das kopieren ist nicht wirklich schwierig (ziel und quelle sind in diesem fall vom typ alias). beispiel:

set source to (choose folder) -- cd auswählen
set targetfolder to (choose folder) -- zielordner auswählen
tell application "Finder"
   duplicate source to targetfolder
   -- kopiert alles in einen ordner der den namen der cd trägt
end tell

[noobi]

vielen dank für die schnelle antwort...werd ich gleich mal versuchen...

kann man nach der ganzen kopier routine aus diesem script dann ein anderes script starten?

nämlich eines, das das alias (also eine kopierte datei) erzeugen kann?

das problem was ich sehe ist, das er ja erst warten muss, bis dieses script auf die lokale platte kopiert ist...

der code oben für das alias erzeugen funktioniert sehr gut, brauche also einen befehl der eine externe as-anwendung startet...

danke nochmal

[iScript]

[noobi]

[iScript]

korrektur für dein script:
set totalPath to ((targetfolder as text) & "sp_intro_lokal") as alias

und hier die direkte verwurstung des ergebnisses des kopiervorgangs (ein alias des zielordners):
set source to (choose folder) -- cd auswählen
set targetfolder to (choose folder) -- zielordner auswählen
tell application "Finder"
   make new alias file to (duplicate source to targetfolder with replacing) at desktop with properties {name:"Mein Wunderschönes Alias auf den gerade erzeugten Ordner"}
   -- kopiert alles in einen ordner der den namen der cd trägt
end tell

[noobi]

[noobi]

[iScript]

Guckst Du hier.
Gruss, H =:o) L G I

[spirigwi]

oder Hier: http://www.fischer-bayern.de/phpBB2/viewtopic.php?t=1297

[noobi]

danke dir nochmal für hilfe, läuft jetzt alles prima