2012-04-20 40 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参数在我例如)可以是一个项目列表。