クリップボード内のテキストを新規ファイルに保存します。
| 保存ファイル名 | cliptext.txt |
|---|---|
| 文字コード | UTF-8 |
const cliptext = clipboardData.getData("text");
const fullpath = fso.BuildPath(api.GetDisplayNameOf(Ctrl, SHGDN_FORPARSING), "cliptext.txt");
const s = new ActiveXObject("ADODB.Stream");
try {
// Clipboard -> Stream
s.Type = 2; // 2:text
s.Charset = 'UTF-8';
s.Open();
s.WriteText(cliptext);
// Skip BOM
s.Position = 0;
s.Type = 1; // 1:binary
s.Position = 3; // skip BOM
const bin = s.Read();
s.Position = 0;
s.Write(bin);
s.SetEOS();
// Stream -> File
s.SaveToFile(fullpath, 2); // 2:overwrite
} catch(e) {
alert(e);
} finally {
s.Close();
}