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

[表示 : 全て最新50 1-99 101- 201- 2chのread.cgiへ]
Update time : 09/14 18:25 / Filesize : 42 KB / Number-of Response : 221
[このスレッドの書き込みを削除する]
[＋板最近立ったスレ＆熱いスレ一覧 : ＋板最近立ったスレ／記者別一覧] [類似スレッド一覧]


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

1 名前：デフォルトの名無しさん mailto:sage [2009/05/24(日) 01:22:48 ]: (　´ゝ`)　誰か詳しい情報ｷﾎﾞﾝﾇ

●過去スレ
WSH(・∀・)ｽﾚｯﾄﾞ!
pc11.2ch.net/test/read.cgi/tech/1055075469/
WSH(・∀・)ｽﾚｯﾄﾞ! Part 2
pc11.2ch.net/test/read.cgi/tech/1176698934/
WSH(・∀・)ｽﾚｯﾄﾞ! Part 3
pc12.2ch.net/test/read.cgi/tech/1208948450/

●関連スレ
お前ら、wsh使ってますか? Part7
pc12.2ch.net/test/read.cgi/win/1190548945/
HTAをもっと流行らせる計画 Part2
pc12.2ch.net/test/read.cgi/tech/1220874815/
★WSHでCGI★JScriptVBScript
pc11.2ch.net/test/read.cgi/php/1059745064/

●公式サイト
Windows Script
www.microsoft.com/japan/msdn/scripting/

●個人サイト
Windows Scripting Host
homepage3.nifty.com/aya_js/wsh/index.htm
Windows Scripting Host Laboratory
www.roy.hi-ho.ne.jp/mutaguchi/wsh/
Windows Script Wiki
winscript.s41.xrea.com/wiki/index.php
2 名前：デフォルトの名無しさん mailto:sage [2009/05/24(日) 12:30:47 ]: >>1
乙

WSHやVBSずっと消えないで欲しい
というか消えたら困る
3 名前：デフォルトの名無しさん mailto:sage [2009/05/24(日) 12:43:45 ]: VB6よりは長生きできるさきっと
4 名前：デフォルトの名無しさん mailto:sage [2009/05/25(月) 00:03:22 ]: javascriptが残るならjscriptも残るだろうし、wshも当然残ることになる。そうなるとvbscriptも残るし、htaが残るのは当然だ。
5 名前：デフォルトの名無しさん mailto:sage [2009/05/25(月) 01:03:14 ]: ある日、次のバージョンのWindowsでは対応しないことになって終わる
6 名前：デフォルトの名無しさん mailto:sage [2009/05/25(月) 02:10:47 ]: だんだん使いにくくなるな
scriptcontrolはvistaで消えた
<input type=file>はie8で使えん
...
7 名前：デフォルトの名無しさん mailto:sage [2009/05/25(月) 03:42:08 ]: ここの人たちは PowerShell は使ってる？

>>2
WSH消えたら困る人ってあんまり見かけないけど
案件でWSH酷使してるんか？
8 名前：デフォルトの名無しさん mailto:sage [2009/05/25(月) 12:17:42 ]: >>7
いままで標準装備のWSHで処理しなかった人たちは、今後標準装備になるPowerShellも使わんだろうな。
9 名前：デフォルトの名無しさん mailto:sage [2009/05/25(月) 14:20:01 ]: >>7
俺は個人だよ

msgboxが好きなので（ホントはpopupメソ）
powershellは未だ手付かず

WSHから自由に.netのクラスライブラリ
呼び出せるといいんだけどね
10 名前：デフォルトの名無しさん mailto:sage [2009/05/25(月) 23:58:28 ]: そういうcomを作ればよい
11 名前：デフォルトの名無しさん mailto:sage [2009/05/30(土) 12:53:57 ]: com？やだよメンドクサイ
標準装備で出来ることがWSHのメリットなのにさ。

WSHからSystem.Collections.ArrayList呼ぶことなら結構あるけどな。
12 名前：デフォルトの名無しさん mailto:sage [2009/05/30(土) 14:05:09 ]: System.Collections.ArrayListはcomから呼べるように特別に作ってあるのか
それとも、ほかのクラスもレジストリに書けば呼べるのか？
13 名前：デフォルトの名無しさん mailto:sage [2009/05/30(土) 14:20:31 ]: ttp://www.isla-plata.org/wiki/pukiwiki.php?%B3%AB%C8%AF%A5%EA%A5%BD%A1%BC%A5%B9%2FJScript%2F%A5%B9%A5%AF%A5%EA%A5%D7%A5%C8%A4%AB%A4%E9.Net%20Framework%A5%AF%A5%E9%A5%B9%A4%F2%CD%F8%CD%D1%A4%B9%A4%EB%A1%CA%A5%CE%A5%A6%A5%CF%A5%A6%CA%D4%A1%CB
14 名前：デフォルトの名無しさん mailto:sage [2009/05/30(土) 16:30:39 ]: で、どっち？
15 名前：デフォルトの名無しさん mailto:sage [2009/05/30(土) 17:49:11 ]: >>13
ここまでまとめた人が居るんか、すごいな
でもやっぱりあんまり使えなそう

結局powershell覚えて出力をWSHで受け取るとか
本末転倒だなw
16 名前：デフォルトの名無しさん mailto:sage [2009/05/30(土) 21:52:20 ]: PowerShellでもWin32API使いにくいからな
FindWindowやSendMessageが標準環境で簡単に使えるようにならんかな
17 名前：デフォルトの名無しさん mailto:sage [2009/05/30(土) 22:39:18 ]: スクリプト言語の中にはC関数を直接呼び出せるものがあってな
18 名前：デフォルトの名無しさん mailto:sage [2009/05/30(土) 23:37:40 ]: そんなもん、いくらでも有るが
19 名前：デフォルトの名無しさん mailto:sage [2009/05/31(日) 00:00:38 ]: なんでvbscriptは
20 名前：デフォルトの名無しさん mailto:sage [2009/05/31(日) 01:55:01 ]: こんなにかわいいの？
21 名前：デフォルトの名無しさん mailto:sage [2009/06/02(火) 17:33:30 ]: シフトキーを押しながらの操作はWSHでどうするの？
22 名前：デフォルトの名無しさん mailto:sage [2009/06/02(火) 19:00:42 ]: WSHを実行するのにシフトキーを押す必要はありません。
23 名前：デフォルトの名無しさん mailto:sage [2009/06/02(火) 22:45:16 ]: なるほど
24 名前：デフォルトの名無しさん mailto:sage [2009/06/06(土) 14:55:08 ]: >>21
copyhereやmovehereみたいに用意されてるものもあるが
ショートカットの貼り付けや
invokeverb "delete"みたいに用意されてないものもある
ないものはあきらめてほかの方法さがせ
25 名前：デフォルトの名無しさん mailto:sage [2009/06/06(土) 19:22:13 ]: なるほど
26 名前：デフォルトの名無しさん [2009/06/10(水) 15:44:18 ]: mailto:sage
27 名前：デフォルトの名無しさん mailto:sage [2009/06/10(水) 16:28:32 ]: getobject("hoge.xls")して、それが新規インスタンスか、
既存のインスタンスか、区別する方法は？
28 名前：デフォルトの名無しさん mailto:sage [2009/06/10(水) 22:14:31 ]: 普通にやれば良いだけでは？
29 名前：デフォルトの名無しさん mailto:sage [2009/06/10(水) 23:46:59 ]: 抽象的な質問なのですが、wshでアプリケーションを操作する・・・では無くて
wshでアプリケーションを作る事は可能ですか？
30 名前：デフォルトの名無しさん mailto:sage [2009/06/10(水) 23:54:37 ]: GUIつきのアプリは厳しいんじゃないか？
31 名前：デフォルトの名無しさん [2009/06/10(水) 23:58:39 ]: そのためのHTAです。
32 名前：デフォルトの名無しさん mailto:sage [2009/06/11(木) 02:03:46 ]: <SCRIPT language="vbscript">
str = "Hello World!!"
</SCRIPT>
<BODY>
<P><変数strを、ここに出力したい。></P>
</BODY>
33 名前：デフォルトの名無しさん mailto:sage [2009/06/11(木) 08:09:32 ]: ｗ
34 名前：デフォルトの名無しさん mailto:sage [2009/06/11(木) 12:27:33 ]: <BODY>
<P>Hello World!!</P>
</BODY>
35 名前：デフォルトの名無しさん mailto:sage [2009/06/11(木) 13:11:12 ]: >>27
ないんじゃないか
getobjectする前に排他オープンしてみるとか
36 名前：デフォルトの名無しさん mailto:sage [2009/06/11(木) 14:05:51 ]: <html><BODY>
<div align="center"><i>NHKニュース速報 </i><span id =span1></span><span id =span2></span></div></BODY>
<script language=vbscript>
Window.ReSizeTo 480,360
Sub Window_onLoad()
span2.innerhtml="<font size=1>　アナログ</font>"
For iii = 0 to 10
span1.innerhtml = "日経平均、" & iii & "万円台突破"
createobject("WScript.Shell").Run "%COMSPEC% /c ping -n " & 1 & " 127.0.0.1>nul", 0, true
next
end sub
</script></html>
37 名前：デフォルトの名無しさん mailto:sage [2009/06/11(木) 14:18:30 ]: <html>
<body>

<p>変数strを、ここに出力したい。</p>
<span id =strspan></span>
</body>
<script language=vbscript>
sub window_onLoad()
str = "Hello World!!"
strspan.innerhtml = str
end sub
</script>
</html>
38 名前：デフォルトの名無しさん mailto:saga [2009/06/11(木) 19:32:35 ]: >変数strを、ここに出力したい。
といってるくせに違うところに出してどうする？
39 名前：デフォルトの名無しさん mailto:sage [2009/06/11(木) 19:34:27 ]: >>37
setintervalかsettimeout使えよ
40 名前：デフォルトの名無しさん mailto:sage [2009/06/12(金) 19:35:43 ]: getobject("hoge.xls")
と
getobject("hoge.xls","excel.sheet")
の違いはなんだろう？
41 名前：デフォルトの名無しさん mailto:sage [2009/06/12(金) 20:27:34 ]: ,"excel.sheet"があるかないかの違い。
42 名前：デフォルトの名無しさん mailto:sage [2009/06/13(土) 01:46:37 ]: ハズレ
43 名前：デフォルトの名無しさん mailto:sage [2009/06/13(土) 12:43:27 ]: Active にするオブジェクトを指定してるんじゃなかったっけか？
44 名前：デフォルトの名無しさん mailto:sage [2009/06/13(土) 15:37:34 ]: どちらもWorkbookオブジェクトが取れる
45 名前：デフォルトの名無しさん mailto:sage [2009/06/13(土) 15:41:08 ]: getobject("hoge.xls")
は新規と既存がとれるけど
getobject("hoge.xls","excel.sheet")
は新規のみだろ
getobject("","excel.sheet")がcreateobjectなのはその１例だろ
46 名前：デフォルトの名無しさん mailto:sage [2009/06/18(木) 22:56:09 ]: exec.vbs
createobject("wscript.shell").exec("notepad")
を作って
wscript exec.vbs|more
とすると、wscriptは終了してるのに、notepadの終了を待ちます。
なぜか、わかる人いますか？
47 名前：デフォルトの名無しさん mailto:sage [2009/06/19(金) 00:09:58 ]: C:\>notepad|more
48 名前：デフォルトの名無しさん mailto:sage [2009/06/19(金) 01:06:15 ]: createobject("wscript.shell").run("notepad")
だと待たないからrunとexecの違いのなにかだろ
49 名前：デフォルトの名無しさん mailto:sage [2009/06/19(金) 01:40:10 ]: start /b /wait notepad|more
start /b notepad|more
パイプがinheritされて閉じられてないみたいだな
50 名前：デフォルトの名無しさん [2009/06/22(月) 18:45:55 ]: 作業の自動化ができる、って具体的に何を自動化したいの？
連投スクリプトとかできるの？
51 名前：デフォルトの名無しさん mailto:sage [2009/06/22(月) 19:40:30 ]: それはお前さん次第さ
52 名前：デフォルトの名無しさん [2009/06/22(月) 19:42:21 ]: 明日の会議で自動的に受け答えしてくれる？
53 名前：デフォルトの名無しさん mailto:sage [2009/06/22(月) 19:55:21 ]: それもお前さん次第さ
54 名前：デフォルトの名無しさん [2009/06/22(月) 19:59:47 ]: 俺の代わりに飯食ってきてくれるか？いま手が離せない
55 名前：デフォルトの名無しさん [2009/06/22(月) 20:05:23 ]: それはまた別の話
56 名前：デフォルトの名無しさん [2009/06/22(月) 20:36:12 ]: どうやら>>52と>>54の間辺りにWSHでできる事の限界があるらしい
57 名前：デフォルトの名無しさん mailto:sage [2009/06/22(月) 22:43:00 ]: じゃあ俺の心の隙間を埋めてくれるのかい？
58 名前：デフォルトの名無しさん mailto:sage [2009/06/23(火) 21:23:44 ]: 埋め
59 名前：デフォルトの名無しさん mailto:sage [2009/06/24(水) 22:58:30 ]
60 名前：デフォルトの名無しさん mailto:sage [2009/06/25(木) 16:04:09 ]: WSHにてインストールされているプリンタの一覧を取得する方法はありますか？
61 名前：デフォルトの名無しさん mailto:sage [2009/06/25(木) 16:10:32 ]: あります
62 名前：デフォルトの名無しさん mailto:sage [2009/06/28(日) 18:48:32 ]: ありがたい
63 名前：デフォルトの名無しさん mailto:sage [2009/07/06(月) 23:32:01 ]: WSHで現在アクティブなウィンドウを取得する方法ってありませんか？
最前面に来て使用しているであろうアプリを調べたいのです。
64 名前：デフォルトの名無しさん mailto:sage [2009/07/07(火) 00:20:49 ]: ない
win32api使え
65 名前：デフォルトの名無しさん mailto:sage [2009/07/07(火) 00:39:04 ]: SFCminiとAutoitXを入れましょう。これでWSHからwin32apiも使い放題。window操作もやりたい放題。
66 名前：63 mailto:sage [2009/07/07(火) 00:55:00 ]: >>64、65

ありがとうございます。調べてみます。

ネットで調べてうすうすAPIというものを使わないと無理そうだとは思ってたのですが
やはりそうですか・・
67 名前：デフォルトの名無しさん mailto:sage [2009/07/07(火) 01:08:28 ]: WSHから離れて、dmscript（日本人製作の
Jscriptと同様のスクリプト、dm.exe -l オプションでワンライナーの
ようにも使えるので場合によってはWSHからWin32Apiの機能を利用可能）、
UWSC（日本人製作、ドキュメント多し）、
なでしこ（日本人製作、ドキュメント多し）、
AutohotkeyやAutoIT3(AutoItXとほぼ同じ)をつまんで見るのも吉。
これらは、SFCminiやAutoITXに比べて、ポータブルでも使えるメリットがある。
68 名前：デフォルトの名無しさん mailto:sage [2009/07/07(火) 01:11:48 ]: あんま怪しいツールは入れたくないんだよね
69 名前：デフォルトの名無しさん mailto:sage [2009/07/07(火) 01:47:20 ]: MS純正
excel
powershell
vb.net
70 名前：デフォルトの名無しさん mailto:sage [2009/07/07(火) 01:56:27 ]: どれもOS標準添付じゃないし…
71 名前：デフォルトの名無しさん mailto:sage [2009/07/07(火) 20:05:15 ]: 結局は XUL が最強だよな
72 名前：デフォルトの名無しさん mailto:sage [2009/07/07(火) 21:29:45 ]: .netはvistaに標準添付だろ
73 名前：デフォルトの名無しさん mailto:sage [2009/07/07(火) 22:51:00 ]: 開発環境も？
74 名前：デフォルトの名無しさん mailto:sage [2009/07/08(水) 01:39:17 ]: vbc.exe
75 名前：デフォルトの名無しさん mailto:sage [2009/07/08(水) 01:51:31 ]: >>74

ttp://www.moonmile.net/blog/?p=18
>実は Windows XP3 や Vista のマシンでは既に .NET Framework が（勝手に）導入されており、
>実は環境変数を設定すれば Visual C# Express Edition を入れなくても
>コンパイルができます。当然実行もできます。

へぇそうなんだ。常識なの？良いこと聞いた、thx
76 名前：デフォルトの名無しさん mailto:sage [2009/07/08(水) 19:59:39 ]: IEで、Ctrl+Nでウィンドウの新規作成を行った時と等価な状態（セッション情報等を継承）で、
WSHでIEのウィンドウの新規作成を行い、
かつそのIEのウィンドウのオブジェクトIDを得るにはどうしたら宜しいでしょうか？
77 名前：デフォルトの名無しさん mailto:sage [2009/07/08(水) 20:44:55 ]: >>76
ここはWSHのスレであって
IEコンポーネントAPIのスレではないのでスレ違い。
78 名前：デフォルトの名無しさん mailto:sage [2009/07/08(水) 23:01:22 ]: Shell.apliction でグルグルすると既存のieオブジェクトやエクスプローラーのハンドルとれるじゃん。
またはieオブジェクト作ったときのオブジェクトに、例えば objIe.hWndってやってもハンドル取れる。
79 名前：デフォルトの名無しさん mailto:sage [2009/07/09(木) 02:51:48 ]: >>78
やりたい事は、セッション情報を引き継いだIEの新規ウィンドウの生成（Ctrl+Nに相当）です。

例えば、

ie1 = new ActiveXObject("InternetExplorer.Application");
ie1.Navigate("www.example.com/login/");
// ログイン処理

ie2 = new ActiveXObject("InternetExplorer.Application");
ie2.Navigate("www.example.com/foo/bar.html");

とした場合、ie1の派生物とie2の派生物では別セッションとなってしまい、
ie1でログイン状態がセッション管理により行われている場合、
ie2では非ログイン状態になってしまいます。
80 名前：デフォルトの名無しさん mailto:sage [2009/07/09(木) 03:30:44 ]: >>79
window.open ではダメなの?
81 名前：デフォルトの名無しさん mailto:sage [2009/07/13(月) 17:21:30 ]: >>78
どれがアクティブか調べる方法は？
82 名前：デフォルトの名無しさん mailto:sage [2009/07/13(月) 18:38:09 ]: 普通にやれば良いんじゃないの？
83 名前：デフォルトの名無しさん mailto:sage [2009/07/13(月) 19:48:59 ]: 普通にWin32APIのFindWindow クラス名でやれば良いんじゃないの？
84 名前：デフォルトの名無しさん mailto:sage [2009/07/15(水) 21:19:25 ]: >>83
タブの区別がつかん
85 名前：デフォルトの名無しさん mailto:sage [2009/08/11(火) 19:02:06 ]: statustextでつくとは！
86 名前：デフォルトの名無しさん mailto:sage [2009/08/22(土) 06:23:12 ]: CreateObject("Shell.Application").Windows.Item
でアクティブ取れるんだね。
87 名前：デフォルトの名無しさん mailto:sage [2009/08/22(土) 15:05:28 ]: 正確には
でアクティブ取れたんだね。
88 名前：デフォルトの名無しさん mailto:sage [2009/08/22(土) 19:44:04 ]: >>87
え？Vista以降は取れないとか？
89 名前：デフォルトの名無しさん mailto:sage [2009/08/23(日) 14:13:39 ]: え？IE7以降は取れないとか？
90 名前：デフォルトの名無しさん mailto:sage [2009/08/27(木) 15:49:26 ]: どこで聞けばいいのかわからないのでここで質問を
piyo1hogera.txt
piyo2hogera.txt
piyo3hogera.txt
piyo5hogera.txt
pito8hogera.txt
というように番号がとびとびになっているようなファイルの集まりから数字だけを抽出して
htmlファイルに反映させたいんだけどどうすればいい？

一応, ファイル一覧は抽出できるんだけどそっから数字だけを抽出するにはどうすればいいかわからないので。
91 名前：デフォルトの名無しさん mailto:sage [2009/08/27(木) 19:08:52 ]: >>90
正規表現を使うのが簡単
var num;
if (/(\d+)/.exec(ファイル名) != null) { // ファイル名に数字を含んでいたら
num = RegExp.$1; //抽出した数字
}
92 名前：デフォルトの名無しさん mailto:sage [2009/08/29(土) 01:14:59 ]: $1ｗｗｗｗｗｗｗｗｗｗｗｗ
93 名前：デフォルトの名無しさん mailto:sage [2009/09/07(月) 19:22:11 ]: WScript.Echoで文字色変えられますか？もし変えられるなら方法も
94 名前：デフォルトの名無しさん mailto:sage [2009/09/08(火) 05:55:20 ]: >>93
ｺﾝｿｰﾙの文字色変更だったらオススメはしない
一応、ｺﾝｿｰﾙAPI or ｴｽｹｰﾌﾟｼｰｹﾝｽを使うことで出来るけどね
↑は環境を変更する必要があるので、HTAを使った方がマシだと思う
95 名前：デフォルトの名無しさん mailto:sage [2009/09/08(火) 16:20:44 ]: tscmd.zipのechoc.exeを使うといいかも
96 名前：デフォルトの名無しさん mailto:sage [2009/09/08(火) 16:48:43 ]: createobject("wscript.shell").exec "cmd /c color ac"
97 名前：デフォルトの名無しさん mailto:sage [2009/09/08(火) 20:36:48 ]: >>95-96
間違ってはいないけど >>93 の意図とは違うだろ・・・ワザとか？
98 名前：デフォルトの名無しさん mailto:sage [2009/09/08(火) 22:19:41 ]: >>96はだめみたいよ
標準入出力をリダイレクトしてコンソール環境を継承してない？
99 名前：デフォルトの名無しさん mailto:sage [2009/09/08(火) 22:58:31 ]: >>93
NT系OSのコマンドプロンプトでは色指定などのエスケープシーケンスは標準ではサポートされない
エスケープシーケンス　ANSI.SYS などのキーワードで検索
100 名前：デフォルトの名無しさん mailto:sage [2009/09/08(火) 23:43:35 ]: echo エスケープシーケンス | ansi.exe
みたいなのがあったような
101 名前：デフォルトの名無しさん mailto:sage [2009/09/09(水) 01:02:43 ]: PowerShellの中では文字色変えられるけど、
CMDに戻ると色が消えるのはなんでだろう？
102 名前：デフォルトの名無しさん mailto:sage [2009/09/09(水) 15:31:45 ]: >>98
ok cmd /c color ac
ng cmd /c color ac <nul >nul 2>nul
103 名前：デフォルトの名無しさん mailto:sage [2009/09/09(水) 20:43:53 ]: createobject("wscript.shell").exec "command con /c cmd /c color ac"
104 名前：デフォルトの名無しさん mailto:sage [2009/09/10(木) 17:30:19 ]: 無理ぽ
105 名前：デフォルトの名無しさん mailto:sage [2009/09/11(金) 17:34:00 ]: なんかズレテるな
106 名前：デフォルトの名無しさん mailto:sage [2009/09/11(金) 19:35:57 ]: >>105
なんかズレてるな
107 名前：デフォルトの名無しさん mailto:sage [2009/09/11(金) 20:06:31 ]: excel経由でコンソールAPIを呼ぶ
108 名前：デフォルトの名無しさん mailto:sage [2009/09/12(土) 19:25:50 ]: >>103
なんかコードページがズレてるな
createobject("wscript.shell").exec "chcp.com 932"
109 名前：デフォルトの名無しさん mailto:sage [2009/09/14(月) 14:35:30 ]: InvokeVerbで、右クリックメニューのサブメニューは呼べないんでしょうか
110 名前：デフォルトの名無しさん mailto:sage [2009/09/15(火) 07:22:20 ]: >>109
どういう状況下で何をしたいのか理解できないけど
InvokeVerbで呼べないならレジストリ読んで実行しとけ
111 名前：デフォルトの名無しさん mailto:sage [2009/09/15(火) 14:46:42 ]: InvokeVerb "メニュー項目\サブメニュー項目"
とでもできればよいが
112 名前：デフォルトの名無しさん mailto:sage [2009/09/16(水) 12:44:13 ]: InvokeVerbEx "メニュー項目","サブメニュー項目"
113 名前：デフォルトの名無しさん mailto:sage [2009/09/17(木) 23:30:32 ]: WordのActiveXコンポーネントについて聞いて良いですか？
WSHから、documentオブジェクトに
他所で生成したリストをMailMergeさせることは出来たんですが、
実際のデータが割り当てられたプレビュー状態を表示させるメソッドってありますか？
ツールバーのボタンを押せばちゃんと表示されます。
114 名前：デフォルトの名無しさん mailto:sage [2009/09/18(金) 00:15:01 ]: >>113
こんなんで良いの?
var word = new ActiveXObject('Word.Application');
word.visible = true
var doc = word.Documents.Add();
doc.Content.InsertAfter("hello, world.");
doc.PrintPreview();
115 名前：デフォルトの名無しさん mailto:sage [2009/09/18(金) 00:28:10 ]: >>114
ありがとうございます。
説明が悪かったのですが、印刷プレビューではなくて、
通常のレイアウト内の、差し込み印刷のプレビュー表示です。
右、左でレコードを移動できるあれです。
ツールバーのボタンを押さないと、<<名前>>みたいなフィールドのままですよね。
それを、差し込んだ状態で見せたいんです。
ちゃんとデータソースと結合は出来ているのですが。
スレ違いですかね・・・
116 名前：デフォルトの名無しさん mailto:sage [2009/09/18(金) 00:42:13 ]: >>115
失礼、差込印刷なって使ったことなかったので

とすると、これ?
doc.MailMerge.ViewMailMergeFieldCodes = false
117 名前：116 mailto:sage [2009/09/18(金) 00:43:29 ]: ×差込印刷なって
○差込印刷なんて
orz...
118 名前：デフォルトの名無しさん mailto:sage [2009/09/18(金) 00:46:24 ]: >>116
調べてみたら、それで間違いないと思います！
今ちょっとWordが無い環境なんで、改めて試してみます。
ありがとうございました。
119 名前：デフォルトの名無しさん mailto:sage [2009/09/19(土) 01:54:02 ]: ABALE.ZIPとかいうCOMが入っているのですが、これって使えるの？
120 名前：デフォルトの名無しさん [2009/09/24(木) 22:41:49 ]: Wordの印刷についてお聞きしたいんですが．
Wordを印刷するプログラムを書いたのですが，
プリンタを任意に指定する方法がわかりません．
以下のプログラムでは，”通常使うプリンタ”になってしまいます．
プリンタを指定する場合はどのようにすればよいのでしょうか？
できれば，引数からプリンタを指定するようにしたいです．
よろしくお願いいたします．

var pf,obj;
var objArgs = WScript.Arguments;
pf = new ActiveXObject("Word.Application");
pf.DisplayAlerts = false;
obj = pf.Documents.Open(objArgs(0),0,1);
obj.PrintOut();
obj.Close(0);
WScript.Quit(0);
121 名前：デフォルトの名無しさん mailto:sage [2009/09/24(木) 23:08:20 ]: >>120
試してないけど、
pf.ActivePrinter = "プリンタ名"
あたり?

ちなみに、明らかにword固有の機能はスレ違い
VBAスレなどに行ってください
122 名前：デフォルトの名無しさん [2009/09/25(金) 00:41:38 ]: >>121
ありがとうございます．
その方法で動きました
123 名前：デフォルトの名無しさん mailto:sage [2009/09/25(金) 00:44:39 ]: ちなみに、VBAスレでは、VBやVBSでも書ける話はスレ違いと言われるので、
さらにほかのスレに行ってください
124 名前：デフォルトの名無しさん mailto:sage [2009/09/25(金) 04:29:36 ]: > ちなみに、VBAスレでは、VBやVBSでも書ける話はスレ違いと言われる
ハズレ

「VBやVBSでも書ける話」がスレ違いなのではなく
「Word.ApplicationやExcel.Applicationを使わずにVBやVBSでも書ける話」がスレ違いと言われる

VBやVBSでも書ける話でも、WordやExcel固有機能の話なら、当然スレ違いじゃない
だってVBAのAはWord.[A]pplicationやExcel.[A]pplicationのAなんだから
125 名前：デフォルトの名無しさん mailto:sage [2009/09/25(金) 14:50:55 ]: new ActiveXObject("Shell.Application").ShellExecute(objArgs(0),"プリンタ名",null,"printto");
は、どのスレだろう？
126 名前：デフォルトの名無しさん mailto:sage [2009/09/25(金) 17:04:12 ]: すいません。質問させてください。
「画面のプロパティ」の内容に当たるレジストリを書き換えるコードを書いています。
が、ログオフか再起動をしないと反映されません。
ログオフ、再起動なしで反映させる方法はありませんか？
127 名前：デフォルトの名無しさん mailto:sage [2009/09/25(金) 19:13:20 ]: たぶんスレ違いと言われるんじゃまいか
128 名前：デフォルトの名無しさん mailto:sage [2009/09/25(金) 20:04:19 ]: >>126
設定するモノによる
「画面のプロパティ」の画面自体をVBSで操作した方が楽ぢゃねぇ？
129 名前：デフォルトの名無しさん mailto:sage [2009/09/25(金) 20:15:00 ]: VBSで画面の操作なんかできんのか
130 名前：デフォルトの名無しさん mailto:sage [2009/09/25(金) 20:38:11 ]: sendkeysだろ
>>126
inichangeとかsettingchangeとかぐぐれ
131 名前：デフォルトの名無しさん mailto:sage [2009/09/25(金) 20:56:04 ]: sendkeysはVBSじゃないけど
132 名前：デフォルトの名無しさん mailto:sage [2009/09/26(土) 02:07:43 ]: ｗ
133 名前：デフォルトの名無しさん mailto:sage [2009/09/26(土) 10:29:44 ]: ｗはVBSじゃないけど
134 名前：デフォルトの名無しさん mailto:sage [2009/09/29(火) 15:59:53 ]: WScript.Echo "ｗ"
はVBSね
135 名前：デフォルトの名無しさん mailto:sage [2009/09/29(火) 18:50:17 ]: Is there any here document in WSH?
136 名前：デフォルトの名無しさん mailto:sage [2009/10/01(木) 23:18:05 ]: UserとPasswdを指定してリモートのファイルにアクセスするならMapNetworkDriveが使えるけど
ドライブのマッピングをしたくない場合って他に何か方法あるかな？
net useコマンド叩けばいいんだけど、あんまり美しくない。。。
137 名前：デフォルトの名無しさん mailto:sage [2009/10/01(木) 23:26:31 ]: pushdとかは？
138 名前：デフォルトの名無しさん mailto:sage [2009/10/01(木) 23:28:32 ]: FileSystemObject って UNC に対応してなかったけ？
139 名前：デフォルトの名無しさん mailto:sage [2009/10/02(金) 01:32:32 ]: UNCってUser/Pass指定できるんだっけ？
140 名前：デフォルトの名無しさん mailto:sage [2009/10/02(金) 01:53:29 ]: マップしてfsoで開いてアンマップ
141 名前：デフォルトの名無しさん [2009/10/07(水) 12:46:15 ]: 指定したパスのフォルダをエクスプローラーで、
サイズや位置を指定して開く方法があったら教えてください。
ぐぐろうとすると InternetExplorerでのやり方ばかりヒットしてしまって・・・
142 名前：デフォルトの名無しさん mailto:sage [2009/10/07(水) 13:25:15 ]: ' 変数の定義,WSHの準備,etc...
Option Explicit
Dim FSO,WS,AG,WE,strOs,strInp,strCom,intRet
Set FSO=CreateObject("Scripting.FileSystemObject")
Set WS=CreateObject("WScript.Shell")
Set AG=WScript.Arguments
Set WE=WS.Environment("PROCESS") : strOs=WE("OS")

' RunメソッドでEXPLORER.EXEを起動し、引数で指定されたドライブ/フォルダ(省略時は現在のドライブ/フォルダ)をツリー枠と共に表示
strInp="." : If (AG.Count > 0) Then strInp=AG(0)
strCom="EXPLORER /e,/root," & Chr(34) & FSO.GetAbsolutePathName(strInp) & Chr(34)
intRet=WS.Run(strCom , 1, true)

' WSHのバージョンが5.1以降かつOSがWindowsNT系(NT/2000/XPなど)の場合、処理内容をイベントID:4(情報)でWindowsNTイベントログへ記録
If (WScript.Version > "5.0") And (strOs = "Windows_NT") Then
WS.LogEvent 4, "(bvExplorer.vbs) 次のコマンドラインを実行しました。" & vbCrLf & strCom
End If

' 各オブジェクトのメモリリソース等を開放し、本スクリプト実行を終了
Set FSO=Nothing : Set WS=Nothing : Set AG=Nothing : Set WE=Nothing
WScript.Quit()
143 名前：デフォルトの名無しさん mailto:sage [2009/10/07(水) 20:30:11 ]: Set ie=GetObject("new:{C08AFD90-F2A1-11D1-8455-00A0C91F3880}")
ie.Visible=True
ie.Top=
ie.Width=
...
144 名前：デフォルトの名無しさん mailto:sage [2009/10/09(金) 13:05:03 ]: FSOその他でシンボリックリンクの判定できる？
ターゲット取り出せる？
145 名前：デフォルトの名無しさん mailto:sage [2009/10/09(金) 19:10:05 ]: ExecuteExcel4Macro("CALL(""user32"",""FindWindowExA"",
はよくあるが、
ExecuteExcel4Macro("CALL(""user32"",""FindWindowExW"",
はできないのか？
146 名前：デフォルトの名無しさん mailto:sage [2009/10/09(金) 22:54:27 ]: >>144
シンボリックリンクなら。ジャンクションはこれでは無理。たぶんWMIでいけるんじゃないか。
動かしたのは Win7RC なので、XP では無理。Vista はどうかわからん。

Set shell = CreateObject ("Shell.Application")
Set fso = CreateObject("Scripting.FileSystemObject")
Set folder = shell.Namespace("C:\temp")
For Each fname in folder.Items
filePath = folder.GetDetailsOf(fname, 179)
fileAttr = folder.GetDetailsOf(fname, 6)
isFolder = InStr(1,fileAttr,"D",1)
isLink = InStr(1,fileAttr,"L",1)
If isFolder = 1 Then
Set fEntry = fso.GetFolder(filePath)
Else
Set fEntry = fso.GetFile(filePath)
End If
If isLink <> 0 Then
Wscript.echo filePath & " is linking to " & _
folder.GetDetailsOf(fname, 188)
End If
Next
147 名前：デフォルトの名無しさん mailto:sage [2009/10/09(金) 22:57:38 ]: ごみが残ってた。これいらん。
' If isFolder = 1 Then
' Set fEntry = fso.GetFolder(filePath)
' Else
' Set fEntry = fso.GetFile(filePath)
' End If
148 名前：デフォルトの名無しさん mailto:sage [2009/10/10(土) 14:48:07 ]: おー、さんきゅう
ただし、Vistaでは属性に、Lが付かんね
リンク先はあるので、ショートカットでなければで区別するかな
149 名前：デフォルトの名無しさん mailto:sage [2009/10/10(土) 17:33:03 ]: そうなんだ。それじゃ >>147 の fEntry で fEntry.Attributes AND 1024 を調べてみ。
150 名前：デフォルトの名無しさん mailto:sage [2009/10/11(日) 16:10:12 ]: 分類に「リンク」があるかでも区別できるかも

folder.GetDetailsOf(fname, 188)
Vistaで187　
ExtendedPropertyのほうがよいが、IDが不明
GetDetailsOfとExtendedPropertyの対応表か調べる方法があればよいが
151 名前：デフォルトの名無しさん mailto:sage [2009/10/11(日) 20:57:35 ]: あった
System.Link.TargetParsingPath
ms-help://MS.MSDNQTR.v90.ja/shellcc/platform/shell/reference/properties/link/system_link_targetparsingpath.htm
152 名前：デフォルトの名無しさん mailto:sage [2009/10/12(月) 21:37:40 ]: すみません
detail.chiebukuro.yahoo.co.jp/qa/question_detail.php?qid=1131686451
この答えを教えていただけないでしょうか
よろしくお願いします
153 名前：デフォルトの名無しさん mailto:sage [2009/10/12(月) 22:32:38 ]: >>152
取得順はソートされない（詳細はFATやNTFSの構造の話になるので省略する）
取得したデータを自前でソートしろ
154 名前：デフォルトの名無しさん mailto:sage [2009/10/12(月) 22:50:19 ]: >>152
自前ソートが面倒であれば以下のとちらかで手抜きしろ
・ソート指定したdirコマンドの結果を使う
・basp21のReadDirを利用する
155 名前：デフォルトの名無しさん mailto:sage [2009/10/12(月) 23:01:18 ]: >>153-154
ソートするには取得してからでないとダメということですね
ありがとうございます

取得するフォルダの順番というものは決まっているのでしょうか？
対象のフォルダに
20090101
20090102
20090201
20090202
とこのような感じでサブフォルダがありまして
フォルダが読み込まれる順番を調べているのですが
どうも情報がうまくさがせないものでして
echoなどで出しておりますとおそらく昇順だとは思うのですが
明示的にできないか・もしくは昇順であることを裏付ける何かがないかと思いまして
156 名前：デフォルトの名無しさん mailto:sage [2009/10/12(月) 23:12:55 ]: ループの処理のあとにsleep10000くらい入れて
処理フォルダ見とけばいいんじゃない？
157 名前：デフォルトの名無しさん mailto:sage [2009/10/12(月) 23:19:53 ]: >>155
FATに関して言えば情報格納順であり
ファイルやフォルダ削除／作成により順番が変わる
NTFSについても確実に名称でソートされている訳ではない
環境依存にしたくなければソートしろ
158 名前：デフォルトの名無しさん mailto:sage [2009/10/12(月) 23:24:42 ]: >>156-157
ありがとうございます
複雑な内部の問題なんですね…
ソートしてから使いチアと思います。
本当に助かりました
159 名前：デフォルトの名無しさん mailto:sage [2009/10/13(火) 00:12:04 ]: 横レスですが、
みなさんソートはどうしてますか？
バブルソートが楽ですけど、量が増えると遅くて重くて。
エクスプローラがどんなに大量のファイルがあっても一瞬でソートできるように、
何か便利な方法ないでしょうか？
160 名前：159 mailto:sage [2009/10/13(火) 00:16:54 ]: すんません、>>154で出てた・・・
161 名前：デフォルトの名無しさん mailto:sage [2009/10/13(火) 15:32:29 ]: JSciptのArray.sort()でええ
162 名前：デフォルトの名無しさん mailto:sage [2009/10/13(火) 15:41:58 ]: CreateObject("System.Collections.SortedList")
163 名前：デフォルトの名無しさん mailto:sage [2009/10/14(水) 18:16:19 ]: >>21-25
keybd_eventでシフトキー押しながら
invokeverb "delete"
すればよいよ
164 名前：デフォルトの名無しさん mailto:sage [2009/11/08(日) 21:10:28 ]: 質問です
vbsで特定ページのソースを取得し、Ｘ行目がＹという内容と一致するかのチェックをするスクリプトを作りたいのですが
ソース全体を出力する方法はobjIE.Document.Body.InnerHtmlでできるのは分かったんですが
ソース全体の閲覧ではなくソースのＸ行目がＹという文字列と一致するかどうかの分岐を作るのはどうすればいいのでしょうか？
165 名前：デフォルトの名無しさん mailto:sage [2009/11/08(日) 21:42:02 ]: >>164
ネタ？　どこまで理解できていないのか読み取れない・・・

InStr系関数で改行コードをカウントしてＸ行目の開始/終了位置を取得
Mid系関数でＸ行目のデータを取得
If文で分岐

当然ループは使うぞ
166 名前：デフォルトの名無しさん mailto:sage [2009/11/08(日) 23:00:09 ]: >>165
分かりにくくてすみません
>InStr系関数で改行コードをカウントしてＸ行目の開始/終了位置を取得
>Mid系関数でＸ行目のデータを取得
ここが分かりませんでした

もう少し調べてみます
167 名前：デフォルトの名無しさん mailto:sage [2009/11/08(日) 23:58:40 ]: 俺ならXMLDOMで全体取ってから
\nでsplitするかな。
168 名前：デフォルトの名無しさん mailto:sage [2009/11/09(月) 01:21:37 ]: StrBody = objIE.Document.Body.InnerHTML
lntPos = InStr(1, StrBody, Chr(13), 1)
これの戻り値がどうやっても0になってしまいます
対処法お願いします
169 名前：デフォルトの名無しさん mailto:sage [2009/11/09(月) 15:46:51 ]: Chr(13)？
170 名前：デフォルトの名無しさん mailto:sage [2009/11/09(月) 15:54:55 ]: >>169
段落コードのつもりなんですが
171 名前：デフォルトの名無しさん mailto:sage [2009/11/09(月) 16:38:05 ]: Chr(10)
172 名前：デフォルトの名無しさん mailto:sage [2009/11/09(月) 17:26:14 ]: 段落コード？
173 名前：デフォルトの名無しさん mailto:sage [2009/11/09(月) 17:33:14 ]: HTMLにおける「段落」をめぐって
ttp://www.asahi-net.or.jp/~WQ6K-YN/para.html
174 名前：デフォルトの名無しさん mailto:sage [2009/11/09(月) 18:32:24 ]: ソース？
175 名前：デフォルトの名無しさん mailto:sage [2009/11/09(月) 19:13:38 ]: >>170
ＨＴＭＬの段落はそっちでしたか
InStrが返す値が明らかに存在する文字を検索しても0になってしまうのはStrBodyが長すぎるせいなのでしょうか？
長さ制限は無いはずだしStrBodyをためしにechoで出力してみたらちゃんと表示されてるのでStringは収納されてるはずなんですが

>>167
ちょっとこちらも調べて見ます
176 名前：デフォルトの名無しさん mailto:sage [2009/11/09(月) 21:58:26 ]: ＞長すぎるせいなのでしょうか？
それはない
＞InStrが返す値が明らかに存在する文字を検索しても0になってしまう
それもない
177 名前：デフォルトの名無しさん mailto:sage [2009/11/09(月) 23:21:28 ]: >>176
無いはずなのは分かってるんですけどなぜかそうなってしまうんです
ためしにVBで>>168のIntPosをMsgBoxで出力しようとしてもなぜか0に
178 名前：デフォルトの名無しさん mailto:sage [2009/11/10(火) 01:02:57 ]: すみません
IntPos =　の部分がうまく変数として認識されていなかったのが問題だった見たいです
解決しました
179 名前：デフォルトの名無しさん mailto:sage [2009/11/10(火) 17:02:37 ]: 意味不明だが
on error resume next
でも使ってんのか？やめとけ
option explicit
は使っとけ
180 名前：デフォルトの名無しさん mailto:sage [2009/11/16(月) 22:17:29 ]: ttp://d.hatena.ne.jp/hasegawayosuke/20091028/p1
181 名前：デフォルトの名無しさん mailto:sage [2009/11/17(火) 15:03:31 ]: いみふ
結局使えないんだろ？
182 名前：デフォルトの名無しさん mailto:sage [2009/11/18(水) 20:01:43 ]: 以前は
cscript //e:jscript -
が使えたが
183 名前：デフォルトの名無しさん mailto:sage [2009/11/18(水) 22:00:30 ]: ？

>cscript //e:jscript -
WScript.Echo(WScript.Version);
^Z
5.7
184 名前：デフォルトの名無しさん mailto:sage [2009/11/22(日) 15:42:09 ]: >cscript //e:jscript -
入力エラー: スクリプトファイル "-" が見つかりません。
185 名前：デフォルトの名無しさん mailto:sage [2009/11/25(水) 02:05:32 ]: >cscript //e:jscript con
WScript.Echo(WScript.Version);
^Z
5.7
186 名前：デフォルトの名無しさん mailto:sage [2009/11/26(木) 12:03:39 ]: レンホウ「こんなロボット作って、なんになるんです？」
187 名前：デフォルトの名無しさん mailto:sage [2009/11/26(木) 18:04:00 ]: ロボットになるんです
188 名前：デフォルトの名無しさん mailto:sage [2009/11/28(土) 17:39:05 ]: >cscript //e:jscript con
CScript エラー: Windows Script Host の実行に失敗しました。 (この操作を完了するの
に十分な記憶域がありません。 )
189 名前：デフォルトの名無しさん mailto:sage [2009/11/28(土) 19:47:24 ]: 純粋なあの頃は仕事で追い詰められて自殺なんて都市伝説だと思ってたけど
今じゃ知り合いの失踪も自殺も体験した
190 名前：デフォルトの名無しさん mailto:sage [2009/12/02(水) 10:59:46 ]: 正規表現が文法的に正しいかどうかを判別する方法はありませんか
括弧が足りないとか教えてくれなくていい
スクリプトが異常終了しないでtrueかfalseを返してくれればいい
191 名前：デフォルトの名無しさん mailto:sage [2009/12/02(水) 18:48:37 ]: try catch
192 名前：デフォルトの名無しさん mailto:sage [2009/12/02(水) 19:26:27 ]: >>191
駄目だった
try {var re = /asd(fgh/;}
catch(e){WScript.echo("error");}
193 名前：デフォルトの名無しさん mailto:sage [2009/12/02(水) 19:36:59 ]: RegExp.compile
194 名前：デフォルトの名無しさん mailto:sage [2009/12/02(水) 19:58:42 ]: >>192
RegExp
195 名前：デフォルトの名無しさん mailto:sage [2009/12/05(土) 00:05:02 ]: wshで
var n=/a]b/;
と打ったらエラーが出ませんでした。他の括弧ならエラーが出ます。
エスケープ無しの右かぎ括弧ってなにか特別な意味はありますか？
この場合は、"a]bと続く三文字"と解釈して大丈夫なんですか？
196 名前：デフォルトの名無しさん mailto:sage [2009/12/05(土) 14:20:01 ]: ためせば？
197 名前：デフォルトの名無しさん [2009/12/13(日) 13:23:44 ]: Excel2003と2010が共存している環境で
WSHを使うことで両者を使い分けようとしています。
参考 : www.drk7.jp/MT/archives/001226.html

RegRead("HKEY_CLASSES_ROOT\\CLSID\\{00024500-0000-0000-C000-000000000046}\\LocalServer32\\").replace(/ \/[^ \/]+/g, '')
で、Excel 最新版（最後にインストールしたもの？）のパスは得られるのですが、古い方のパスを得られません。

何か良い方法はないでしょうか？
198 名前：デフォルトの名無しさん mailto:sage [2009/12/13(日) 13:24:56 ]: 今は決めうちで、「C:\Program Files\Microsoft Office\*\EXCEL.EXE」の * の部分を変えて存在確認をとって処理しています。
* の部分は、
Office2010 : office14
Office2007 : office12
Office2003 : office11
Office2002 : office10
Office2000 : office9
Office97 : office8
Office95 : office
であっているでしょうか？
よろしくお願いします。
199 名前：デフォルトの名無しさん mailto:sage [2009/12/13(日) 19:27:38 ]: ttp://support.microsoft.com/kb/234788/ja
200 名前：デフォルトの名無しさん mailto:sage [2009/12/15(火) 18:19:27 ]: EXCEL.EXEを検索してFileVersionで判定すべき
201 名前：デフォルトの名無しさん mailto:sage [2009/12/23(水) 00:00:12 ]: Office2010ってもう発売されてるんだ.....
202 名前：デフォルトの名無しさん [2009/12/23(水) 14:44:53 ]: さあ
203 名前：デフォルトの名無しさん mailto:sage [2009/12/23(水) 14:50:06 ]: office13は？
204 名前：デフォルトの名無しさん mailto:sage [2009/12/24(木) 09:35:19 ]: スレちがい
205 名前：デフォルトの名無しさん [2010/01/13(水) 18:31:33 ]: お願いだから教えてください。スレ違いかも知れないけどPower Shellスレないみたいだし・・

Windows Power Shell(2.0)でIEを起動してマウスクリックをエミュレートさせようとした場合、Win32API(mouse_event)を使うと思うんですが
DllImport("usr32.dll",Charset=Charset.Auto)でCharset = ←の=の後がどうとかいって、実行できません。Charsetのくだりを全削除すると今度は予期しない属性と出てしまいます。

mouse_eventにこだわりはないんですが
IEを立ち上げ
マウスクリックをエミュレートする

処理を教えてください。APIなら宣言部もお願い；；
206 名前：デフォルトの名無しさん [2010/01/13(水) 18:37:51 ]: 205ですけど

座標とかハードコーディングで大丈夫ですので肝を簡潔にお願い；；
207 名前：デフォルトの名無しさん mailto:sage [2010/01/13(水) 23:40:26 ]: スレちがい
Windows PowerShell 2.0 Part2
208 名前：デフォルトの名無しさん mailto:sage [2010/01/14(木) 00:07:23 ]: 普通はDOM使うんじゃなかろうか、いや知らんけど
209 名前：デフォルトの名無しさん mailto:sage [2010/01/14(木) 02:56:55 BE:1403990069-PLT(23400)]: >>207
URLも貼ってあげなよ

pc12.2ch.net/test/read.cgi/win/1261106064/
210 名前：デフォルトの名無しさん [2010/02/22(月) 21:41:34 ]: 次のように Folderオブジェクトの SubFolders でFolderコレクションを取得したとして、

　Set c = folder.SubFolders

これを For Each ではなくて以下のように For で処理したいです。

　For i = 0 To c.Count
　　:
　Next

このループの中で、i 番目のアイテムを取得するにはどうしたらよいでしょうか？
c(i) でも c.Item(i) でもダメでした。
211 名前：デフォルトの名無しさん mailto:sage [2010/02/22(月) 21:44:18 ]: c.Items(i)
212 名前：210 mailto:sage [2010/02/22(月) 21:50:27 ]: それだと
オブジェクトでサポートされていないプロパティまたはメソッドです。:'c.Items'
です。
ちなみに、c.Item("Test") みたいに、実在するフォルダ名を与えればフォルダオブジェクトは取って来れます。
それじゃ意味無いですが。
213 名前：デフォルトの名無しさん mailto:sage [2010/02/22(月) 22:06:18 ]: c(i).Value
c(i).Item()
214 名前：210 mailto:sage [2010/02/22(月) 22:17:28 ]: >>213
プロシージャの呼び出し、または引数が不正です。
215 名前：デフォルトの名無しさん mailto:sage [2010/02/22(月) 23:29:43 ]: Shell.Application の FolderItems のほうを使ったら？
216 名前：デフォルトの名無しさん mailto:sage [2010/02/25(木) 21:55:47 ]: 配列に入れて使え
217 名前：デフォルトの名無しさん mailto:sage [2010/02/25(木) 22:13:00 ]: For i = 0 To c.Count
j=0
　For Each f In c
If j=i Then Exit For
j=j+1
　Next
MsgBox f
Next
218 名前：デフォルトの名無しさん mailto:sage [2010/02/25(木) 22:55:24 ]: 番号は使えないみたいだな
ItemクリックしたらDictionaryに飛んだ

ttp://msdn.microsoft.com/en-us/library/9kcx47hd%28VS.85%29.aspx
219 名前：デフォルトの名無しさん mailto:sage [2010/03/01(月) 21:36:27 ]: test
220 名前：デフォルトの名無しさん [2010/03/05(金) 12:44:09 ]: WMI使ってリモートPCのIP変更したいんだが、変更後にRPCエラー待ちが発生して自動処理が難しい。
エラー待ちを無視するとか、なんかいい方法知ってる人がいたら助けて。

On Error Resume Next

strComputer = "10.1.1.1"
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")

Set colNetAdapters = objWMIService.ExecQuery _
("Select * from Win32_NetworkAdapterConfiguration where IPEnabled=TRUE")

For Each objNetAdapter in colNetAdapters
errEnable = objNetAdapter.EnableDHCP()
Next

[ 新着レスの取得/表示 (agate) ] / [ 携帯版 ]

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