« [NSPasteboardTypeRTF]ペーストボードのリッチテキストデータをRTFファイルに書き出す | トップページ | [QR DECODE]バーコード読み取り結果判定(考え中) »

[NSHTMLTextDocumentType]ペーストボードのリッチテキストデータをHTMLファイルに書き出す

#!/usr/bin/env osascript
----+----1----+----2----+-----3----+----4----+----5----+----6----+----7
#
#
#
#
#                       com.cocolog-nifty.quicktimer.icefloe
----+----1----+----2----+-----3----+----4----+----5----+----6----+----7

use AppleScript version "2.8"
use framework "Foundation"
use scripting additions

property refMe : a reference to current application

################################
##### パス関連
################################
set strFilePath to "~/Desktop/クリップボードのRTF書類のHTML.html" as text
set ocidFilePathStr to refMe's NSString's stringWithString:strFilePath
set ocidFilePath to ocidFilePathStr's stringByStandardizingPath()
set ocidFilePathURL to refMe's NSURL's alloc()'s initFileURLWithPath:ocidFilePath isDirectory:false


################################
######ペーストボードを取得
################################
set ocidPasteboard to refMe's NSPasteboard's generalPasteboard()
###NSDataとしてRTFデータを受け取る
set ocidReadPasteboardRTF to ocidPasteboard's dataForType:(refMe's NSPasteboardTypeRTF)

################################
##### HTML変換
################################
###NSAttributedStringに変換
set ocidAttributedString to refMe's NSAttributedString's alloc()'s initWithRTF:ocidReadPasteboardRTF documentAttributes:(missing value)
###文字数カウント
set numStringLenge to ocidAttributedString's |length|() as integer
###アトリビュートをHTMLに変換
set ocidAttributedDict to refMe's NSDictionary's dictionaryWithObject:(refMe's NSHTMLTextDocumentType) forKey:(refMe's NSDocumentTypeDocumentAttribute)
####NSDATAに変換
set listDocAttar to ocidAttributedString's dataFromRange:{location:0, |length|:numStringLenge} documentAttributes:ocidAttributedDict |error|:(reference)
####取り出して
set ocidHTMLData to item 1 of listDocAttar
################################
##### 保存
################################
#####保存
set boolFileWrite to (ocidHTMLData's writeToURL:ocidFilePathURL atomically:true)


|

« [NSPasteboardTypeRTF]ペーストボードのリッチテキストデータをRTFファイルに書き出す | トップページ | [QR DECODE]バーコード読み取り結果判定(考え中) »

AppleScript NSPasteboard」カテゴリの記事

AppleScript RTF」カテゴリの記事