|
浮子屋商店もよろしく。 |
|
ddd
何をするもの?
DirectSSTPを送信するActiveX Controlです。
Webページに貼り付けることにより、そのページを表示した際にSSP等のSSTPサーバが立ち上がっていれば、ゴーストに台詞を喋らせたりできます。
どんな感じ?
上手くいっていればこのページを表示した際にさくらが喋った筈です。
応用編
これはActiveX Controlなので、ExcelやWord等のオブジェクトを挿入できるアプリや、ActiveXを扱える言語、およびJScriptやVBScript等のWSH*1から呼び出すことができます。
EmeditorはマクロとしてWSHを使えるので、例えば「選択範囲をDSSTPで送信」といったことができます。
Emeditorのマクロの例を置いておきます。
0
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
| #spanend
#spanadd
var dsstpobj = new ActiveXObject( "DSSTPSEND.DSSTPSendCtrl.1" );
#spanend
#spanadd
var script=document.selection.Text;
#spanend
#spanadd
script=script.replace(/\n/g,"");
#spanend
#spanadd
script=script.replace(/\r/g,"");
#spanend
#spanadd
dsstpobj.Script=script;
#spanend
#spanadd
dsstpobj.IfGhost="";//特定のゴーストに送りたい場合はここを変更
#spanend
#spanadd
/*
#spanend
#spanadd
//SSTP-ViewerはHWndが0の場合弾いてしまうようなので、無理やり使う場合は
#spanend
#spanadd
//このコメントを外す
#spanend
#spanadd
dsstpobj.ExLine="SEND SSTP/1.4\r\n"+
#spanend
#spanadd
"Charset: Shift_JIS\r\n"+
#spanend
#spanadd
"Sender: DSSTPSend ActiveX Control\r\n"+
#spanend
#spanadd
"Script: "+script+"\r\n"+
#spanend
#spanadd
//"IfGhost: \r\n"+
#spanend
#spanadd
"Option: notranslate\r\n"+
#spanend
#spanadd
"SecurityLevel: external\r\n"+
#spanend
#spanadd
"HWnd: -1\r\n"
#spanend
#spanadd
*/
#spanend
#spanadd
dsstpobj.Send(false);//trueにするとおかしなことになるので注意!!
#spanend
#spanadd
|
ダウンロード
ActiveXなので基本的にはダウンロードとかインストールの必要はありませんが、IEのセキュリティ設定等でダウンロードできない場合の為にインストーラパッケージを作成したので置いておきます。
- 2005/06/25 version 1.0 新規作成
- 2005/06/25 version 1.1 若干修正
- 2005/06/25 version 1.2 WSH(VBScript,JScript)から実行可能なように修正
謝辞
アイコンは智犬さんが作ってくれました。*2
水無月藍さんがバナーを作ってくれました。
|