2012-04-20 32 views
0

如何知道這只是大型HTML文件的一部分,可以使用分隔符從以下HTML波形中刪除所有這些<br />標記。我也想使用分隔符來刪除我的html文件中的其他標籤。使用分隔符刪除Applescript中的HTML標記

<Education :<br /> 
<br /> 
- School-leaving exam type B, Zug<br /> 
- Basic course HSG<br /> 
- Business economist FH, HWV St. Gallen (1990)<br /> 
<br /> 
Professional development :<br /> 
<br /> 
- 1984-97 GESTIO Treuhand- und Verwaltungs AG, Zug (part time)<br /> 
- 1985-86 Financial administration Canton of St. Gallen<br /> 
- 1991-94 Gestinor Services AG, Zug<br /> 
- 1994-97 Revisuisse Price Waterhouse AG, Zug, Taxes and Law<br /> 
- 1997 Founding of Bohnet & Schlatter Treuhand AG<br /> 
<br /> 
Experience :<br /> 
<br /> 
- Tax consultation of legal and natural persons<br /> 
- Preparation of tax statements for legal and natural persons<br /> 
- Preparation of structural plans and execution of organizational processes<br /> 
- Management and support on responsibilities in finances and accounting. 

在此先感謝。

回答

0

替換文本是基本夠用,多數每個人都有自己的圖書館的處理程序,例如

on run -- example 
    set theText to "<Education :<br /> 
<br /> 
- School-leaving exam type B, Zug<br />..." 

    replaceTextInString_fromOldItem_toNewItem_(theText, "<br />", "") 
end run 


to replaceTextInString_fromOldItem_toNewItem_(someText, oldItem, newItem) 
    (* 
    replace all occurances of oldItem with newItem 
     parameters - someText [text]: the text containing the item(s) to change 
         oldItem [text]: the item to be replaced 
         newItem [text]: the item to replace with 
     returns [text]: the text with the item(s) replaced 
    *) 
    set {tempTID, AppleScript's text item delimiters} to {AppleScript's text item delimiters, oldItem} 
    try 
     set {pieces, AppleScript's text item delimiters} to {text items of someText, newItem} 
     set {someText, AppleScript's text item delimiters} to {pieces as text, tempTID} 
    on error errorMessage number errorNumber -- oops 
     set AppleScript's text item delimiters to tempTID -- make sure TID's are reset 
     error errorMessage number errorNumber -- pass on error 
    end try 

    return someText 
end replaceTextInString_fromOldItem_toNewItem_ 

注意,在雪豹和獅子,爲項目的文字分隔符,以取代(的oldItem參數在我例如)可以是一個項目列表。