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

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 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