Pタグのみの行（パラグラフを削除する）

余分な行を削除するスクリプトですが、複数あるとダメですね。

1. –<P></P>のみの行を削除する 
2. set paraNum to 0
3. try
4.     tell application “Jedit X“
5.         activate
6.         tell front document
7.             repeat with paraNum from 1 to (count paragraph)
8.                 –delay 1
9.                 paraNum = paraNum + 1
10.                 if paragraph paraNum contains “<p></p>“ then
11.                     delete paragraph paraNum
12.                 end if
13.             end repeat
14.         end tell
15.     end tell
16.     display dialog “正解です“
17. on error
18.     –エラーになるのなら、エラーがでたら処理の終了と考えてやってみる。 
19.     tell application “AppleScript Editor“
20.         activate
21.         display dialog “処理が終了しました“
22.     end tell
23. end try

ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー

ページトップに戻る↑　　　　　　　　　　　　　　　　　　　　　　　　　　　ページ一番下へ↓