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

1 名前：デフォルトの名無しさん [2008/04/23(水) 20:00:50 ] (　´ゝ`)　誰か詳しい情報ｷﾎﾞﾝﾇ ●過去スレ WSH(・∀・)ｽﾚｯﾄﾞ! pc11.2ch.net/test/read.cgi/tech/1055075469/ WSH(・∀・)ｽﾚｯﾄﾞ! Part 2 pc11.2ch.net/test/read.cgi/tech/1176698934/ ●関連スレ お前ら、wsh使ってますか? Part7 pc11.2ch.net/test/read.cgi/win/1190548945/ HTAをもっと流行らせる計画 pc11.2ch.net/test/read.cgi/tech/1124559962/ ★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 191 名前：デフォルトの名無しさん mailto:sage [2008/08/03(日) 03:39:35 ] For Each ObjFile in CreateObject("Scripting.FileSystemObject").getFolder(CreateObject("Wscript.Shell").CurrentDirectory).Files 　　ObjFile.name = "new" & ObjFile.name 　　msgbox ObjFile.name Next フォルダに2つのファイルがあり、上記を実行します。 Forで2ループしてほしいのですが、4ループします。 なぜですか？ 192 名前：デフォルトの名無しさん mailto:sage [2008/08/03(日) 03:55:42 ] ループの中でリネームするから 193 名前：デフォルトの名無しさん mailto:sage [2008/08/03(日) 08:07:09 ] >>191 普通に２回しか回らないぞ (@Windows2000SP4) 194 名前：デフォルトの名無しさん mailto:sage [2008/08/03(日) 14:43:26 ] a ->newa b ->newb newa -> newnewa newb -> newnewb 195 名前：デフォルトの名無しさん mailto:sage [2008/08/03(日) 16:47:09 ] それが起るなら、無限ループになりそうなもんだが。 196 名前：デフォルトの名無しさん mailto:sage [2008/08/03(日) 22:38:20 ] 隠しファイルが2つあるとか 197 名前：デフォルトの名無しさん mailto:sage [2008/08/03(日) 23:19:39 ] ファイル名によるんじゃないの？ ファイルのコレクションを得る時内部でどういったソートしてんのか知らんけど。 リネーム後のファイルが、処理済ファイルと未処理ファイルのどちらに振り分けられるかの違い。 経験則でいうと、ファイルコレクションに対してリネーム処理をするといったような場合は 一旦全ファイル名の配列を得るとかして、 その配列に対して、即ち明示的にファイル名を指定してループ処理しなければおかしくなる。 for ... in でコレクションからひとつひとつファイルを取り出しつつリネームしていく、 といったオンザフライな処理では恐らく望んだ結果は得られない。 リネームすることで大元のコレクションの内容がリアルタイムで変わっちゃう感じ。 泥臭いけど俺はいつもこうしてる。 var f1 = objFSO.GetFolder(folderspec); var f2 = new Enumerator(f1.Files); var arr = new Array(); for (; !f2.atEnd(); f2.moveNext()) arr.push(f2.item().Name); var f, i; for (i = 0; i < arr.length; i++) {     f = objFSO.GetFile(objFSO.BuildPath(folderspec, arr[i]));     f.Name = "new" + f.Name; } 198 名前：デフォルトの名無しさん mailto:sage [2008/08/04(月) 05:15:53 ] 自分もそこでよく悩んだな ループ中でリネームするとリネーム後のファイルがFilesコレクションに追加されてそのファイルも処理対象になっちゃうんだよな そして延々と"new"が付加されていく それ理解するのに時間かかった 199 名前：191 mailto:sage [2008/08/04(月) 05:24:31 ] >>192　たしかにリネームしなければ正常です。 >>193-195　回る数は2,3,4と不定ですが、無限はないです。 >>196　隠しファイルはないです。 >>197　 ＞コレクションの内容がリアルタイムで変わっちゃう感じ 特にこの一言でイメージできて分った気がします。 なので頑張ったのですが、どうしてもコードが読めません。 >>197をVBScriptにしてくれないでしょうか？ 200 名前：デフォルトの名無しさん [2008/08/04(月) 05:47:12 ] ええええ！？ 201 名前：デフォルトの名無しさん mailto:sage [2008/08/04(月) 07:07:03 ] うちも普通に2回しか回らないよ、XP SP3 202 名前：デフォルトの名無しさん mailto:sage [2008/08/04(月) 08:10:08 ] >>199 コード読めなくても、その上で文章説明してるんだから その通りにVBSで書けば良いだけだろ ここはPC初心者板ではなくプログラム技術板なので ここに来る以上、そのくらいは自分でやれなくちゃね 203 名前：デフォルトの名無しさん mailto:sage [2008/08/04(月) 11:03:45 ] 「PC初心者板」という言葉を持ち出してくる奴は この板で有名な基地外の特徴なので 構わなくていいですよ。 204 名前：デフォルトの名無しさん mailto:sage [2008/08/04(月) 11:04:03 ] 普通に2回しか回らないね。(XP SP3) 2回以上回ってる人はどんな環境でやってるの？ 205 名前：デフォルトの名無しさん mailto:sage [2008/08/04(月) 11:11:10 ] プログラミングに関しては全く初心者なんで、変なこと言ってるかも知れないけど For Each ObjFile in CreateObject("Scripting.FileSystemObject").getFolder(CreateObject("Wscript.Shell").CurrentDirectory).Files これって毎回オブジェクト作ってるわけじゃなくて、最初の1回作ったときに コレクションは出揃ってメモリに書き込まれるというわけじゃないの？ 2回以上回る時は内容にアクセスするたびにオブジェクトを作り直してるわけ？ 206 名前：デフォルトの名無しさん mailto:sage [2008/08/04(月) 15:00:36 ] For Each ObjFile in CreateObject("Scripting.FileSystemObject").getFolder(CreateObject("Wscript.Shell").CurrentDirectory).Files If Left(ObjFile.name,3)<>"new" Then ObjFile.name = "new" & ObjFile.name 　　msgbox ObjFile.name Next で、どう？ 207 名前：デフォルトの名無しさん mailto:sage [2008/08/04(月) 15:03:32 ] For Each ObjFile in CreateObject("Scripting.FileSystemObject").getFolder(".").Files 208 名前：デフォルトの名無しさん mailto:sage [2008/08/04(月) 15:12:10 ] ＞2回以上回る時は内容にアクセスするたびにオブジェクトを作り直してるわけ？ 作り「直して」るわけ、ではなかろう 209 名前：199 mailto:sage [2008/08/04(月) 16:48:49 ] >>202の言う通りですね。 >>199レスでのコード依頼は、躊躇しながらも書いてしまったのですが、 やはり場違いなので取り消します。 さまざまなレスありがとうございます。 210 名前：デフォルトの名無しさん mailto:sage [2008/08/04(月) 18:34:22 ] 環境書いておくれよ 211 名前：デフォルトの名無しさん mailto:sage [2008/08/04(月) 21:27:00 ] XPSP2/WSH5.7 上の簡単なリネームで試してみたら2回だったけど ちょっと前に書いた自分のごちゃごちゃしたリネームのスクリプトだと なんかリネームしたのが追加された覚えがあるな… 特定のメソッドを使ったりとかでコレクションへの追加が発動するんかな そのスクリプトもどこかいったから確かめようがないな、ごめんよ 212 名前：デフォルトの名無しさん mailto:sage [2008/08/04(月) 22:21:43 ] For Each ObjFile in Folder.Files 　　ObjFile.name = "new" & ObjFile.name 　　msgbox Folder.Files.Count Next してみ 213 名前：デフォルトの名無しさん mailto:sage [2008/08/04(月) 22:42:35 ] VBscriptでApplication型のオブジェクトの宣言ってもしかして出来ない？ 214 名前：デフォルトの名無しさん mailto:sage [2008/08/04(月) 23:01:07 ] >>212 普通に2が2回表示されたよ XP SP3 215 名前：デフォルトの名無しさん mailto:sage [2008/08/04(月) 23:10:30 ] >>191 Set Files = CreateObject("Scripting.FileSystemObject").getFolder(CreateObject("Wscript.Shell").CurrentDirectory).Files For Each File In Files 　File.Name = "new" & File.Name For Each File1 In Files 　　WScript.Echo File1.Name 　Next Next ってやると、Files の内容はリアルタイムに変わってる。 でも、外側のループは正常に２回しか回らない。 ファイルをコピーするようにすると、Files はちゃんと増えるけど、 それでも外側のループは最初にあったファイルしか対象にしない。 なので、For Each の In に続く部分は一回しか評価してないみたい。 じゃあと言うことで、ループ中にファイルを削除すると今度は削除 した奴はそ知らぬ顔でスキップする。 う〜む、どうやっても >>191 の４ループは再現しない。 とりあえず、環境と再現した時のファイル名を書いてくれないか。 >>213 VBScript ではそもそも型付の宣言なんかできません。 216 名前：デフォルトの名無しさん [2008/08/04(月) 23:14:33 ] >>213 createobject("Excel.Application") createobject("Word.Application") createobject("Autocad.Application") 217 名前：197 mailto:sage [2008/08/04(月) 23:20:45 ] >>212 リネームすることでコレクション内のポインタ（moveNext() で動くやつ）の位置に （恐らく）不整合が出るだけであって、ファイル数自体が増えるわけではないよ。 「(元のファイル名) -> (リネーム後のファイル名) (コレクションの要素数)」という フォーマットで結果を吐き出すスクリプト。（当方環境：Me/WSH5.6） var targetDir = "C:\\TEST"; // '1.TXT'、'2.TXT' の2枚のファイルが入っている。 var objFSO = WScript.CreateObject("Scripting.FileSystemObject"); var fo = objFSO.GetFolder(targetDir); var fc = fo.Files; var fe = new Enumerator(fc); var filename = ""; var arr = new Array(); for (; !fe.atEnd(); fe.moveNext()) {     filename = fe.item().Name;     fe.item().Name = "_" + fe.item().Name; ... (a)     //fe.item().Name = "~" + fe.item().Name; ... (b)     arr.push(filename + " -> " + fe.item().Name + " (" + fc.Count + ")"); } WScript.Echo(arr.join("\n")); （「改行が多い」と怒られたので結果は次） 218 名前：197 mailto:sage [2008/08/04(月) 23:21:34 ] 結果： (a) 1.TXT -> _1.TXT (2) 2.TXT -> _2.TXT (2) _1.TXT -> __1.TXT (2) (b) 1.TXT -> ~1.TXT (2) 2.TXT -> ~2.TXT (2) ~1.TXT -> ~~1.TXT (2) ~2.TXT -> ~~2.TXT (2) ~~2.TXT -> ~~~2.TXT (2) 219 名前：デフォルトの名無しさん [2008/08/04(月) 23:26:39 ] varってみるとVARIANT思い出すよ・・・orz 220 名前：197 mailto:sage [2008/08/04(月) 23:27:50 ] ×fe.item().Name = "_" + fe.item().Name; ... (a) ×//fe.item().Name = "~" + fe.item().Name; ... (b) ○fe.item().Name = "_" + fe.item().Name; // ... (a) ○//fe.item().Name = "~" + fe.item().Name; // ... (b) 行末、コメントアウトするの忘れました。 221 名前：197 mailto:sage [2008/08/04(月) 23:42:35 ] 他にもいろいろとファイル名とプレフィックスを変えて試してみたけど、 はっきり言って予測不能な振る舞いをします。 今のところ、初期条件（ファイル名とプレフィックス）が同じであれば 何度試行しても結果が再現されている感じです。 222 名前：197 mailto:sage [2008/08/05(火) 00:23:27 ] 今回はリネーム作業でしたが、例えば Attributes プロパティを変更する処理では このような問題は発生しませんでした。 223 名前：デフォルトの名無しさん mailto:sage [2008/08/05(火) 00:31:31 ] それって、予測不能って言わないよな 224 名前：デフォルトの名無しさん mailto:sage [2008/08/05(火) 00:38:51 ] そもそも、JScript と vbs じゃ処理が違って当たり前だと思うが。 225 名前：デフォルトの名無しさん mailto:sage [2008/08/05(火) 00:52:18 ] JScriptとVBScriptの処理の違いなんて今誰も問題にしていないが 226 名前：デフォルトの名無しさん mailto:sage [2008/08/05(火) 01:05:26 ] jsとvbsでは結果が違うぞっつー話じゃなくて jsにしろvbsにしろコレクションのリネーム処理で おかしなことが起こるぞっつー話だ罠 227 名前：デフォルトの名無しさん mailto:sage [2008/08/05(火) 06:52:54 ] >>217-218 XPじゃ再現しないなー (a) 1.TXT -> _1.TXT (2) 2.TXT -> _2.TXT (2) (b) 1.TXT -> ~1.TXT (2) 2.TXT -> ~2.TXT (2) 9xかFATに原因があるって事なのかな 228 名前：デフォルトの名無しさん mailto:sage [2008/08/05(火) 08:32:51 ] 理屈が分からんと気味悪いね。 これって有名な不具合なんだろうか。 NT系だと絶対に大丈夫なのかな？ 229 名前：デフォルトの名無しさん mailto:sage [2008/08/05(火) 20:21:32 ] WSHとは関係ないけど、Win32APIのFindFirstFileでも同様なことが起こったことがある。 そのときも環境によっておこったりおこらなかったりしたんだが、 同じWin2000でFAT32のドライブとNTFSでFAT32の方だけリネームされた物も引っかかった。 USBメモリ(FAT)でもおこったので、フォーマットの仕様かファイルシステムの問題なのかは 分からないが、とりあえず重複することを前提にしてからそのときは対策した。 230 名前：デフォルトの名無しさん mailto:sage [2008/08/05(火) 21:43:30 ] FATかと思ってフロッピー（USB接続）にファイル置いて>>217を何回かやってみたら FAT→VFATになるタイミングで発生した！XP SP3 11111111.TXT -> _11111111.TXT (2) 22222222.TXT -> _22222222.TXT (2) _11111111.TXT -> __11111111.TXT (2) _22222222.TXT -> __22222222.TXT (2) __11111111.TXT -> ___11111111.TXT (2) __22222222.TXT -> ___22222222.TXT (2) FAT→FATやVFAT→VFATだと発生しなかった。 でも他の環境では再現しないとか普通にありそうだな・・・。 231 名前：デフォルトの名無しさん mailto:sage [2008/08/06(水) 00:16:15 ] >>229 FindNextFile の説明にこんな記述がある。 The order in which this function returns the file names is dependent on the file system type. With the NTFS file system and CDFS file systems, the names are usually returned in alphabetical order. With FAT file systems, the names are usually returned in the order the files were written to the disk, which may or may not be in alphabetical order. However, as stated previously, these behaviors are not guaranteed. 簡単に言うと、 NTFS や CDFS だと大抵アルファベット順になるけど、FAT は書いた順になるよ。 でも、保証なんてしないからね。 と言うことなので、ここら辺の動作がファイルシステムで違うのは仕様と言うことらしい。 232 名前：デフォルトの名無しさん mailto:sage [2008/08/06(水) 00:56:08 ] 順番が違うだけなら仕様の一言で納得するけど、 例のリネームし過ぎ現象は仕様としては到底受け容れ難いな。 もはや不具合だ。 そもそもリネームでタイムスタンプは更新されないけどな。 ディレクトリエントリは書き換えるだろうけど。 233 名前：デフォルトの名無しさん mailto:sage [2008/08/06(水) 01:14:44 ] やっぱり一旦配列に書き出すなりした方が無難ってことすかね めんどいなぁ 234 名前：デフォルトの名無しさん mailto:sage [2008/08/06(水) 01:24:00 ] >>206にしとけ 235 名前：デフォルトの名無しさん mailto:sage [2008/08/06(水) 01:24:54 ] >>232-233 フォルダの内容を取得中にフォルダの中身変えたら取得内容を 保証できないのはある程度理解できる。 システム側で保持しておくと言う方法もあるけど、スゲーたく さんファイルがあるフォルダの最初の数個を取得したい時に 全部のファイル名を取得されるまで Folder.Files が返ってこ ないと言うのもちょっと困ったもんだと思う。 236 名前：デフォルトの名無しさん mailto:sage [2008/08/06(水) 01:27:53 ] 全然一般性ないじゃん。 第一オリジナルファイル名が「new」で始まらない保証がない。 237 名前：236 mailto:sage [2008/08/06(水) 01:28:46 ] >>234宛て、な。 238 名前：デフォルトの名無しさん mailto:sage [2008/08/06(水) 01:30:46 ] >>206=>>234 ダメグラマの典型だろ。 239 名前：デフォルトの名無しさん mailto:sage [2008/08/06(水) 01:38:51 ] 一般性が必要か？ 240 名前：デフォルトの名無しさん mailto:sage [2008/08/06(水) 01:41:58 ] 一般性のある回避策（配列に書き出す）が提示されているのに 「運がよければ通用するかもしれない>>206の方法」に拘泥する理由は？ 241 名前：デフォルトの名無しさん mailto:sage [2008/08/06(水) 01:49:05 ] 質問者の技術力 242 名前：デフォルトの名無しさん mailto:sage [2008/08/06(水) 01:50:57 ] 一般性の有る方法をコーディングするのに 多大なコストがかかるというのなら とりあえず今だけ通用すればいいという 一般性の無いその場凌ぎな方法を採るのも 場合によっちゃアリだが 今の場合大してコストもかからないからな 243 名前：デフォルトの名無しさん mailto:sage [2008/08/06(水) 01:52:27 ] >>199 244 名前：デフォルトの名無しさん mailto:sage [2008/08/06(水) 02:37:31 ] 普通はクラスライブラリからごりごり作っていくもんなの？ 俺はコスト度外視日曜な人だから作ってる過程でライブラリが出来ていくって感じなんだけど。 日曜な人だからライセンス度外視で使えるライブラリは使うし。 245 名前：デフォルトの名無しさん mailto:sage [2008/08/06(水) 21:31:01 ] 趣味なら何でもアリ、好きなようにやればよろし。 仕事なら、職場やプロジェクトの方針に従えばよろし。 246 名前：デフォルトの名無しさん mailto:sage [2008/08/06(水) 22:12:15 ] WSHのプロジェクトw 247 名前：デフォルトの名無しさん mailto:sage [2008/08/06(水) 22:46:37 ] プロジェクトの成果物が WSH オンリーと言うのは見たことないけど、 一部の成果物が WSH と言うのなら見たことあるぞ。 248 名前：デフォルトの名無しさん mailto:sage [2008/08/06(水) 23:37:46 ] Set ArrayList=CreateObject("System.Collections.ArrayList") For Each ObjFile in CreateObject("Scripting.FileSystemObject").getFolder(".").Files ArrayList.Add ObjFile Next For Each ObjFile in ArrayList ObjFile.name = "new" & ObjFile.name Next 249 名前：デフォルトの名無しさん mailto:sage [2008/08/07(木) 02:00:25 ] System.Collections.ArrayListってなんぞな？ どとねととか言うヤツ？ 検索したら一部をvbsでも利用できるのがあるのかぁ 250 名前：デフォルトの名無しさん mailto:sage [2008/08/07(木) 02:27:19 ] vbsで.NETFrameworkを利用できるらしいけど 使えるってこととArrayListの例がちょこっとあるだけで リファレンス的なものがみつからないんだよなぁ 251 名前：デフォルトの名無しさん mailto:sage [2008/08/07(木) 05:31:04 ] >>250 .NET Frameworkが使えるというよりも、特定の条件を満たしたCOMを CreateObjectで使えるってだけだから、.NET Framework以外のCOMも 使える物があるし、.NET FrameworkでCOMがHKEY_CLASS_ROOTに 登録されていても使えない物もある。 WSHから扱えるクラスの網羅的な資料が提供されないままPowerShellが 出てきたってことは、MSとしてはPowerShellを使ってほしいんだろ。 252 名前：デフォルトの名無しさん mailto:sage [2008/08/07(木) 10:03:48 ] 便利そうなのをちょっと使えるってだけっぽいね。 中途半端な対応は混乱するだけなのに。。。 PowerShellって現在の環境に導入するには 別途インストールしなければならないから導入しづらいんだよな。 253 名前：デフォルトの名無しさん mailto:sage [2008/08/07(木) 12:32:46 ] 同じ高さにしてほしいな、WSHとPS 254 名前：デフォルトの名無しさん mailto:sage [2008/08/07(木) 18:00:21 ] vbsでSystem.Collections.ArrayListを使えば自分でせこせこ自作ソートを記述しなくてもいいのか 自分でソート書くのが面倒でjsを使うようになったらjsのオブジェクトがいじりやすくて慣れちゃったよ 255 名前：デフォルトの名無しさん mailto:sage [2008/08/07(木) 19:13:52 ] JScriptの配列は遅すぎて泣けるけどie8で速くなってる？ 256 名前：デフォルトの名無しさん mailto:sage [2008/08/07(木) 22:43:21 ] >>255 会社のマシンに IE8 を試しに入れてるんだが、 JScript のエンジンも更新されてるんだろうか？ 257 名前：デフォルトの名無しさん mailto:sage [2008/08/08(金) 02:39:33 ] そういう話は一応ある。 pc11.2ch.net/test/read.cgi/win/1211336412/206-210 www.google.com/search?q=cache:http://pc11.2ch.net/test/read.cgi/win/1211336412/206-210 www.google.co.jp/search?hl=ja&q=ie8+jscript.dll 258 名前：デフォルトの名無しさん mailto:sage [2008/08/08(金) 21:36:53 ] すんません、質問です。 スクロールキーがオンの場合、あるキーを入力するスクリプトを組みたいんですが、 オンかオフかWSH上で判断できますか？ 259 名前：デフォルトの名無しさん mailto:sage [2008/08/08(金) 22:15:33 ] WSH上で判断することは出来るけど WSHで判断することは出来ない つまりCOMを作るか探すかしろってことだ まぁがんがれ 260 名前：デフォルトの名無しさん mailto:sage [2008/08/08(金) 22:55:48 ] activex.dllはvb.net expressで作ればいいよ 261 名前：258 mailto:sage [2008/08/08(金) 23:56:28 ] >>256, 260 どうもありがと。がんばってみます。。。 262 名前：デフォルトの名無しさん [2008/08/09(土) 01:03:17 ] がんばれ。google先生に聞けば１時間でできると思うぞ。 263 名前：デフォルトの名無しさん mailto:sage [2008/08/09(土) 18:45:18 ] System.Collections.ArrayList はJoinできない？ ｘJoin(ArrayList) ｘArrayList.Join 264 名前：デフォルトの名無しさん mailto:sage [2008/08/09(土) 19:24:01 ] .NET Framework使うならMSDNライブラリくらい参照しようよ。 265 名前：デフォルトの名無しさん [2008/08/09(土) 22:48:07 ] ※MSDNライビュラリは有償です 266 名前：デフォルトの名無しさん mailto:sage [2008/08/09(土) 22:50:57 ] >>265 　| 　| 　| 　し 267 名前：デフォルトの名無しさん mailto:sage [2008/08/10(日) 12:32:36 ] >>263 Join出来るよ 268 名前：デフォルトの名無しさん mailto:sage [2008/08/10(日) 14:01:35 ] 出来た！ 269 名前：デフォルトの名無しさん mailto:sage [2008/08/10(日) 21:34:48 ] System.Collections.ArrayList のソートで比較関数をVBScriptで作れない？ ArrayList.Sort GetRef("compare") はダメだった 270 名前：デフォルトの名無しさん mailto:sage [2008/08/11(月) 05:34:14 ] vbsの変数名の最後につける型を指定するやつ(&H20&の末尾の&とか)の種類の一覧がどこにあるか知りませんか？ どういう単語で検索すればいいのか漠然としすぎて分かりません あとこのURLの「[地域のプロパティ] の設定値」ってなんですか？ msdn.microsoft.com/ja-jp/library/cc392243.aspx 271 名前：デフォルトの名無しさん mailto:sage [2008/08/11(月) 14:58:31 ] ＞vbsの変数名の最後につける型を指定するやつ vbsにはない。すれっち 272 名前：デフォルトの名無しさん mailto:sage [2008/08/11(月) 15:06:32 ] ＞型を指定するやつ 型を指定する文字 273 名前：デフォルトの名無しさん mailto:sage [2008/08/11(月) 20:55:23 ] 最後じゃなくって最初じゃないの？ 274 名前：デフォルトの名無しさん mailto:sage [2008/08/11(月) 21:25:08 ] >>270 前者は271も言ってる通りVBSには明示的な型というもの自体が存在しないが VBやVBAに関してなら「型宣言文字」でググれ 後者は、例えば数値の表示形式で、3桁カンマ区切りをするか否かというオプションの場合 vbTrue→地域のプロパティの設定値に関係なく区切る(123,456,789.00) vbFalse→地域のプロパティの設定値に関係なく区切らない(123456789.00) vbUseDefault→地域のプロパティの設定値が「区切り有り」なら区切る、「区切り無し」なら区切らない >>273 最初に付けるのは型を「指定」しているのではなく、型を「任意に明示」してるだけ 「指定」ではなく、しかも「任意」なので Dim intHOGE As String なんてことも出来る これは「プレフィックス」で、上記intはハンガリアン記法での一般的なInteger型のプレフィックス つまりInteger型のプレフィックスを付けておきながらString型を指定することが出来るわけだ 275 名前：デフォルトの名無しさん mailto:sage [2008/08/11(月) 21:41:43 ] >>274 ごめ　ちゃんと読んでなかったわ 276 名前：デフォルトの名無しさん mailto:sage [2008/08/13(水) 18:29:26 ] CIM_DataFileクラスを用いて、ファイルの各種情報を取得したいのですが、 「説明」のプロパティを取得するときに指定するプロパティ名が分かりません。 具体的には、例えばソリティア（C:\WINDOWS\system32\sol.exe）を 右クリックして表示されるプロパティの「バージョン情報」タブの２行目に 「説明：Solitaire Game Applet」と表示されますが、この値を取得したいのです。 ファイルバージョンなどは、「Version」プロパティで取得できております。 ご存知の方、ご教示お願い致します。 277 名前：デフォルトの名無しさん mailto:sage [2008/08/14(木) 02:40:13 ] プレフィクスだったらMSDNにのってるよ mk:@MSITStore:C:\Program%20Files\Microsoft%20Visual%20Studio\MSDN98\98VS\1041\vbcon98.chm::/Html/vbconconstantvariablenamingconventions.htm 278 名前：デフォルトの名無しさん mailto:sage [2008/08/14(木) 04:43:23 ] >>277 そんな話は誰もしてないw 279 名前：デフォルトの名無しさん mailto:sage [2008/08/14(木) 10:27:49 ] >>278 >>270 よく読め文盲 280 名前：デフォルトの名無しさん mailto:sage [2008/08/14(木) 13:34:45 ] .NETのコンストラクタやスタティックメソッドは呼べないのか 281 名前：デフォルトの名無しさん mailto:sage [2008/08/14(木) 13:57:47 ] ActiveXPosh使えばー？ 282 名前：デフォルトの名無しさん mailto:sage [2008/08/15(金) 19:25:16 ] >>276 確かにMSDNとかにはプロパティ名書いて無いね。 どうりでこのスレの住人でも即答できない訳だ。 283 名前：デフォルトの名無しさん mailto:sage [2008/08/15(金) 22:01:03 ] ggle VersionInfo Description 284 名前：デフォルトの名無しさん mailto:sage [2008/08/15(金) 22:03:50 ] つfilever.exe 285 名前：デフォルトの名無しさん mailto:sage [2008/08/15(金) 22:09:36 ] shell.applicationのextendedpropertyで取れるお 286 名前：デフォルトの名無しさん mailto:sage [2008/08/25(月) 19:37:01 ] 割り算をして小数点が出てきたときに 繰り上げるにはどうしたらいいんでしょうか？ x = 100/3 だとxが33.33333となってなるところを 繰上げて34になるようにしたいのですが 287 名前：デフォルトの名無しさん mailto:sage [2008/08/25(月) 20:50:45 ] >>286 xと、xを切り捨てた値を比較して、xが小さければ1を足す 288 名前：デフォルトの名無しさん mailto:sage [2008/08/25(月) 21:06:25 ] JScript で言うと、xと xを繰り上げた値を比較して、xが小さければ繰り上げる。 289 名前：デフォルトの名無しさん mailto:sage [2008/08/25(月) 21:34:16 ] -Int(-x) 290 名前：デフォルトの名無しさん mailto:sage [2008/08/25(月) 23:05:35 ] Math.ceil 291 名前：デフォルトの名無しさん mailto:sage [2008/08/27(水) 11:54:53 ] >>286 0.9を足して切り捨て。 292 名前：デフォルトの名無しさん mailto:sage [2008/08/27(水) 11:55:54 ] ああ、四捨五入と違って33.01も切り上げするならダメか。 293 名前：デフォルトの名無しさん mailto:sage [2008/08/27(水) 12:16:41 ] VBScriptでウェブページを取得したいのですが mixiのような感じで、ユーザー名やパスワードが必要な場合はどうすればいいんでしょうか？ いろいろググってみたのですが、検索ワードが悪いの見つける事が出来ませんでした・・・ 294 名前：デフォルトの名無しさん mailto:sage [2008/08/27(水) 13:42:12 ] 無理 295 名前：デフォルトの名無しさん mailto:sage [2008/08/27(水) 18:06:49 ] もともと無理だったんですか・・・・ 一番簡単なものだと何で出来ますか？jscriptでもやっぱり無理なんでしょうか？ 296 名前：デフォルトの名無しさん mailto:sage [2008/08/27(水) 18:53:35 ] Dim mixi, email, password Dim ie, document, form mixi = "mixi.jp/" email = "null@po.com" password = "nullpo" Set ie = CreateObject("InternetExplorer.Application") ie.Visible = True ie.Navigate(mixi) Do While ie.Busy     WScript.Sleep(1000) Loop Set document = ie.Document Set form = document.forms("login_form") If TypeName(form) = "Nothing" Then WScript.Quit() form("email").value = email form("password").value = password form.submit() 297 名前：デフォルトの名無しさん mailto:sage [2008/08/27(水) 19:16:58 ] --------------------------- Windows Script Host --------------------------- スクリプト: C:\296.vbs 行: 15 文字: 1 エラー: エラーを特定できません コード: 80004005 ソース: (null) --------------------------- OK --------------------------- さすがVistaだ。なんともないぜ！ 298 名前：デフォルトの名無しさん mailto:sage [2008/08/27(水) 19:43:47 ] Do While ie.Busy Or ie.ReadyState<>4 299 名前：デフォルトの名無しさん mailto:sage [2008/08/27(水) 20:11:00 ] なんか忘れてた気がしたけどReadyStateか あとNothingの扱いをちゃんと調べたことないしIsNothingとかないからNothingの判定がよくわからんかった If form Is Nothing Then WScript.Quit() でいいんだな 300 名前：デフォルトの名無しさん mailto:sage [2008/08/27(水) 22:08:51 ] ＞Quit() とか VBScriptなのに 301 名前：293 mailto:sage [2008/08/28(木) 10:44:50 ] レスありがとうございます >>296 IEを使えば出来るんですね！ 使わないではやっぱり無理なんでしょうか？ 302 名前：デフォルトの名無しさん mailto:sage [2008/08/28(木) 11:09:26 ] 無理じゃないよ スレ違い(WSHではなくActiveX汎用コンポーネントの話)になるので詳しくは伏せるけど 303 名前：デフォルトの名無しさん mailto:sage [2008/08/28(木) 16:56:19 ] CreateObject使うのはスレ違いだって？ 304 名前：デフォルトの名無しさん mailto:sage [2008/08/29(金) 17:21:52 ] >>296はIEスレてなもんだな 305 名前：デフォルトの名無しさん [2008/08/31(日) 18:04:45 ] unix系のシステムでもWSH使えたら良いのにネ。 bashよか使い勝手が良い。 306 名前：デフォルトの名無しさん mailto:sage [2008/08/31(日) 18:20:08 ] UNIXならrubyあたりでいいじゃん。なんでそこでbashが出てくるの？ bashと比較するんならcmdとかPowerShellとかだろ。 307 名前：デフォルトの名無しさん mailto:sage [2008/08/31(日) 18:35:38 ] わざわざインストールが必要な ruby なんか全然 お呼びでないので、巣から出て来るなよ。 308 名前：デフォルトの名無しさん mailto:sage [2008/08/31(日) 19:41:27 ] >>305 なんでbashの替わりがWSHなの？？？意味が分からん 309 名前：デフォルトの名無しさん mailto:sage [2008/08/31(日) 20:15:54 ] 代わりにならないからぼやいてるんだろ。 意味わからんのならレスしなきゃいいのに。 310 名前：デフォルトの名無しさん mailto:sage [2008/08/31(日) 20:28:22 ] bashは主にUNIX系OSで使われているシェルのひとつ。 WindowsではコマンドプロンプトやPowerShellに相当。 代わりになるわけがないのに、ぼやく意味がわからん 311 名前：デフォルトの名無しさん mailto:sage [2008/08/31(日) 20:37:31 ] とりあえず>>305がunix系システムをろくに使いこなせていないことは解った。 312 名前：デフォルトの名無しさん mailto:sage [2008/08/31(日) 21:29:37 ] >>310 > 意味わからんのならレスしなきゃいいのに。 # cmd.exe と bash を比較してる時点でアホ丸出しだし。 313 名前：デフォルトの名無しさん mailto:sage [2008/09/02(火) 10:37:33 ] よくわからんけど、>>305はシェルスクリプトって言いたかったのかも 314 名前：デフォルトの名無しさん mailto:sage [2008/09/03(水) 12:14:55 ] Sendkeysを並べてWindows Vistaを自動的に操作するスクリプトを書いてるんですが、 UACのダイアログが出るとそこで終わっちゃうんです。 「実行するにはあなたの許可が必要です」ってダイアログに対して {LEFT}{ENTER} とか %c って書いても ボタンを押してくれません。 どうすればいいのか、だれか教えてください。 315 名前：デフォルトの名無しさん mailto:sage [2008/09/03(水) 12:59:22 ] >>314 UACを無効にしておく 316 名前：デフォルトの名無しさん mailto:sage [2008/09/03(水) 13:18:31 ] >>315 UACを切らずに済む方法はないでしょうか？ 317 名前：デフォルトの名無しさん mailto:sage [2008/09/03(水) 13:36:29 ] スクリプトを動かし始める前に昇格しておく。 318 名前：デフォルトの名無しさん mailto:sage [2008/09/03(水) 20:00:51 ] >>314　.sendkeys "{space}" 319 名前：デフォルトの名無しさん mailto:sage [2008/09/03(水) 22:21:54 ] >>317-318 ありがとうございます。明日、出社したら調べてみます。 320 名前：デフォルトの名無しさん mailto:sage [2008/09/05(金) 16:27:42 ] やってみましたが {SPACE} はエラーになりました。そういうキーワードはなさそうです。 昇格は勉強中です。難しいです。 321 名前：デフォルトの名無しさん mailto:sage [2008/09/05(金) 17:26:59 ] >>320 これが参考になると思う。 technet.microsoft.com/ja-jp/magazine/cc510320.aspx ttp://face-products.com/modules/wordpress/index.php?p=163 322 名前：デフォルトの名無しさん mailto:sage [2008/09/05(金) 18:15:21 ] .sendkeys " " 323 名前：デフォルトの名無しさん mailto:sage [2008/09/07(日) 19:26:28 ] スクリプトってこれ最悪だな。 使ってないけどたぶん.NETも同じなんだろうな 324 名前：デフォルトの名無しさん mailto:sage [2008/09/07(日) 19:34:41 ] 発端はJavascriptなんだからしょうがない。 325 名前：デフォルトの名無しさん mailto:sage [2008/09/07(日) 20:57:03 ] >>323 いやいや.NETを一緒にするな。 あれのダメさはまた別物。 326 名前：デフォルトの名無しさん mailto:sage [2008/09/17(水) 10:08:29 ] WSH使いの視点で見るとIronPythonとかIronRubyってどうなん？ 327 名前：デフォルトの名無しさん mailto:sage [2008/09/17(水) 10:47:28 ] ActivePythonではなくIronPythonならWSHとは全く関係ないものなので 「WSH使い」の視点からは視野外だ もちろん「WSH使い」でもWSH以外を使う人はいっぱい居るから 個々の視点ではいろんな意見があるだろうが、それは「WSH使い」の視点ではないからな 328 名前：デフォルトの名無しさん [2008/09/28(日) 02:16:01 ] すいませんWSHの質問です。 ＩＥのテキストボックスに値を入力したいんですが、 そのテキストボックスはたくさんあってtbox[0].priceからtbox[100].priceまであるんです。 IE.Document.form.tbox[0].price.value = "100"とやると、オブジェクトがありませんという実行時エラーになってしまいます。 普通のテキストボックス名（tbox1)とかなら大丈夫でした。 テキストボックス名がピリオドで区切られているのですが、そういう場合なにか工夫がいるのでしょうか？ こういう場合どうすればできるでしょうか？ よろしくお願いします。 329 名前：デフォルトの名無しさん mailto:sage [2008/09/28(日) 14:00:19 ] 言ってることがいまいちピンとこない。 エラーになる最小のソースを晒せ。 330 名前：328 [2008/09/28(日) 17:19:12 ] >>329 すいません。お願いします。 HTML <html> <body> <input name="tbox[0].price" type="text" value=""/> <input name="tbox[1].price" type="text" value=""/> <input name="aaa" type="text" value=""/> </body> </html> WSH IE.document.form.tbox[1].price.value = "100" とやると実行時エラーで "1"というオブジェクトがありませんというようなエラーが出ました。 IE.document.form.aaa.value = "100" とやるとaaaのテキストボックスに正しく100が入力されます。 最終的にやりたいのはテキストボックスがいっぱいあるのでFOR文でまわして全部に入力したいです。 ちょっと今ソースがみれないのでわかりづらいかも知れないですが、よろしくお願いします。 331 名前：デフォルトの名無しさん mailto:sage [2008/09/28(日) 18:15:25 ] 今朝のことです。 ブラウザを操作するスクリプトが暴走して、 IEとWScript.exeが無限起動してたｗｗｗｗ ブラクラｗｗｗｗｗｗｗｗ 332 名前：デフォルトの名無しさん [2008/09/28(日) 19:31:24 ] >>329 <input name="tbox[0].price" type="text" value=""/> <input name="tbox[1].price" type="text" value=""/> ↑のname要素の書き方の場合、"tbox[0].price"という名前の要素を定義していることになる。 "tbox[0].price"というname要素と"tbox[1].price"というname要素の間にはまったく関連性はない。 そもそも"tbox[0].price"という書き方をしたところで勝手に配列オブジェクトになりはしない。 × IE.document.form.tbox[1].price.value = "100" ○ IE.document.form.["tbox[1].price"].value = "100" ←つまりこういうアクセスの仕方をしなければならない。 いまのままで何とかループをまわしたいなら、↓みたいなやり方になる。 for ( var i = 0; i < 100; i++ ) { IE.document.form.["tbox[" + i + "].price"].value = "100"; } 333 名前：デフォルトの名無しさん mailto:sage [2008/09/28(日) 19:43:02 ] この糞スレがはじめて世の中の役に立った瞬間に立ち会えたｗｗ 334 名前：デフォルトの名無しさん mailto:sage [2008/09/29(月) 02:29:31 ] 全部同じnameをふってgetElementsByNameで配列を得てから回すんだ！ 335 名前：デフォルトの名無しさん mailto:sage [2008/09/29(月) 02:32:11 ] >>333 このスレがグルジアでの米ロ軍事衝突を食い止めてたの知らないなんて どんだけにわかなんだよ 336 名前：デフォルトの名無しさん mailto:sage [2008/09/29(月) 20:22:48 ] >>335 米ロが衝突とかどうでもイイからさ、 インストール済のWindowsコンポーネントの一覧をテキストファイルに落とす方法を教えてくれよ。 いや教えてください。お願いします。この通りです。 337 名前：デフォルトの名無しさん mailto:sage [2008/09/29(月) 21:54:22 ] Windowsコンポーネント？ その中でWSHから使えるのなんて極一部(ActiveXコンポ)だぞ ActiveXコンポのみなら、各種オブジェクトブラウザで一覧出来るので リスト取得ツールでも使ってテキストに落とせば良い WSHから使えないものも含めて、Windowsコンポ全てを網羅したいならスレ違い スクリプトで取得したいなら、レジストリを嫁 レジストリの内容取得は、WshShell使う方法はWSHヘルプに載ってるし WMI使う方法なら、そこら辺にサンプルがごろごろ転がってる レジストリの内容解釈に付いてはスレ違いなので伏せる 338 名前：デフォルトの名無しさん mailto:sage [2008/09/29(月) 22:06:02 ] ちっがああああぅｗ コンパネの[プログラムの追加と削除]から[Windowsコンポーネントの追加と削除]って 選べるでしょ。あれの一覧。IISとかインストールするのに使うでしょ。 あの中から、どんなコンポーネントが選べるのか、 実際にインストールされているのはどれなのか？を テキストファイルに吐き出したい。それだけ。 米ロが衝突する前に教えてほしい。君の１レスが世界を救うんだ、頼む！ 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 340 名前：デフォルトの名無しさん mailto:sage [2008/09/30(火) 17:49:44 ] If i.Name = "プログラムと機能" Then msgbox i.path してみて、次からsh.NameSpace()に指定すればいいんじゃない？ 341 名前：デフォルトの名無しさん mailto:sage [2008/09/30(火) 21:05:19 ] Wscript.CreateObject("WindowsInstaller.Installer") 342 名前：デフォルトの名無しさん [2008/09/30(火) 21:15:48 ] おい、おまえらXPでも動くようなのを書けよ 小出しにするなまとめろ 343 名前：デフォルトの名無しさん [2008/09/30(火) 22:19:33 ] ていうかコンパネの一覧表か 要らんわ 344 名前：デフォルトの名無しさん mailto:sage [2008/09/30(火) 23:29:48 ] ほう助３３世 345 名前：デフォルトの名無しさん mailto:sage [2008/09/30(火) 23:49:30 ] >>340 なるほろ！Pathか。 ParseName("プログラムと機能") しても引っ掛からなかったんで廻してしまったよ。 Set cpl = WScript.CreateObject("Shell.Application").NameSpace("::{21EC2020-3AEA-1069-A2DD-08002B30309D}\::{7B81BE6A-CE2B-4676-A29E-EB907A5126C5}") For Each i in cpl.Items s = s & i.Name & vbNewLine Next MsgBox s 346 名前：デフォルトの名無しさん mailto:sage [2008/09/30(火) 23:59:55 ] うしろだけでもよいかも "::{7B81BE6A-CE2B-4676-A29E-EB907A5126C5}" 347 名前：デフォルトの名無しさん mailto:sage [2008/10/01(水) 00:11:47 ] >>346 うん、それはダメだった。理屈は良く分からんが。 348 名前：デフォルトの名無しさん mailto:sage [2008/10/01(水) 01:58:58 ] 数字はないか？一覧してみ On Error Resume Next Set Shell=CreateObject("Shell.Application") For k=0 To 100 Set Folder=Shell.NameSpace(k) WScript.StdOut.WriteLine Join(Array(k,Folder.Self.Name,Folder.Self.Path),vbTab) Next 349 名前：デフォルトの名無しさん mailto:sage [2008/10/06(月) 21:22:19 ] ﾟ 　 　　　　　　(_ヽ　　　　　　+ 　' *　　／⌒ヽ.| ｜　　+ 　　 .　（ ＾ω＾ / /　　　　　　　｡ 　 + 　y'_　　　 ｲ　　　　* 　　　〈_,)l　　　｜ *　　　　　　。 ｶﾞﾀﾝ lll./　/ｌ　｜ lll　　　　+ VBScriptで、こんな感じでドライブの取り出しはOKですが、逆の｢閉じる｣は出来ませんか？ ２ｃｈに集う墓でも無理？ Set objShell = CreateObject("Shell.Application") set objDrive = objShell.NameSpace("D:\") Set objItem = objDrive.Items.Item objItem.InvokeVerb "取り出し(&J)" 350 名前：デフォルトの名無しさん mailto:sage [2008/10/06(月) 21:32:14 ] hard to close 351 名前：349 mailto:sage [2008/10/07(火) 03:20:31 ] 自己解決しました。 検索したら、そういう動作をするサンプルプログラムがありました。 でもハード側もそれに対応してないと動かない、ということでした。 結論は：開く｢閉じる｣をするVBscriptのプログラムはあるが、すべてのハードでは出来ない ﾟ 　 　　　　　　(_ヽ　　　　　　+ 　' *　　／⌒ヽ.| ｜　　+　　　　　対応してないハードでそれを使っても 　　 .　（ ＾ω＾ / /　　　　　　　｡　←ガタン！と出たままになると 　 + 　y'_　　　 ｲ　　　　* 　　　〈_,)l　　　｜ *　　　　　　。 ｶﾞﾀﾝ lll./　/ｌ　｜ lll　 352 名前：デフォルトの名無しさん mailto:sage [2008/10/07(火) 08:57:42 ] 原理的にはコードを逆に書けば逆の動作をするはず。 )"noitacilppA.llehS"(tcejbOetaerC = llehSjbo teS )"\:D"(ecapSemaN.llehSjbo = evirDjbo tes metI.smetI.evirDjbo = metIjbo teS ")J&(し出り取" breVekovnI.metIjbo 353 名前：デフォルトの名無しさん mailto:sage [2008/10/07(火) 09:17:44 ] objShell.Run """C:\\ProgramData\\Microsoft\\Windows\Start Menu\\Programs\\Fantasy Earth Zero\\Fantasy Earth Zero.lnk""",1,1 Do Set ProcessSet = GetObject("winmgmts:{impersonationLevel=impersonate}").ExecQuery("select * from Win32_Process where Name='FEzero_Client.exe') WScript.Sleep 1000 '１秒間待機 Loop While ProcessSet.Count > 0 ’処理 FEzero_Client.exeが終了したら、適当なプログラムを実行させたいのだが、FEzero_Client.exeがnprotectによって隠蔽されているせいでうまくいかない。 そこでウィンドウが存在するかどうかを判定することによってFEzero_Client.exeが起動しているかどうかを調べる方法をとりたい。 でも、いくら探しても、見つからない。 ウィンドウ名が存在しているかどうかを調べる方法があったら教えてほしい。 354 名前：デフォルトの名無しさん mailto:sage [2008/10/07(火) 18:46:10 ] >>353 AppActivate 355 名前：デフォルトの名無しさん mailto:sage [2008/10/07(火) 21:14:56 ] >>354 それだと、まずいんだ・・・ FEZero_Client.exeを起動している間にも、ブラウザーで作業したりするから。 356 名前：デフォルトの名無しさん mailto:sage [2008/10/07(火) 22:25:24 ] >>338 亀＆自己レスだが、「Windowsコンポーネントの一覧＆インストール状態」の取得デキタ。 レスはあまり参考にならなかった（すまん！）が、一応此処で聞いたって事でフィードバックしておく。 ちなみにXPSP2な。2003でもいけると思う。 ・コンパネから起動する「Windowsコンポーネントの追加と削除」は以下のコマンドで起動されてる。 「c:\windows\system32\sysocmgr.exe /y /i:c:\windows\inf\sysoc.inf」 ・上のコマンドの引数の「sysoc.inf」ファイルの「Components」セクションで他の*.infファイルへの参照が列挙されてる。 *.infファイルが明記してなかったり「hide」に設定されてる行は無視される。 ・具体的なコンポーネントの名称、説明、「Windowsコンポーネントの追加と削除」画面での階層構造とかは 個々の*.infファイルの方を見る。 ・Windowsコンポーネントのインストール状態については以下のレジストリに格納されてる。 「HEKY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Setup\OC Manager\Subcomponents」 ・個々の*.infファイルの「Optional Components」に列挙されているコンポーネント名が、 上のレジストリキー配下のプロパティに対応してる。 以上。プログラムはinfファイルやレジストリを読むだけのダルいものなのであえて載せないｗ え？WSH関係ない？そうだよちきしょう。 357 名前：デフォルトの名無しさん mailto:sage [2008/10/07(火) 22:40:11 ] >>339以降は関係ない話だから役に立つはずがない。 358 名前：デフォルトの名無しさん mailto:sage [2008/10/10(金) 01:16:11 ] >>353 tasklist.exe 359 名前：デフォルトの名無しさん mailto:sage [2008/10/10(金) 07:57:28 ] >>358 nprotectによってFEZero_clinet.exeがごっそり消えてる。 タスクマネージャーを使っても、ＷＭＩをつかっても、Tasklistをつかっても、結果は同じだった。 360 名前：デフォルトの名無しさん mailto:sage [2008/10/11(土) 03:01:54 ] Windows 2000 SP4、IE6.0 SP1、WindowsUpdateは一通り入れた状態でcscript > C:\Documents and Settings\Administrator>cscript > Microsoft (R) Windows Script Host Version 5.6 > Copyright (C) Microsoft Corporation 1996-2001. All rights reserved. WSH5.6を入れた記憶は無いんだけど SP4は5.6がデフォ？それともIE6.0 SP1入れたから？うーん。 www1.u-netsurf.ne.jp/~tomo_c/tips/R23_002.html > Windows98 SecondEdition は 5.1 > Windows 2000 SP3 は 5.1 > WindowsXP は 5.6 361 名前：デフォルトの名無しさん mailto:sage [2008/10/11(土) 11:53:54 ] > それともIE6.0 SP1入れたから？ 多分それだと思う。 www.microsoft.com/japan/technet/security/bulletin/MS02-009.mspx ＋よく寄せられる質問 使用中の VBScript のバージョンはどのように分かるのですか? VBScript.dll ファイルは 2 つのソフトウェア製品 (Internet Explorer および Microsoft Windows Script) に同梱されています。 ・Internet Explorer 6.0 : Internet Explorer 6.0 を実行しているお客様については、 　使用しているプラットフォームに関係なく、Windows Script 5.6 が既定でインストー 　ルされています。Windows Script 5.6は Internet Explorer 6.0 に同梱されています。 ・Internet Explorer 5.5 : Internet Explorer 5.5 を実行しているお客様については、 　使用しているプラットフォームに関係なく、Windows Script 5.5 が既定でインストー 　ルされています。Windows Script 5.5 は Internet Explorer 5.5 に同梱されています。 ・Internet Explorer 5.01 : Internet Explorer 5.01 を実行しているお客様については、 　使用しているプラットフォームに関係なく、Windows Script 5.1 が既定でインストール 　されています。 Internet Explorer のバージョンを 6.0 または 5.5 にアップグレードしていないお客様は、 次のバージョンの Windows Script を実行している高い可能性があります。 ・Windows 2000 : Windows Script 5.1 ・Win ME : Windows Script 5.5 # ちなみに、Windows Script 5.1 は、元々 Windows Script 2.0 と呼ばれていた。 362 名前：デフォルトの名無しさん [2008/10/11(土) 14:46:39 ] Version 5.6 だった で、それがなんなの ｢うーん｣なんて書くほどのことかよアホ 363 名前：デフォルトの名無しさん mailto:sage [2008/10/11(土) 14:55:49 ] わざわざ3行もレスするような事かよアホ 364 名前：デフォルトの名無しさん mailto:sage [2008/10/11(土) 15:20:47 ] >>362 違いがわからない奴が無理してレスする必要は無い 365 名前：デフォルトの名無しさん mailto:sage [2008/10/11(土) 17:49:09 ] ダバダ〜 366 名前：デフォルトの名無しさん [2008/10/11(土) 18:34:16 ] 　　　　　　　　　＿＿＿ 　　　　　　　 / 　　 　　　ヽ　　　　｢うーん｣ 　　　　, -‐ (_).⌒ l￣| ⌒ |　　　　　＿＿ｏ 　　 　 ｌ_ｊ_ｊ_ｊ と)　ﾉ─|　　ﾉ　　　　　　　　|　二|二''　　＿ 　　　　/ 　 /　　　　　　　ヽ　　　 　　　ノ　　　|　　ヤ　　　ｯ 　　　 〈　 ノ　　　　　　　　 | 367 名前：デフォルトの名無しさん mailto:sage [2008/10/11(土) 19:02:31 ] マンダム 368 名前：デフォルトの名無しさん [2008/10/11(土) 19:08:46 ] この３人は40代(以上)の中年プログラマー 　　↓↓↓ >>364>>365>>367 369 名前：デフォルトの名無しさん mailto:sage [2008/10/11(土) 19:44:07 ] ネタ元の分かるお前もなｗ 370 名前：デフォルトの名無しさん [2008/10/11(土) 20:59:36 ] この３人はN88BASICで育った世代 　　↓↓↓ >>364>>365>>367 371 名前：デフォルトの名無しさん mailto:sage [2008/10/11(土) 21:41:26 ] 初体験はTK-80だったわ(ﾎﾟｯ 372 名前：デフォルトの名無しさん mailto:sage [2008/10/11(土) 23:06:40 ] >>361 丁寧にコピペまでサンクスです お陰でWSHのバージョンに関係しそうな要素が掴めました こんなところかな。ちゃんと管理していこうと思ってます。それでは失礼 ・導入OS ・IEバージョンうｐ ・WSHバージョンうｐ 373 名前：デフォルトの名無しさん [2008/10/11(土) 23:16:01 ] TKとはトレーニングキットの意味じゃなく小室哲哉のことね。これ常識中の常識。 374 名前：デフォルトの名無しさん mailto:sage [2008/10/16(木) 14:48:58 ] ドラッグアンドドロップした画像をペイントで開くにはどうすればいいですか？ 375 名前：デフォルトの名無しさん mailto:sage [2008/10/16(木) 15:34:24 ] WScript.Shellでmspaint.exeをRun 376 名前：デフォルトの名無しさん mailto:sage [2008/10/23(木) 22:33:22 ] Windows Script Host の実行の失敗しました。（この操作を完了するのに十分な記憶域がありません。） ってエラーが出るのですがなんでしょうか？ある程度調べてみたのですが改善されませんでした。 どなたかご教授お願いします。 377 名前：デフォルトの名無しさん mailto:sage [2008/10/24(金) 14:18:54 ] >>376 ファイル名を変えろ or フルパスで指定しろ 378 名前：デフォルトの名無しさん mailto:sage [2008/10/24(金) 14:27:59 ] >フルパスで指定しろ だめ 379 名前：デフォルトの名無しさん mailto:sage [2008/10/24(金) 20:05:31 ] >>377,378 ありがとうございました 380 名前：デフォルトの名無しさん mailto:sagｅ [2008/10/30(木) 18:40:50 ] すみません。 プログラムの追加と削除やスタートメニューを見てインスコされているアプリの一覧を作りたいです。 教えて下さい。 381 名前：デフォルトの名無しさん mailto:sage [2008/10/30(木) 19:54:34 ] ttp://www.microsoft.com/japan/technet/scriptcenter/resources/wmifaq.mspx#EABAE 382 名前：デフォルトの名無しさん mailto:sage [2008/10/30(木) 19:57:47 ] dir /s /b c:\*.exe 383 名前：デフォルトの名無しさん mailto:sage [2008/10/30(木) 20:51:11 ] format c: 384 名前：３８０ mailto:sagｅ [2008/10/30(木) 22:30:06 ] すみません。真面目に訊いてるんですけど。。。 アプリの件は皆さんがふざけている間にPCViewっていうフリーソフトで事故怪傑しました。 その他にインスコされてるフォント名の一覧が欲しいです。 これが最後☆チャンスです。皆さんの役に立つとこ見せて下さい。 385 名前：デフォルトの名無しさん mailto:sage [2008/10/30(木) 22:36:55 ] >>384 おれは真面目に>>381って返したつもりなんだけどな。無視ですかそうですか。ちょっと泣けちゃう。フォント名の一覧？知るかばーか。 386 名前：デフォルトの名無しさん mailto:sage [2008/10/31(金) 12:00:21 ] >>382 >>383 すれ違い >>384 フリーソフトさがせ 387 名前：デフォルトの名無しさん mailto:sage [2008/10/31(金) 12:40:02 ] appwiz.cpl中のhtaで使ってるobjectは利用できないのかね？ 388 名前：３８０ mailto:sagｅ [2008/10/31(金) 13:12:23 ] >>385 こっちは教えてくれって頭下げてんですよ。>>381の一覧見てどうしろってんですか。 もったい付けてないでちゃちゃっとスプリクト教えてくれさえすれば良いだけなのに、 どうしてプログラムの人ってまともにコミュニケーション取れないのばかりなんだろう。 389 名前：デフォルトの名無しさん mailto:sage [2008/10/31(金) 13:17:54 ] >>387 cplってhtaなん？ 390 名前：デフォルトの名無しさん mailto:sage [2008/10/31(金) 13:55:55 ] >>388 お前馬鹿？ ソース書いてあるじゃん。 > >>381の一覧 一覧って書いてるところからして、もしかして手打ちでURL入れて最後の#以降を入れなかった せいでページの目次部分を見てるとか？ もしそうなら超バカかつ超失礼な奴だな。381にちゃんと謝っとけ！ 391 名前：３８０ mailto:sagｅ [2008/10/31(金) 14:42:27 ] はいはいｗ結局こんな簡単なスプリクトも組めないんですねお前らｗ言い訳乙 392 名前：デフォルトの名無しさん mailto:sage [2008/10/31(金) 16:25:16 ] >>391 >>381の意味するところが分からないようなら自力では無理。 素直にコンパネ開いて手作業で写しなさい。あんたの場合それが一番早いやり方。 393 名前：３８０ mailto:sagｅ [2008/10/31(金) 17:32:26 ] もしも〜し？ 自力で何とかなるなら最初からこんなキモスレで質問なんかしませんよ〜 日本語通じてますかぁ〜 私は、どうせ暇なあんた達にたまには人の役に立てるチャンスを与えてやっただけ 394 名前：デフォルトの名無しさん mailto:sage [2008/10/31(金) 18:24:46 ] 悪いが人間の定義から手取り足取り教えてやるほど親切じゃないｗ 395 名前：デフォルトの名無しさん mailto:sage [2008/10/31(金) 18:28:56 ] "ヒント貰っても"自力で出来ないならってことなんだが 日本語通じてないのはどっちかな（￣ー￣）ﾆﾔﾘ それにオマエは与える側ではなく物乞う側だ 答えそのものを与えるも、ヒントだけ与えるも、こちらの自由 俺等の掌の上で哀れに乞い踊り、弄られ怒り狂う様を ニヤニヤ眺められるだけのピエロでしかない もちろんこれを否定するのは勝手だが オマエは目的のことを教えて貰えず困っており こちらはなんら困ってないという事実が全てを物語ってしまっている 396 名前：デフォルトの名無しさん mailto:sage [2008/10/31(金) 18:39:18 ] res://appwiz.cpl/default.hta 397 名前：デフォルトの名無しさん mailto:sage [2008/10/31(金) 18:53:55 ] >>384 dir c:\windows\fonts 398 名前：デフォルトの名無しさん mailto:sage [2008/10/31(金) 19:01:11 ] ヒント createobject("shell.application").namespace("shell:fonts") 399 名前：デフォルトの名無しさん mailto:sage [2008/10/31(金) 20:03:18 ] スプリクト（笑） 400 名前：デフォルトの名無しさん mailto:sage [2008/10/31(金) 20:09:53 ] まぁ正直わからんでもないな 聞いてる方の態度もアレだがそれを抜きにしても ちょっとなんだかなぁってのが多いのはなんなんだろうな 401 名前：デフォルトの名無しさん mailto:sage [2008/10/31(金) 20:14:06 ] 即答されてるんだから、後はどうでもいいだろ。 402 名前：デフォルトの名無しさん [2008/10/31(金) 21:44:38 ] 新しいスプリ ク ト言語が開発された噂のスレはこちらですか？ 403 名前：３８０ mailto:sagｅ [2008/10/31(金) 22:07:04 ] なに必死になっちゃってんの？顔真っ赤ですよぅｗキモオタどもダサ過ぎｗ あ〜はいはい困ってまちゅよぅ大変だぁこれで満足ですかｗｗｗ 404 名前：デフォルトの名無しさん mailto:sage [2008/10/31(金) 22:23:14 ] 満足だから、もうどっかに逝け。 405 名前：デフォルトの名無しさん mailto:sage [2008/10/31(金) 22:23:59 ] スクリプトだろｗ 大人なら、もうちょっとストリクトに書けよな と思ったら、なんだ幼児でちたか 406 名前：デフォルトの名無しさん mailto:sage [2008/10/31(金) 22:30:24 ] >>380 ＞なに必死になっちゃってんの？顔真っ赤ですよぅｗ 光沢モニタってのはなかなか便利なものだな。 407 名前：デフォルトの名無しさん mailto:sage [2008/10/31(金) 22:47:42 ] はいはいでもして事故怪傑してくださいな 408 名前：デフォルトの名無しさん mailto:sage [2008/11/01(土) 00:08:19 ] はいはいスプリクトスプリクト 409 名前：デフォルトの名無しさん mailto:sage [2008/11/01(土) 10:23:04 ] >>406 だな 光沢液晶眺めながらヒゲ剃りも出来そうだ

---

---

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

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