Just a Test if HTML works here
Just a Test if HTML works here
- Subject: Just a Test if HTML works here
- From: Martin Michel <email@hidden>
- Date: Mon, 3 Sep 2001 00:08:48 +0200
My first (buggy) Script:
[font=geneva][size=1][color=black]--[i] Busymans DownloadSorter 1.0b[/i]
[b]tell[/b] application "Finder"
activate
[b]with[/b] [b]timeout[/b] [b]of[/b] 600 seconds
[b]set[/b] SIT_Dateiliste [b]to[/b] [b]every[/b] file
[b]whose[/b] ,
name [b]ends with[/b] ".sit" [b]or[/b] ,
file type [b]is[/b] "SIT5" [b]and[/b] ,
creator type [b]is[/b] "SIT!"
display dialog "Wie soll der Ordner hei_en, in den Ihre
Downloads" & return & ,
"einsortiert werden?" buttons { "Download Archiv", "Eigener
Name", "Abbrechen" } default button 2 with icon note
[b]set[/b] Dialog_Ergebnis_1 [b]to[/b] result
[b]if[/b] button returned [b]of[/b] result = "Download Archiv"
[b]then[/b]
[b]if[/b] folder "Download Archiv" exists [b]then[/b]
display dialog "Fehler: Ein Ordner names" & return &
return & "Download Archiv" & return & return & ,
"existiert bereits." & return & return & ,
"Wollen Sie" & return & ,
"a) den Ordner dennoch verwenden oder" & return & ,
"b) das Script abbrechen?" buttons { "Ordner verwenden",
"Abbrechen" } default button 2 with icon caution
[b]set[/b] Dialog_Ergebnis_2 [b]to[/b] result
[b]if[/b] button returned [b]of[/b] result = "Ordner
verwenden" [b]then[/b]
[b]set[/b] Sortier_Ordner [b]to[/b] folder "Download
Archiv"
[b]else[/b] [b]if[/b] button returned [b]of[/b] result =
"Abbrechen" [b]then[/b]
beep 1 --[i] HIER SOLL DAS SCRIPT ABBRECHEN!!!!!!! :-)[/i]
[b]end[/b] [b]if[/b]
[b]else[/b] [b]if[/b] [b]not[/b] (exists folder "Download
Archiv" ) [b]then[/b]
make new folder
[b]set[/b] [b]the[/b] name [b]of[/b] [b]the[/b] result
[b]to[/b] "Download Archiv"
[b]set[/b] Sortier_Ordner [b]to[/b] [b]the[/b] folder
"Download Archiv"
[b]end[/b] [b]if[/b]
[b]else[/b] [b]if[/b] button returned [b]of[/b] result = "Eigener
Name" [b]then[/b]
display dialog "Geben Sie bitte den Namen f|r den Ordner an:"
default answer ""
[b]set[/b] Dialog_Ergebnis_3 [b]to[/b] [b]the[/b] text returned
[b]of[/b] [b]the[/b] result [b]as[/b] string
[b]try[/b]
make new folder
[b]set[/b] [b]the[/b] name [b]of[/b] [b]the[/b] result
[b]to[/b] Dialog_Ergebnis_3
[b]set[/b] Sortier_Ordner [b]to[/b] [b]the[/b] folder
Dialog_Ergebnis_3
[b]on[/b] [b]error[/b] Der_Fehler_1
display dialog "Fehler: Ein Ordner namens " &
Dialog_Ergebnis_3 & " existiert bereits." & return & ,
"Wollen Sie" & return & ,
"a) den Ordner dennoch verwenden oder" & return & ,
"b) das Script abbrechen?" buttons { "Ordner verwenden",
"Abbrechen" } default button 1 with icon stop
[b]set[/b] Dialog_Ergebnis_4 [b]to[/b] result
[b]if[/b] button returned [b]of[/b] result = "Ordner
verwenden" [b]then[/b]
[b]set[/b] Sortier_Ordner [b]to[/b] folder
Dialog_Ergebnis_3
[b]else[/b] [b]if[/b] button returned [b]of[/b] result =
"Abbrechen" [b]then[/b]
beep 1
[b]end[/b] [b]if[/b]
[b]end[/b] [b]try[/b]
[b]end[/b] [b]if[/b]
[b]repeat[/b] [b]with[/b] SIT_Datei [b]in[/b] SIT_Dateiliste
[b]set[/b] file type [b]of[/b] SIT_Datei [b]to[/b] "SIT5"
[b]set[/b] creator type [b]of[/b] SIT_Datei [b]to[/b] "SIT!"
[b]set[/b] Ordnername_NEU [b]to[/b] [b]the[/b] name [b]of[/b]
SIT_Datei
make new folder [b]in[/b] Sortier_Ordner
[b]set[/b] Moratoriums_Ordner [b]to[/b] [b]the[/b] result
[b]if[/b] Ordnername_NEU [b]ends with[/b] ".sit" [b]then[/b]
[b]set[/b] Ordnername_NEU [b]to[/b] (characters 1
[b]thru[/b] -5 [b]of[/b] Ordnername_NEU) [b]as[/b] string
[b]end[/b] [b]if[/b]
[b]if[/b] folder Ordnername_NEU [b]in[/b] Sortier_Ordner exists
[b]then[/b]
display dialog "Fehler: Ein Ordner namens" & return &
return & Ordnername_NEU & return & return & ,
"existiert bereits." & return & return & ,
"Wollen Sie" & return & ,
"a) den Ordner dennoch verwenden oder" & return & ,
"b) das Script abbrechen?" buttons { "Ordner verwenden",
"Abbrechen" } default button 1 with icon caution
[b]set[/b] Dialog_Ergebnis_5 [b]to[/b] result
[b]if[/b] button returned [b]of[/b] result = "Ordner
verwenden" [b]then[/b]
[b]try[/b]
move SIT_Datei to folder Ordnername_NEU [b]in[/b]
Sortier_Ordner
[b]on[/b] [b]error[/b] Der_Fehler_2
display dialog "Eine Datei namens" & return & return &
SIT_Datei & return & return & ,
"existiert bereits im Ordner" & return & return &
Ordnername_NEU & return & return & ,
"Die Datei kann daher nicht verschoben werden."
buttons { "Na gut..." } default button 1 with icon stop
[b]end[/b] [b]try[/b]
[b]else[/b] [b]if[/b] button returned [b]of[/b] result =
"Abbrechen" [b]then[/b]
beep 1
[b]end[/b] [b]if[/b]
[b]else[/b] [b]if[/b] [b]not[/b] (exists folder Ordnername_NEU
[b]in[/b] Sortier_Ordner) [b]then[/b]
[b]set[/b] name [b]of[/b] Moratoriums_Ordner [b]to[/b]
Ordnername_NEU
move SIT_Datei to folder Ordnername_NEU [b]in[/b]
Sortier_Ordner
[b]end[/b] [b]if[/b]
[b]end[/b] [b]repeat[/b]
[b]set[/b] Neue_Ordner [b]to[/b] [b]every[/b] folder [b]in[/b]
Sortier_Ordner [b]whose[/b] name [b]contains[/b] "Neuer Ordner"
[b]repeat[/b] [b]with[/b] Neuer_Ordner [b]in[/b] Neue_Ordner
delete Neuer_Ordner
[b]end[/b] [b]repeat[/b]
[b]end[/b] [b]timeout[/b]
[b]end[/b] [b]tell[/b][/color][/font][/size]