Ordnerpfad in Zwischenablage - Umlaute ersetzen - AppleScript - HilfDirSelbst.ch

[Gast] Foren Programmierung/Entwicklung AppleScript Ordnerpfad in Zwischenablage - Umlaute ersetzen

Programmierung/Entwicklung

Themen

Beiträge

Moderatoren

Letzter Beitrag

AppleScript

1258

8203

Hans Haesler

28. Aug 2023, 11:00

TBfromGL

Ordnerpfad in Zwischenablage - Umlaute ersetzen

Uwe Beutler-Bußmann

Beiträge gesamt: 95

15. Dez 2015, 10:57
Beitrag # 1 von 6
Bewertung:
(3796 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen

Hallo,
ich benutze hier ein Script, welches mir den Ordnerpfad als String in die Zwischenablage kopiert.
Nun habe ich aber ach ordner mit z.B. "ö". Das "ö" muß ersetzt werden durch "%c3%b6".
Welche Scriptschritte muß ich ändern? Ein Ersetzen von ä und ü kommt sicherlich auch noch hinzu.

Code

on run {input, parameters} 
	 
	tell application "Finder" 
		 
		set sel to the selection as text 
		 
		set TempTID to AppleScript's text item delimiters 
		 
		set AppleScript's text item delimiters to space 
		 
		set sel to text items of sel 
		 
		set AppleScript's text item delimiters to "%20" 
		 
		set sel to sel as string 
		 
		set AppleScript's text item delimiters to TempTID 
		 
		set the clipboard to "file://" & POSIX path of sel 
		 
	end tell 
	 
	return input 
end run

Gruß
Uwe

Ordnerpfad in Zwischenablage - Umlaute ersetzen

Hans Haesler

Beiträge gesamt: 5822

15. Dez 2015, 11:18
Beitrag # 2 von 6
Beitrag ID: #545446
Bewertung:
(3784 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen

Hallo Uwe,

es genügt, space und %20 durch die neuen Strings zu ersetzen:

Code

on run {input, parameters} 
   
  tell application "Finder" 
     
    set sel to the selection as text 
     
    set TempTID to AppleScript's text item delimiters 
     
    set AppleScript's text item delimiters to "ö" 
     
    set sel to text items of sel 
     
    set AppleScript's text item delimiters to "%c3%b6" 
     
    set sel to sel as string 
     
    set AppleScript's text item delimiters to TempTID 
     
    set the clipboard to "file://" & POSIX path of sel 
     
  end tell 
   
  return input 
end run

Aber damit wird ein eventueller Leerschlage nicht mehr ersetzt.
Und wenn noch andere Zeichen ebenfalls behandelt werden sollen, muss man anders vorgehen.

Hast Du eine Liste der "unmöglichen" Zeichen?

Gruss, Hans

als Antwort auf: [#545445]

Ordnerpfad in Zwischenablage - Umlaute ersetzen

Uwe Beutler-Bußmann

Beiträge gesamt: 95

15. Dez 2015, 11:48
Beitrag # 3 von 6
Beitrag ID: #545447
Bewertung:
(3770 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen

Hallo Hans,
ich denke es sind erst mal die "üblichen Verdächtigen": äöüÄÖÜß

Uwe

als Antwort auf: [#545446]

Ordnerpfad in Zwischenablage - Umlaute ersetzen

Hans Haesler

Beiträge gesamt: 5822

15. Dez 2015, 12:01
Beitrag # 4 von 6
Beitrag ID: #545449
Bewertung:
(3739 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen

Hallo Uwe,

okay. So sollte es funktionieren.
Aber zuerst musst Du die replaceList ergänzen:

Code

on run {input, parameters} 
   
  set searchList to {" ", "ä", "ö", "ü", "Ä", "Ö", "Ü", "ß"} 
  set replaceList to {"%20", "", "%c3%b6", "", "", "", "", ""} 
   
  tell application "Finder" 
    set sel to the selection as string 
    repeat with n from 1 to count of searchList 
      set AppleScript's text item delimiters to (item n of searchList) 
      set sel to text items of sel 
      set AppleScript's text item delimiters to (item n of replaceList) 
      set sel to sel as string 
    end repeat 
    set AppleScript's text item delimiters to {""} 
    set the clipboard to "file://" & POSIX path of sel 
  end tell 
   
  return input 
end run