WSH(・∀・)ｽﾚｯﾄﾞ! Part 3

[表示 : 全て最新50 1-99 101- 201- 301- 401- 501- 601- 701- 801- 2chのread.cgiへ]
Update time : 05/09 16:53 / Filesize : 191 KB / Number-of Response : 882
[このスレッドの書き込みを削除する]
[＋板最近立ったスレ＆熱いスレ一覧 : ＋板最近立ったスレ／記者別一覧] [類似スレッド一覧]


↑キャッシュ検索、類似スレ動作を修正しました、ご迷惑をお掛けしました

WSH(・∀・)ｽﾚｯﾄﾞ! Part 3

339 名前：デフォルトの名無しさん mailto:sage [2008/09/30(火) 00:01:49 ]: 質問とは関係ないけどVistaだとこんなのもできた。

Set sh = WScript.CreateObject("Shell.Application")
Set cpl = sh.NameSpace(3)
For Each i in cpl.Items
If i.Name = "プログラムと機能" Then
For Each j in i.GetFolder.Items
s = s & j.Name & vbNewLine
Next
End If
Next
MsgBox s

[ 続きを読む ] / [ 携帯版 ]

全部読む前100 次100 最新50 ▲ [ このスレをブックマーク！携帯に送る ] 2chのread.cgiへ
[＋板最近立ったスレ＆熱いスレ一覧 : ＋板最近立ったスレ／記者別一覧]（ ´∀｀）＜191KB

read.cgi ver5.27 [feat.BBS2 +1.6] / e.0.2 (02/09/03) / eucaly.net products.
担当:undef