|
[4024] Re:[要望]DExploreのヘルプのサポート | |
▽ 2004/9/1 (水) 00:21:56 (全略) |
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0) |
▼ もかさん
> # COM経由で、キーワード指定が出来るらしいですが、その時点でおなか一杯です。
> # man hogehoge のほうが楽...
あぁ、あれCOMで操作するのですか、いいことを知りました^-^
で、VBSのマクロの形で書いてみたのですけど
分からないことがあるのでお知恵を拝借できますか?
'----- dexplore.vbs
' 選択位置、カーソル位置の単語をMSDNのdexploreから検索
Dim helpuri
helpuri = "ms-help://MS.MSDNQTR.2003JAN.1041/"
Dim keyword
keyword = Editor.GetSelectedString(0)
If keyword = "" Then
Editor.SelectWord
keyword = Editor.GetSelectedString(0)
End If
If keyword <> "" Then
Dim help
Set help = CreateObject("DExplore.AppObj")
help.SetCollection helpuri, "" 'none-filter
help.Contents
help.DisplayTopicFromF1Keyword keyword
help.SyncIndex keyword, 1
help.IndexResults
MsgBox "とりあえずエラーをおこしておく"
End If
MSDNを起動してもすぐマクロが終わってしまってMSDNごと終わってしまいます
なんかいい方法ないすかね、、、
# 最後に MsgBox いれてマクロが終わるのを止めてます(ないけど、、>_<;;) |
|