Fischer-Bayern.de
 FAQFAQ   SuchenSuchen   MitgliederlisteMitgliederliste   BenutzergruppenBenutzergruppen   RegistrierenRegistrieren 
 ProfilProfil   Einloggen, um private Nachrichten zu lesenEinloggen, um private Nachrichten zu lesen   LoginLogin 

Programm: AppleScript - Funktion: suchen/ersetzen
Gehe zu Seite 1, 2  Weiter
 
Neues Thema eröffnen   Neue Antwort erstellen    Fischer-Bayern.de Foren-Übersicht -> Classic-Snippets
Vorheriges Thema anzeigen :: Nächstes Thema anzeigen  
Autor Nachricht
Snow
Administrator
Administrator


Anmeldedatum: 21.11.2000
Beiträge: 1946
Wohnort: Deiningen

BeitragVerfasst am: 28.04.2003 - 17:31    Titel: Programm: AppleScript - Funktion: suchen/ersetzen Antworten mit Zitat

Beschreibung:
Um alle Vorkommen eines bestimmtes Zeichens in einem Text auf einen Rutsch durch ein anderes Zeichen zu ersetzen, braucht man nicht unbedingt die Hilfe einer Scripting Addition. Allein mit AppleScript-Mitteln ist dies machbar.

Code:

set myText to "Dieser Text möchte gern ohne ö's auskommen können."
set mySearch to "ö"
set myReplace to "oe"

textReplace(myText, mySearch, myReplace)

--
----------------------------------------------------------------------------

on textReplace(theText, srchStrng, replStrng)
tell (a reference to AppleScript's text item delimiters)
set { od, contents } to { contents, { srchStrng } }
try
set { textList, contents } to { (text items of theText), { replStrng } }
set { newText, contents } to { (textList as text), od }
return item 1 of result
on error errMsg number errNbr
set contents to od
error errMsg number errNbr
end try
end tell
end textReplace



Anmerkung: Der 'textReplace'-Handler stammt in dieser Form von Marc K. Myers. Er ist zwar nicht besonders leicht zu verstehen, dafür ist der Code jedoch recht kompakt und effizient.
_________________
Peter
-
Fischer-Bayern.de|Shadetreemicro.com
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden Website dieses Benutzers besuchen AIM-Name
Armin Egginger
•-->
•-->


Anmeldedatum: 04.05.2002
Beiträge: 96
Wohnort: Germering (b. München)

BeitragVerfasst am: 10.05.2003 - 17:37    Titel: Antworten mit Zitat

Hier mal andere Möglichkeiten, die Buchstaben auszutauschen.

Dieses Script tauscht die einzelnen Buchstaben
- im ASCII Code gekennzeichnet oder
- als direkter Buchstabe gekennzeichnet
gegen einen eingestellten Buchstaben aus. Der erste Teil ist mit Schleife, so daß auch gleich mehrere Buchstaben ausgetauscht werden. Der Handler ist auch bei mehreren Aufrufen in verschiedenen Stellen des Skripts sinnvoll.

Code:
set xEmail to "DerTester <info@derTester.de>"
-- 62, 60, 64 sind die größer/kleiner und das @ Zeichen
set charList to {62, 60, 64}
-- 32, 32, 45 sind Leerzeichen und Bindestrich
set cList to {32, 32, 45}
repeat with n from 1 to (count every item in charList)
   set prevTID to AppleScript's text item delimiters
   set AppleScript's text item delimiters to ASCII character (item n of charList)
   set xEmail to text items of xEmail
   set AppleScript's text item delimiters to ASCII character (item n of cList)
   set xEmail to xEmail as text
   set AppleScript's text item delimiters to prevTID
end repeat
display dialog xEmail


-- oder als Handler
set xtex to "Ein Text, bei dem das -@- getauscht werden soll!"
set xChar to "@"
set xCharRepl to "at"
set xtex to TIDsearchReplace(xtex, xChar, xCharRepl) of me
display dialog xtex

on TIDsearchReplace(xtex, xChar, xCharRepl)
   set oldTID to AppleScript's text item delimiters
   set AppleScript's text item delimiters to xChar
   set xtex to text items of xtex
   set AppleScript's text item delimiters to xCharRepl
   set xtex to xtex as text
   set AppleScript's text item delimiters to oldTID
   return xtex
end TIDsearchReplace


Viel Spaß

Armin
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden Yahoo Messenger
UliTs
•->
•->


Anmeldedatum: 26.06.2011
Beiträge: 3
Wohnort: Aachen

BeitragVerfasst am: 26.06.2011 - 14:48    Titel: Antworten mit Zitat

Hallo,

vielen Dank für die beiden Script-Funktionen (oder sagt man Script-Handler?).
Wenn ich z.B. "Jahrgang" durch "||" ersetzen möchte, funktionieren beide Funktionen.
Ich möchte aber das Zeilenendesymbol (#13#10) durch "||" ersetzen, damit ich bei einem mehrzeiligen Text nur noch eine Zeile habe:
Code:
-- in aNote steht der mehrzeilige Text.
set findThis to (ASCII character 13) & (ASCII character 10)
set replaceWith to "||"
set aNote2 to textReplace(aNote, findThis, replaceWith) of me

Hier versagen beide Funktionen. Auch wenn ich nur #13 oder nur #10 ersetzen möchte, passiert nichts. Was mache ich falsch?

Uli
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden Website dieses Benutzers besuchen
woodpecker
•--->
•--->


Anmeldedatum: 12.10.2010
Beiträge: 150
Wohnort: Roggentin/Rostock

BeitragVerfasst am: 29.06.2011 - 09:58    Titel: Antworten mit Zitat

Ob es funktioniert oder nicht, hängt davon ab wo Dein Text herkommt. Das MAC OS X verwendet als UNIX-System den LF (ASCII character 10), das MAC OS Classic den CR (ASCII character 13) und auf WINDOWS-Systemen wird CRLF verwendet. Die verschiedenen Möglichkeiten kannst Du sehen, wenn Du im AppleSkript-Editor ein File im Text-Format speicherst.

Auf dem Mac OS X sollte es so gehen:
Code:
set findThis to ASCII character 10


Jedenfalls habe ich es damit probiert und es hat geklappt.

Noch eine Bemerkung: Anstelle von ASCII character 13 kannst Du auch die AS-Konstante return verwenden, das ist kürzer. Der Ausdruck id of return ergibt also auch 13.
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden
UliTs
•->
•->


Anmeldedatum: 26.06.2011
Beiträge: 3
Wohnort: Aachen

BeitragVerfasst am: 29.06.2011 - 11:29    Titel: Antworten mit Zitat

Hallo woodpecker,

vielen Dank für Deine Hilfe! Genau Deinen Code hatte ich schon mehrfach getestet. Da klappte es nicht. Wahrscheinlich hatte ich da noch andere Fehler drin ...
Nachdem ich es jetzt noch einmal mit Deiner Codezeile probiert habe, funktionierte es auf Anhieb! Super und vielen Dank! Very Happy
--
Jetzt habe ich noch ein kleines Problem: die Zeichensätze...
Hat jemand einen Tip, wie ich die Umlaute in der CSV-Datei (ANSI-Code) richtig hinbekomme?

Uli
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden Website dieses Benutzers besuchen
woodpecker
•--->
•--->


Anmeldedatum: 12.10.2010
Beiträge: 150
Wohnort: Roggentin/Rostock

BeitragVerfasst am: 30.06.2011 - 11:03    Titel: Antworten mit Zitat

Hallo Uli,
könntest Du Dein Problem etwas präzisieren? Was willst Du erreichen, was hast Du probiert und was funktioniert nicht so wie Du es willst?

Gruß woddpecker
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden
UliTs
•->
•->


Anmeldedatum: 26.06.2011
Beiträge: 3
Wohnort: Aachen

BeitragVerfasst am: 30.06.2011 - 12:26    Titel: Antworten mit Zitat

Hallo Woodpecker,
vielen Dank für die Nachricht.
Ich möchte mit einem Applescript mein Adressbuch in Form einer CSV-Datei anderen zur Verfügung stellen. Das klappt inzwischen sehr gut bis auf die Umlaute, da die "Windows-Welt" ANSI-Code erwartet.
Ich bin in der Lage, die Umlaute Dank der hier vorliegenden beiden Funktionen zu konvertieren (für jeden Umlaut 1 x die Funktion aufrufen), z.B. für das kleine "ü":
Code:
set findThis to ASCII character 159 -- kann ich hier auch Hex 9F angeben?
set replaceWith to ASCII character 252   -- kann ich hier auch Hex FC angeben?
Aber vielleicht gibt es eine elegantere Lösung oder eine Standard-Funktion? Question
Uli
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden Website dieses Benutzers besuchen
woodpecker
•--->
•--->


Anmeldedatum: 12.10.2010
Beiträge: 150
Wohnort: Roggentin/Rostock

BeitragVerfasst am: 30.06.2011 - 13:21    Titel: Antworten mit Zitat

Zitat:
Aber vielleicht gibt es eine elegantere Lösung


Vielleicht mit einem sed-Aufruf? Damit kannst Du alle 3 Umlaute in Gross- und Kleinschreibung auf einmal erschlagen. Das könnte ungefähr so aussehen:
Code:
set txt to "Müller-Lüdenscheid
Möller-Krömelhagen
Räufel-Rätzelstein"

do shell script "sed 'y/äöüÄÖÜ/öüäÖÜÄ/' <<+++
" & txt



Das y-Subkommando des sed-Kommandos übersetzt einzelne Zeichen eines Textes in andere Zeichen. Die beiden Strings müssen immer dieselbe Länge haben (ist irgendwie klar, oder?).
Ich habe jetzt beispielhaft mal alle ä gegen ö, alle ö gegen ü und alle ü gegen ä getauscht. Du musst auf der rechten Seite natürlich die richtigen Zeichen einsetzen. In meinem Beispiel kommt das raus:
Code:
"Mäller-Lädenscheid
Müller-Krümelhagen
Röufel-Rötzelstein"


Versuch's mal so.
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden
Skeeve
•---->
•---->


Anmeldedatum: 20.04.2006
Beiträge: 1067

BeitragVerfasst am: 30.06.2011 - 20:03    Titel: Antworten mit Zitat

Besser wär's UliTs, Du wüßtest die benötigten Zeichensätze. Perl kann Konvertierungen von Zeichensätzen von Haus aus.
_________________
"All problems are solved in slightly less than half an hour" (Chumbawamba, "Hey Hey We're The Junkies")
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
dianahamer
•->
•->


Anmeldedatum: 16.12.2021
Beiträge: 1

BeitragVerfasst am: 16.12.2021 - 12:37    Titel: Antworten mit Zitat

Hallo.

Herzlichen Dank für Ihre Hilfe. Die Verwendung Ihrer Codes bei meiner Arbeit hat mir geholfen, mein Problem zu lösen, nochmals vielen Dank.
_________________
Diana Hamer Web designer, Detect History De
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden Website dieses Benutzers besuchen
jiuer7845
•---->
•---->


Anmeldedatum: 06.04.2021
Beiträge: 506

BeitragVerfasst am: 11.08.2022 - 04:37    Titel: Antworten mit Zitat

Adidas UK
Air Jordan 4
Air Jordan 1
Jordan 1
Air Jordans
Nike Air Jordans
Jordans 1
Air Jordan 1
Nike Jordan 1
Nike Jordan
Jordan 1s
Jordan 1
Adidas Yeezy
Adidas Yeezy
Yeezy
Adidas Yeezy
Adidas Yeezy
Adidas Yeezy
Yeezy Shoes
Adidas Yeezy
Yeezy Shoes
Air Jordan 1
Air Jordan 11
Air Jordan 1 Mid
Air Jordan 1
Jordan 1
Jordan 1
Air Jordan 4
Air Jordans
Air Jordan 1
Jordan 1
Air Jordan Shoes
Air Jordan
Air Jordans
Jordan AJ 1
Fake Yeezys
Air Jordan 1
Jordan 1
Jordan 1
Jordan 1
Jordan 1
Jordan 11
Jordan 13
Jordan 1 Low
Air Jordan 1 Mid
Jordan 1 Mid
Air Jordan 1 Mid
Jordan 1 Mid
Jordan 1
Jordan 1s
Air Jordan 4
Jordan 4
Air Jordan 4
Jordan 4
Air Jordan 4
Jordan 4
Jordan
Jordan 4 Military Black
Jordan 4
Jordan 4s
Jordan 5
Jordan 1
Jordan AJ 1
Jordan AJ 1
Jordan Retro 4
Jordan 11
Jordans 4
Jordan Shoes
Jordans Shoes
Jordans Shoes
NFL Shop Official Online Store
NFL Jerseys
Nike Air Jordan
Nike Air VaporMax
Nike Jordan 1
Nike Jordans
Nike Outlet
Nike Outlet
Nike Outlet Store
Nike Outlet
Nike Outlet Store Online Shopping
Nike Outlet
Nike Shoes
Nike UK
Nike Vapormax Flyknit
Off White
Off White Shoes
Pandora Jewelry
Pandora
Pandora Bracelet
Pandora Bracelets
Pandora Bracelets
Pandora Charms
Pandora Charms
Pandora Jewelry
Pandora Charms Sale Clearance
Pandora Charms
Pandora Jewelry Official Site
Pandora Jewelry
Pandora Jewelry Official Site
Pandora Jewelry
Pandora
Pandora Jewelry Official Site
Pandora Jewelry
Pandora Jewelry Official Site Clearance
Pandora Jewelry
Pandora Jewelry
Pandora Online Shop
Pandora
Pandora Outlet
Pandora UK
Retro Jordans
YEEZY SUPPLY
Travis Scott Jordan 1
UNC Jordan 1
Yeezy
Yeezy 350
Yeezy 350
Yeezy
Yeezy 350
Yeezy Boost 350
Yeezy 350 V2
Yeezy 450
Yeezy 700
Adidas Yeezy
Yeezy
Yeezy Foam Runner
Yeezy 350
Yeezy
Yeezy 500
Yeezy 700
Yeezy
Yeezy Slides
Yeezy
Yeezy Slides
Yeezy Slides
Yeezy Supply
Yeezy Supply
Yeezy
Yeezy Shoes
Yeezy
Yeezy Zebra
_________________
https://www.pandoras-jewelry.com/ Pandora Jewelry
https://www.pandoraoutlet.org/ Pandora Outlet
https://www.jordanshoess.com/ Jordan Shoes
https://www.air-jordan4.com/ Air Jordan 4
https://www.charms-pandora.com/ Pandora Charms
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden Website dieses Benutzers besuchen AIM-Name
FrankJScott
•---->
•---->


Anmeldedatum: 30.08.2022
Beiträge: 877

BeitragVerfasst am: 09.09.2022 - 00:31    Titel: Updated Heating Info Antworten mit Zitat

To the person talking about heating and air conditioning service, hillard plumbing, richards heating and air, service express hvac, emergency ac, oil heating engineer near me, I highly suggest this high rated heating repair service link or heater tune up, heating and ac, heating companies in my area, blue ridge heating and cooling, zoned heating system, york heating and air conditioning, on top of this great heating installation service site on top of gas boiler repair near me, heating and cooling companies, mini split heating and cooling, emergency heating repair, air on heating and on cooling, navien heating system, as well as this useful AC repair service site which is also great. Also have a look at this updated AC installation service blog not to mention 24 hour heating and air, ductless heating and cooling units, york heating and air, air heating, point heating and cooling, action heating and cooling, not to mention this excellent heating installation service tips and don't forget heat and air repair, hvac contractors in my area, furnace maintenance, all star plumbing and heating, lloyd plumbing and heating, hvac heating, as well as awesome heating installation service link which is also worth a look. I also suggest this best heating installation service forum alongside all heating company, complete comfort heating and air, reliable hvac, cascade heating and air, boiler technician near me, hutzel plumbing, alongside all this top AC cleaning service details not to mention air and heating near me, hvac technician near me, all seasons heating & cooling, hvac maintenance, chapman heating and air, anytime heating and air, as well as useful boiler installation service link which is also great. Finally, have a look at this top heating repair service site for good measure. Check more Awesome Heating Info 47b4aba
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
FrankJScott
•---->
•---->


Anmeldedatum: 30.08.2022
Beiträge: 877

BeitragVerfasst am: 20.09.2022 - 15:14    Titel: Top Rated Humidifier Info Antworten mit Zitat

To the people asking about dust humidifier, pureguardian humidifier, germguardian humidifier, holmes ultrasonic cool mist humidifier, portable humidifier, dyson humidifier and air purifier, I highly recommend this top humidifier info or humidifier with humidity sensor, vicks filtered cool moisture humidifier, aprilaire humidistat, hm750a1000, aesthetic humidifier, nest humidifier, as well as this updated humidifier deal alongside all humidifier for chest congestion, humidify, warm mist humidifier for plants, eva humidifier, aprilaire 350, cactus humidifier, as well as this high rated humidifier item which is also great. Also have a look at this new humidifier product alongside all honeywell hcm 350 humidifier, pure enrichment mistaire silver ultrasonic cool mist humidifier, toshiba humidifier, homedics totalcomfort ultrasonic humidifier, humidifier for living room, humidifier for wheezing, alongside all this great humidifier item and don't forget hc22e1003, humidifier thermostat, digital humidifier, protec humidifier cleaning fish, homasy cool mist humidifier, kuhaus humidifier, as well as useful humidifier item which is also worth a look. I also recommend this top humidifier item and don't forget heavy duty humidifier, vornado ev100, honeywell quietcare, carrier humidistat, lacidoll humidifier, best whole house humidifier, on top of this best humidifier deal as well as best humidifier for basement, vavsea humidifier, ac humidifier, humidifier cleaning ball, mini humidifier for plants, vicks in humidifier, as well as awesome humidifier deal which is also great. Finally, have a look at this awesome humidifier info for good measure. Check more Great Video Production Service Details 4ef596_
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
FrankJScott
•---->
•---->


Anmeldedatum: 30.08.2022
Beiträge: 877

BeitragVerfasst am: 20.09.2022 - 21:50    Titel: Recommended Crocs Shoes Details Antworten mit Zitat

To the guy talking about rainbow tie dye crocs, american flag crocs mens, pool blue crocs, crocs cool, crocs shop near me, neon orange crocs, I highly recommend this best crocs shoes info or dragon ball z crocs, crocs with platform, crocs shop near me, disney cars crocs, steve madden crocs, crocs men's literide pacer sneaker, as well as this best crocs shoes model on top of literide pacer crocs, crocs corporate office, new born crocs, carrot crocs, crocs bae black, nike air crocs, as well as this recommended crocs shoes make which is also great. Also have a look at this great crocs shoes product as well as crocs with straps, crocs mall, crocs malindi, nearest croc store, crocs salehe bembury, crocs sneakers mens, alongside all this best crocs shoes deal and don't forget toe crocs, crocs salehe bembury, triple crocs comfort, mens grey crocs, crocs flip flops, nike air monarch crocs, as well as useful crocs shoes model which is also worth a look. I also recommend this awesome crocs shoes info as well as jcpenney crocs, crocs slippers price, teal crocs, crocs crocodile, crocodile dress shoes, crocs original price, on top of this excellent crocs shoes product and don't forget dachshund crocs, classic crocs on sale, dual crocs comfort, coors light crocs, croc islander womens, classic bae clog, on top of useful crocs shoes item which is also great. Finally, have a look at this updated crocs shoes deal for good measure. Check more High Rated Trash Can Blog 4abad72
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
FrankJScott
•---->
•---->


Anmeldedatum: 30.08.2022
Beiträge: 877

BeitragVerfasst am: 11.10.2022 - 21:21    Titel: New Power Tool TipsSite Antworten mit Zitat

To the guy talking about ridgid wet tile saw, dewalt mixing drill, home depot drill set, dewalt combo kit, black and decker power tools, impact drill, I highly recommend this new power tool forum not to mention 15mm drill bit,dormer drill bits,dewalt pressure washer,hart power tools,left handed drill bit,cabinet saw,milwaukee belt sander,bosch hammer drill,cordless power drill,mini table saw, look at this top power tool site not to mention band saw blades, best mini chainsaw cordless, milwaukee pole saw, honda gx390 pressure washer, concrete drill, rotary tool, best power drill, best impact driver, best drill press, dewalt table saw dwe7491rs, try this top rated power tool tips for makita angle grinder, reverse drill bit, milwaukee track saw, ridgid band saw, best electric drill, dewalt battery chainsaw, echo electric chainsaw, pole saw, dewalt oscillating tool, dewalt cordless grinder, . See More Top Rated Law Firm In Roseville Details 4abad72
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
Beiträge der letzten Zeit anzeigen:   
Neues Thema eröffnen   Neue Antwort erstellen    Fischer-Bayern.de Foren-Übersicht -> Classic-Snippets Alle Zeiten sind GMT + 2 Stunden
Gehe zu Seite 1, 2  Weiter
Seite 1 von 2

 
Gehe zu:  
Du kannst keine Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum nicht antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.


Powered by phpBB © 2001, 2002 phpBB Group
Deutsche Übersetzung von phpBB.de


AppleScript für absolute Starter