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

1 名前：デフォルトの名無しさん [03/06/08 21:31] (　´ゝ`)　無ので立ててみた。 誰か詳しい情報ｷﾎﾞﾝﾇ 2 名前：デフォルトの名無しさん mailto:sage [03/06/08 21:31] 　　 　∧＿∧ 　　 　(*´Д｀) 　ｲﾔﾝ 　　　　 / ,ノ⌒ヾ、 　　　⊂⊂､___(＿,つ 3 名前：デフォルトの名無しさん mailto:sage [03/06/08 21:32] >>2 なんかかわいい。 4 名前：デフォルトの名無しさん [03/06/08 21:32] >>2 (:.;ﾟ;Д;ﾟ;.:)ﾊｧﾊｧ 5 名前：デフォルトの名無しさん mailto:sage [03/06/08 21:34] 　　 　∧＿∧ 　　 　(* ﾟДﾟ ) 　ﾅﾆﾐﾃﾝﾀﾞｺﾞﾙｧ 　　　　 / ,ノ⌒ヾ、 　　　⊂⊂､___(＿,つ 6 名前：デフォルトの名無しさん mailto:sage [03/06/08 21:34] Windows Scripting Host Laboratory www.roy.hi-ho.ne.jp/mutaguchi/wsh/wshtop.htm 7 名前：3 mailto:sage [03/06/08 21:35] >>5 なんかコワい… 8 名前：デフォルトの名無しさん [03/06/08 21:37] Windows Scripting Host ・WSH最新版DLサイト www.microsoft.com/downloads/details.aspx?displaylang=ja&FamilyID=E74494D3-C4E1-4E18-9C6C-0EA28C9A5D9D 9 名前：デフォルトの名無しさん mailto:sage [03/06/08 21:38] 拡張子を.vbsにすればいいんだよね？ 10 名前：デフォルトの名無しさん [03/06/08 21:40] >>9 そでつ。ほかにもあるっぽいですが 11 名前：デフォルトの名無しさん mailto:sage [03/06/08 21:41] 前もWSHスレ立って需要がなくて消えたんだよな 12 名前：１ [03/06/08 21:42] >>11 そいつは知らなかった・・・このスレ もそうなりそうな悪寒・・・ 13 名前：デフォルトの名無しさん [03/06/08 21:42] ウィルスを作るためのツール？ 14 名前：デフォルトの名無しさん mailto:sage [03/06/08 21:42] >>11 それをスレ立てる前に言ってくれ！ 無理か。 15 名前：デフォルトの名無しさん [03/06/08 21:43] とりあえず、最終目標としてはBOTもしくはウイルスを作るということでおｋかな？ 16 名前：デフォルトの名無しさん mailto:sage [03/06/08 21:45] なぜ需要がなかったかというと、Win板にすでに お前ら、wsh使ってますか？ Part2 pc2.2ch.net/test/read.cgi/win/1022248379/ というのがあって、そっちの方が盛り上がってたから。 前も結局そっちに誘導して終わった。 17 名前：_ mailto:sage [03/06/08 21:45] kame.kakiko.com/hiroyuki/jaz_b01.html 18 名前：デフォルトの名無しさん mailto:sage [03/06/08 21:45] >>15 それじゃぁ、削除対象… 19 名前：デフォルトの名無しさん [03/06/08 21:46] >>16 ヽ(`Д´)ﾉﾀﾃﾙﾏｴﾆｲｴﾖ! 20 名前：デフォルトの名無しさん [03/06/08 21:48] >>16 エンドユーザレベルか・・・・ まあ多分UNIX板にもシェルスクリプトのスレがあるんだろうけど。 21 名前：デフォルトの名無しさん mailto:sage [03/06/08 21:48] 　　　 ∧_∧ ∧__∧ 　＿ ( ´∀｀(・∀・ )__ < ネタが無いのに立てたんだね。ヴァカみたい♪ 　|≡（　11 )( 121 )≡| 　｀┳(__)(__) (__)(__)━┳ ,..,..┴,...,...,...,....,....,.....,....,┴,,,,.. 22 名前：デフォルトの名無しさん [03/06/08 21:51] そういえばなつかしのI love youウイルスも.vbsだったな 23 名前：デフォルトの名無しさん mailto:sage [03/06/08 21:52] >>21 んなさびしいこというなよぉ。 24 名前：デフォルトの名無しさん mailto:sage [03/06/08 21:52] c.Copy(dirsystem&"LOVE-LETTER-FOR-YOU.TXT.vbs") 25 名前：デフォルトの名無しさん [03/06/08 21:53] >>24 ｷﾀｷﾀｷﾀｷﾀｷﾀｰｰｰｰｰｰｰｰｰｰ 　|≡（　11 )( 121 )≡| 　｀┳(__)(__) (__)(__)━┳ 26 名前：デフォルトの名無しさん mailto:sage [03/06/08 21:53] >>24 のーとんが猛り狂ったように叫び出す、に10000ぬるぽ 27 名前：デフォルトの名無しさん mailto:sage [03/06/08 21:54] 質問厨がなんかこのスレ(板)…と言い出すに 5000ぬるぽ 28 名前：デフォルトの名無しさん mailto:sage [03/06/08 21:54] c.Copy(dirsystem&"\LOVE-LETTER-FOR-YOU.TXT.vbs") 29 名前：デフォルトの名無しさん [03/06/08 21:55] そういえば、>>24のコードの意味がいまだにようわからん 30 名前：27 mailto:sage [03/06/08 21:55] >>28 ああ、微妙に違ったのね。ﾀﾞﾏｻﾚﾀ! つか、つまらんですよ。 31 名前：デフォルトの名無しさん mailto:sage [03/06/08 21:58] >>20 だからエンドユーザレベルじゃないと需要ないんだって。 32 名前：エンドユーザー mailto:sage [03/06/08 22:00] ごめんなさい 33 名前：デフォルトの名無しさん mailto:sage [03/06/08 22:02] いや別にエンドユーザが悪いとかじゃなく、このスレに限らず需要無いところに立てても 悲しい結末にしか・・・ 34 名前：デフォルトの名無しさん mailto:sage [03/06/08 22:05] >>1さん、漏れもWin板あたりが妥当だと思うんですが… qb.2ch.net/saku/ 35 名前：デフォルトの名無しさん mailto:sage [03/06/08 22:08] >>1 つーことで削除依頼よろすく。 過去ログに消えたスレあるかな。あれば>>13みたいなレスでぐだぐだになって消えたのがわかると思う。 36 名前：デフォルトの名無しさん mailto:sage [03/06/16 12:36] この前、インストーラにexe作るのめんどくさかったから WSHでファイルコピー＆レジストリ登録をするスクリプト書いたら ノトーン先生に怒られた。 こりゃ、仕事じゃ使えないわ 37 名前：デフォルトの名無しさん [03/06/19 13:58] .vbs で処理しようとすると，ドロップするファイル数に限度があるようです。 回避する方法として，フォルダをドロップしようと考えていますが， 下記のどこを変えたらよいですか？ set arg=wscript.arguments set fs=createobject("scripting.filesystemobject") if 0<arg.count then for each item0 in arg set file=fs.getfile(item0) 38 名前：デフォルトの名無しさん mailto:age [03/07/17 15:47] 前もWSHスレ立って需要がなくて消えたんだよな 39 名前：デフォルトの名無しさん mailto:sage [03/07/17 17:16] Windows板でやるようなスレだしな。 40 名前：山崎 渉 mailto:（＾＾）sage [03/08/02 02:36] （＾＾） 41 名前：デフォルトの名無しさん [03/08/05 06:45] WSHでhttpを使ってWebサーバにGETやPOSTって出来ますか？ Socketでも構いません。WinInetをラッパーした物があれば万々歳。 42 名前：山崎 渉 mailto:（＾＾） [03/08/15 16:01] 　　　 (⌒V⌒) 　　　│ ＾ ＾ │＜これからも僕を応援して下さいね（＾＾）。 　　⊂|　　　　|つ 　　　（＿）（＿）　　　　　　　　　　　　　　　　　　　　　　山崎パン 43 名前：yawa mailto:age [03/08/16 04:11] HTMLアプリケーションて結構好きだなあ Mozillaにそれ使ったアプリなかったっけ 44 名前：yawa mailto:age [03/08/16 04:11] monazillaの間違え 45 名前：デフォルトの名無しさん mailto:sage [03/10/09 00:38] sage保守 46 名前：デフォルトの名無しさん [03/10/14 23:40] 固定長のファイルを開いて特定の位置を参照しに行って そのフィールドの内容が変わったらその内容をファイル 名として保存。 を出来なくなるまで繰り返すと言う構文を誰か作ってくれませんか？ 47 名前：デフォルトの名無しさん mailto:sage [03/10/18 06:06] >>46 スレの前半のほうに書いてあるがWin板のお前ら、WindowsScripting使ってますか？を利用したほうがいいのでは？ 多分、向こうに書き込めば11さん辺りが作ってくれるかもしれないですよ。 現行スレは多分pc2.2ch.net/test/read.cgi/win/1058829737/です。 48 名前：デフォルトの名無しさん [03/10/22 04:01] 現在起動中のプログラムの一覧を取得する方法を教えてください タスクマネージャで見れる程度の情報がリストにできればいいです 49 名前：スレの終了ダイアログを開いています… mailto:sage [03/12/06 19:40] ---------(begin)---------(ShutDown.js)---------(begin)--------- (WScript.CreateObject("Shell.Application")).ShutdownWindows(); ---------( end )---------(ShutDown.js)---------( end )--------- 50 名前：デフォルトの名無しさん mailto:sage [04/01/11 02:24] WScript.Sleep(100000000); 51 名前：デフォルトの名無しさん [04/02/27 00:59] ﾎｼｭ 52 名前：デフォルトの名無しさん mailto:sage [04/02/27 01:17] このスレのおかげでウィルスチェックが効いてウザ杉。 読めねえ。 53 名前：デフォルトの名無しさん mailto:sage [04/02/27 18:49] 意味わからん 54 名前：デフォルトの名無しさん mailto:sage [04/03/03 21:47] WScript.Echo("わかれ"); 55 名前：デフォルトの名無しさん mailto:sage [04/04/27 09:44] お前ら、WindowsScripting使ってますか？ Part3 pc5.2ch.net/test/read.cgi/win/1058829737/l50 56 名前：デフォルトの名無しさん [04/06/19 03:59] テキストファイルの印刷って出来ませんか？ 最終的には、WWWサーバで印刷したいのですが www.microsoft.com/japan/msdn/columns/server/server033099.asp に書かれているAddPrinterConnectionやAddWindowsPrinterConnectionを使用しても、 プリンタが見つかりません。のエラーになります。 EnumPrinterConnections で取得したプリンタ名を設定しても エラーとなります。 どなたか教えてください。 57 名前：デフォルトの名無しさん mailto:sage [04/06/25 10:01] ｎｏｔｅpad /p 58 名前：デフォルトの名無しさん [04/07/24 19:18] .batファイルよりもWSH使った方が色々出来そうだね。 59 名前：デフォルトの名無しさん [04/08/08 02:43] set shell = createobject("wscript.shell") do ret=shell.Popup("sage",1,,0) loop 60 名前：デフォルトの名無しさん mailto:sage [04/08/08 11:00] 　　　　∧　∧ 　　　（*・∀・*） 　ｲﾔﾝ 　　　　 / ,ノ⌒ヾ、 　　　⊂⊂､___(＿,つ 61 名前：デフォルトの名無しさん mailto:sage [04/08/18 05:45] (:.;ﾟ;Д;ﾟ;.:)ﾊｧﾊｧ 62 名前：デフォルトの名無しさん [04/08/19 07:42] SendToでショートカット渡すとリンク先のファイルのあるディレクトリをExplorerで開くスクリプトってどうやって書けばいいの？ 63 名前：デフォルトの名無しさん mailto:sage [04/08/19 07:48] open 64 名前：pakuchan [04/08/19 09:45] Windowsのログオン時に，パスワードをキーボードから入力しますが，これを RS232CやUSBで接続した認証用センサ（例えば指紋センサ）による認証方式 にするための方法について調べています． 別スレで同じような質問をし，サービスプログラムの作成が必要でないかと コメントをいただいたのですが，サービスプログラムについてもよくわかりません． まず，サービスプログラムで可能なのか，また可能であれば作成方法について教え ていただけないでしょうか？ 65 名前：デフォルトの名無しさん mailto:sage [04/08/19 09:51] ハードは外から買って来るんだろ? 普通ハードにSDKやソフトウェアがついてると思うが。 66 名前：pakuchan [04/08/19 10:20] 具体的なところでICカードを考えているんですが，リーダーの制御コマンドしか 公開されていません． 67 名前：デフォルトの名無しさん mailto:sage [04/08/19 12:33] WindowsNT系OSはログオンにGINA APIを使う。 www.cisnet.or.jp/home/tsuneoka/win32tech/6.html GINAのサードパーティ製品（SDK？）あるようだがよくらん。 あとすれ違い。 68 名前：pakuchan [04/08/19 15:13] GINAについての情報有難うございました． 69 名前：デフォルトの名無しさん mailto:sage [04/08/20 12:51] >>62 if (WScript.Arguments.length != 1) WScript.Quit(); var file = WScript.Arguments(0); var folder = file.substr(0, file.lastIndexOf("\\")); var shell = WScript.CreateObject("Shell.Application"); var shFolderItems = shell.NameSpace(folder).Items(); for (var i = 0; i < shFolderItems.Count; i++) { var item = shFolderItems.Item(i); if(item.Path == file) { if (item.IsLink) { var target = item.GetLink.Target; shell.ShellExecute("explorer.exe", "/select,\"" + target.Path +"\""); } else { shell.ShellExecute("explorer.exe", "/select,\"" + file + "\""); } break; } } 70 名前：デフォルトの名無しさん mailto:sage [04/08/25 12:50] VBScriptでGUIDは作れんですか？ 71 名前：デフォルトの名無しさん [04/10/26 21:29:41] すでに起動しているアプリケーション（ウィンドウ）を ひとつだけ最小化させるWSHプログラムは組めますか？ アプリケーション名はわかりますが、 ウィンドウ名は先頭から10数文字までは固定ですが その後ろは不定なので正規表現とかで指定になると思います 72 名前：デフォルトの名無しさん mailto:sage [04/10/27 00:26:03] set WshShell = WScript.CreateObject("WScript.Shell") WshShell.AppActivate("Title") WScript.Sleep 100 WshShell.SendKeys("%( N)") 73 名前：デフォルトの名無しさん [04/10/27 06:54:57] クリップボードにStringを書き込み方法を教えてください。 74 名前：デフォルトの名無しさん mailto:sage [04/10/27 09:45:57] >>72 （ﾟ∀ﾟ）ｻﾝｸｽｺ 75 名前：71 mailto:sage [04/10/27 10:02:28] >>72 この方法だと、対象アプリがすでに最小化されていたときにも 一度フォアグラウンドに引っ張ってきて、その上で最小化しますね またSendkeyはフォアグラウンドのアプリに送られるっぽいから 対象アプリが最前面に来る前に100ms経ってしまうと 違うアプリが最小化されてしまいました 直接対象アプリにSendkeyするのってなんか方法ありましたっけ？ 76 名前：72 mailto:sage [04/10/27 10:30:43] >>75 多分無理かと。 適当にSleepの時間を調整するしかないのでは？ >>73 var str = "hoge"; var ie = WScript.CreateObject("InternetExplorer.Application"); ie.Navigate("about:blank"); while(ie.Busy){ WScript.Sleep(100); } ie.Document.parentWindow.clipboardData.setData("text", str); ie.Quit(); by googleの検索結果の上から3番目くらい（特殊文字の処理は省略） 一番上に出てくるやつをダウンロードしてもいいと思うけど。 77 名前：71 mailto:sage [04/10/27 13:01:09] たまに、最前面に出てきてもアクティブにならないときもあり そのときはsleep時間延ばしてても全然違うアプリが閉じてしまう。 むぅぅ。これ以上はWSHでは無理っぽ？ 78 名前：デフォルトの名無しさん [04/10/27 21:26:28] >>76 ありがとうございます。 調べたときにIEとか出てきて「なぜ？」って疑問も 教えてもらったclipboardDataからぐぐって IE呼び出してるんだろうって謎も解けました。 79 名前：デフォルトの名無しさん mailto:sage [04/10/31 01:55:53] >>76 とても、ためになりました。 str = "hoge" Set ie = WScript.CreateObject("InternetExplorer.Application") ie.Navigate("about:blank") Do While ie.Busy = True WScript.Sleep(100) Loop Dummy = ie.Document.parentWindow.clipboardData.setData("text", str) ie.Quit() 当方、VBS派ですが、期待した動作でした。 これまで、IEが立ち上がって来るのかと思って使ってませんでした。 これまでは、VBO4WSH.EXE で、VBのClipboadObj を使えるように してました。 便利だけど、インストールしないといけないのが面倒なんですよね。 ttp://rd.vector.co.jp/soft/win95/util/se303229.html 80 名前：79 mailto:sage [04/10/31 08:22:25] SendKeys を使って、"~"や"%" を送ろうとしても、それぞれ、[Enter]や[Alt] に変換されてしまって、 ファイル名のダイアログボックスに、名前を上手く入力できず困っていました。 でも、Clipboard の中に SetData("~ %") しておいて、Sendkeys（"＾V"）《貼り付け》 してしまえば、上手く行きそうな気がしてきました。 まだ試してないけど、あとでためしてみます。 問題を解くきっかけを作っていただき、ありがとうございました。 81 名前：デフォルトの名無しさん mailto:sage [04/10/31 12:13:38] >>80 ttp://www.microsoft.com/japan/msdn/library/ja/script56/html/wsmthsendkeys.asp 82 名前：デフォルトの名無しさん mailto:sage [04/11/02 16:50:19] CreateObjectもできて dir /b | sortとかもできるWSHなスクリプトってないの？ VBSってすごい面倒。 83 名前：デフォルトの名無しさん [04/11/03 22:56:06] WSHでセキュリティのイベントログを削除するスクリプトを perlで作ったですがエラーがでて困ってます。 　# cscript script.pls でコマンド実行すると 　# PerlScript Error: (in cleanup) Can't call method "ClearEventlog" on an undefined value とエラーになります。 環境はWindows XPにActivePerl 5.8.4です。 どこが悪いのでしょうか。改善点をお願いします。 以下ソースです。 use Win32::OLE; open(LOG, "eventquery.vbs /v /fo csv /l Security |"); @data = <LOG>; close(LOG); $strComputer = "."; $wmi = Win32::OLE->GetObject( "WinMgmts:{impersonationLevel=impersonate}!//" . "$strComputer\\root\\cimv2" ); $colLogs = $wmi->ExecNortificaitonQuery( "Select * from Win32_NTEventLogFile where LogFileName='Security'" ); foreach $objEvent ($colLogs) { $objEvent->ClearEventLog(); } 84 名前：80 mailto:sage [04/11/04 00:24:57] >>81 どうもありがとうございます。こんな仕様になっていたのですね。 clipboard でのテキスト処理も使えるし、Sendkeys も小技が利くしで、 私のやりたい事の９割方は、WSHでほとんど事足りてしまいます。 85 名前：デフォルトの名無しさん mailto:sage [04/11/06 05:42:20] >>83 何やってるのか知らんけど、colLogsが配列なら$じゃなくて@colLogsなのでは？ もし配列へのポインタなら、foreachで使うところで @$colLogs にするとか。 いずれにせよスカラー値がforeachの中にあるのは気持ち悪い。 ってWSHの話じゃないじゃん・・・ 86 名前：83 mailto:sage [04/11/06 09:55:39] >>85 エラーの場所がClearEventLog()メソッド呼び出しのところなのでWSHスレッドで良いのかなと。 VBSなら　ClearEventLog() でイベントログを削除出来るはずなんですけど perlでやろうとするとエラーになるので何故かと思って。(perl使うなって話はなしで) 87 名前：デフォルトの名無しさん mailto:sage [04/11/07 16:06:26] >>86 (>>83) おまえ人の話聞いてないだろ。もっと >>85 の言ってることちゃんと考えろや。 foreach $objEvent ($colLogs) { $objEvent->ClearEventLog(); } $objEvent が undefined だから # PerlScript Error: (in cleanup) Can't call method "ClearEventlog" on an undefined value になるのは当たり前だろ。 88 名前：83 mailto:sage [04/11/08 00:18:45] >>87 foreach の ( ) の中を @colLogs としても同じく "undefined value" とエラーがでます。 @$colLogs とすると実行は出来たのですが foreach の中の処理をしてくれません。(実行しても何も起こらない) WMIの呼び出しが間違っているんですかね？ perlでWMI扱う情報がweb上にほとんどなく、 どうすればいいのかよくわからないので知恵を貸してください。 追加で質問なんですが、文字コード/改行コードはEUC-JP/CRLFでよろしいんですか？ 89 名前：83 mailto:sage [04/11/08 00:25:04] ちなみにwebで見つけたVBでログをクリアする方法です(バックアップする処理も含まれていますが) perlへ移植するにはどうすればよいでしょう ---------------------------------------------------------------- Set objWMIService = GetObject("winmgmts:" _ 　 & "{impersonationLevel=impersonate,(Backup)}!\\" & _ 　 　 　strComputer & "\root\cimv2") Set colLogFiles = objWMIService.ExecQuery _ 　 ("Select * from Win32_NTEventLogFile where LogFileName='Application'") For Each objLogfile in colLogFiles 　 objLogFile.BackupEventLog("c:\scripts\" & strBackupName & _ 　 　 "_application.evt") 　 objLogFile.ClearEventLog() Next 90 名前：デフォルトの名無しさん mailto:sage [04/11/08 06:13:37] >>89 SQL使える人ならできるだろ 91 名前：85 mailto:sage [04/11/08 06:28:52] >>83 できたぞ。喜べ。 検索キーワードは「"Win32::OLE" コレクション」。 OLEの世界のコレクションはperlの世界では単なるポインタなので、 そのままではループをまわせない。 それをどうやって扱うのか？ 専用のWin32::OLE::Enumモジュールを使えばいいらしい。 以下コード。 use Win32::OLE; use Win32::OLE::Enum; $strComputer = "."; $objWMIService = Win32::OLE->GetObject( 　"winmgmts:{impersonationLevel=impersonate,(Backup)}!\\\\". 　"$strComputer\\root\\cimv2"); $colLogFiles = $objWMIService->ExecQuery 　("Select * from Win32_NTEventLogFile where LogFileName='Application'"); $enum = Win32::OLE::Enum->new($colLogFiles); while (defined($item = $enum->Next)) { 　$item->BackupEventLog("c:\\scripts\\test_application.evt"); 　$item->ClearEventLog(); } 92 名前：デフォルトの名無しさん mailto:sage [04/11/08 14:20:32] すげー 93 名前：デフォルトの名無しさん mailto:sage [04/11/08 18:03:32] 結論、VBS使え。 94 名前：83 mailto:sage [04/11/10 10:39:32] >>91 おおぉお！ありがとうございます！感動して目の前が潤んでいます perlのポインタの扱いについてよく理解できてませんでした。 精進します　ありがとうございました 95 名前：デフォルトの名無しさん [04/11/17 11:36:35] JScriptから、INIファイルを読みたいのですが何かいい方法はないでしょうか？ Win32APIでいうならgetPrivateProfileStringみたいなのを探しています。 よろしくお願いします。 96 名前：デフォルトの名無しさん mailto:sage [04/11/17 18:02:53] 素直にFSOでテキストファイル処理してもたいした手間じゃないと思うけど。 97 名前：デフォルトの名無しさん mailto:sage [04/11/18 01:18:26] ウィンドウの無いプロセスを終了→起動させたいのだけど、 終了のさせ方がわかりません。ウィンドウがあれば、 >>72でできそうなんですが。 98 名前：デフォルトの名無しさん mailto:sage [04/11/18 02:34:30] >>97 WMI を使う。 www.microsoft.com/japan/technet/scriptcenter/process/scrpcs07.mspx 99 名前：97 mailto:sage [04/11/20 01:43:21] >>98 有難う！　と言いたいのですが、WSHでないのが残念！ です。 100 名前：デフォルトの名無しさん mailto:sage [04/11/20 03:18:16] そいつは残念だ。

---

---

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

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