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 333 名前：デフォルトの名無しさん mailto:sage [2010/07/02(金) 14:05:58 ] >>332 ソレ知ってる SeraphyScriptDialogとAutoItXは「機能不足なので使わない」って方が正しい >>328 を分かりやすくしておく 　レジストリ使う時点で糞なので使わんだろ 　　　　↓ 　レジストリ使わなくても鼻糞なので使わんだろ 334 名前：デフォルトの名無しさん mailto:sage [2010/07/02(金) 16:03:24 ] >>333 ならそう書けよ。後出しジャンケン好きはプライドだけは高いから困るんだｗ 会社でもそういわれてるだろ？違うかい？ それで低機能ならSFCminiでも使ってみりゃいいさ。 335 名前：デフォルトの名無しさん mailto:sage [2010/07/02(金) 16:09:06 ] 会社でも近所でも鼻つまみ者です 336 名前：デフォルトの名無しさん mailto:sage [2010/07/03(土) 02:10:03 ] >>334 自作の汎用GUIは「GUI/DLL絡みは外部テキストファイル定義」で、WSHからもコントロール可能にしてある だから SeraphyScriptDialog，AutoItX，SFCmini のような「WSHにベース機能を提供するもの」は使わんよ 「他人がする評価」については否定も肯定もしない 因みにオレは未成年で学生だ 社会人扱いは止めてくれ 337 名前：デフォルトの名無しさん mailto:sage [2010/07/03(土) 13:51:54 ] >>336 ちなみにwin32APIにアクセスしたいときはどうしてるん？プロセス間通信とか、外部のアプリにメッセージ投げたいときとか？ 338 名前：デフォルトの名無しさん mailto:sage [2010/07/03(土) 16:10:54 ] 学校でも家庭でも鼻つまみ者です 339 名前：デフォルトの名無しさん mailto:sage [2010/07/03(土) 18:29:24 ] わざわざ外部ソフト入れんでも.NETやPowerShell使えばええやん 340 名前：デフォルトの名無しさん mailto:sage [2010/07/03(土) 22:24:23 ] >>339 標準語でおk 341 名前：デフォルトの名無しさん mailto:sage [2010/07/03(土) 23:33:34 ] またPowerShellかよｗ　このスレの意味がない。 342 名前：デフォルトの名無しさん [2010/07/03(土) 23:55:49 ] >>337へのレスが無いね。 質問しといて遊び呆けて無ければ良いが… 343 名前：デフォルトの名無しさん mailto:sage [2010/07/04(日) 00:41:11 ] 2chは煽るばっかりで難しい質問には答えられません 344 名前：デフォルトの名無しさん mailto:sage [2010/07/04(日) 01:14:33 ] VBScript コマンドから Windows PowerShell コマンドへの変換 345 名前：デフォルトの名無しさん mailto:sage [2010/07/04(日) 11:21:04 ] GUIはHTAでもいいかも。 足りない部分は外部のDll使おうが、PowerShell使おうが、 そこを関数化しておけばいいんじゃないの？ あとで簡単に置換え出来るでしょ。 Postmessageが使えるだけでもWSHやHTAから出来ることは大きく広がる。 346 名前：デフォルトの名無しさん mailto:sage [2010/07/04(日) 15:46:37 ] TextStreamオブジェクトをFunctionとかで呼んで戻すことができない・・ 347 名前：デフォルトの名無しさん mailto:sage [2010/07/04(日) 16:40:06 ] >>346 あほにはできない・・ 348 名前：デフォルトの名無しさん mailto:sage [2010/07/04(日) 19:22:33 ] >>346 できるよ・・ 349 名前：デフォルトの名無しさん mailto:sage [2010/07/04(日) 21:33:20 ] そういやPowerShellのスレはないんだな 350 名前：デフォルトの名無しさん mailto:sage [2010/07/05(月) 08:54:52 ] win板にあるあるよ 351 名前：デフォルトの名無しさん mailto:sage [2010/07/05(月) 19:50:29 ] ボタンのあるHTMLをieオブジェクトで開いた時、 ボタンクリックのイベントをWSH側で拾うことは 可能ですか? 352 名前：デフォルトの名無しさん mailto:sage [2010/07/05(月) 20:09:42 ] はい 353 名前：351 mailto:sage [2010/07/07(水) 08:05:20 ] ﾋﾝﾄちょうだい 354 名前：デフォルトの名無しさん mailto:sage [2010/07/07(水) 12:34:28 ] JScriptでimportもどきって、こんなんでいいのかな？ function require(module){   if(typeof this[module] == "undefined"){     var  fso = new ActiveXObject("Scripting.FileSystemObject");     eval(fso.OpenTextFile(module + ".js").ReadAll());     this[module] = eval(module);   } } 355 名前：デフォルトの名無しさん mailto:sage [2010/07/07(水) 12:56:52 ] >>354 それだと不便だろ？ ScriptControl使え 356 名前：デフォルトの名無しさん mailto:sage [2010/07/07(水) 14:32:00 ] >>354 それだと不便だろ？ WSF使え 357 名前：デフォルトの名無しさん mailto:sage [2010/07/07(水) 17:10:21 ] // wsfでいいんじゃねえの？.wsf // scriptControlつかおうが、readallでeval使おうが、どっちみち // スクリプトの中からファイル読込みしてやらんと駄目だろ。 // それならwsfのほうが楽だ。 // エディタのマクロには使えんけどな。 // // <job id='main'> <script language='JScript' src='./subinclude.js'> WScript.Echo('wsf'); // </script></job> 358 名前：デフォルトの名無しさん mailto:sage [2010/07/07(水) 17:55:12 ] スクリプトを動的に変更する場合は、一般的にScriptControlを使用する >>354 は必要なときにスクリプトを後付けする構造なので 何でもできるScriptControlにする方がベストだと思う >>357 のやり方はスクリプトの一括読み込みなので構造が違う 無駄なスクリプトも全部読み込みたい場合はwsfでも良いけど ファイル構成も異なるので使い難い 359 名前：デフォルトの名無しさん mailto:sage [2010/07/07(水) 18:04:38 ] >>358 スクリプトコントロールを使うっていっても、その元になるスクリプトを書かれたファイルを読み込まなくていいのか？ たとえばどうやって書くわけよ？ vbsのinput使うみたいな形で、scriptcontrol使ってる例はあるわな。 どうしてもその言語じゃ処理できない場合に使う方法として。 その場合は、スクリプトのなかで記述しちゃってるよね。 >>354は、メインのスクリプトファイルから外部の関数やクラスをimportしたいんだろうから、 その都度読み込もうが、wsfでも何の問題もないと思うんだが。 ScriptControlを使う場合の方法と、そのメリットを判り安く解説してみてくれ。 360 名前：デフォルトの名無しさん mailto:sage [2010/07/07(水) 18:12:49 ] vbsからjsならscriptcontrolかもしれんが、jsからjsならevalでええ、scriptcontrolつかうなんてあほくさ 361 名前：デフォルトの名無しさん mailto:sage [2010/07/07(水) 18:16:58 ] だいたいimportしたいってのは、ファイル構成をわけて、 過去に作った関数を再利用しやすくするためのもんだと思うんだが・・・ ファイル構成をわけたくなきゃ、同じファイルにその関数をコピペすりゃいいだけだが、 それやってくと、それはそれで面倒臭いこともある。 362 名前：デフォルトの名無しさん mailto:sage [2010/07/07(水) 18:34:23 ] scriptcontrolつかいたければつかえば？　どうぞどうぞ　とめないよ 363 名前：デフォルトの名無しさん mailto:sage [2010/07/07(水) 19:57:08 ] importしたい奴にScriptControlのほうがいいと薦めるのか？ 意味がわからん。誰か解説ヨロ 364 名前：デフォルトの名無しさん mailto:sage [2010/07/07(水) 21:34:04 ] 断る 365 名前：デフォルトの名無しさん mailto:sage [2010/07/07(水) 21:41:20 ] <?xml version="1.0"?><package><job id="fso"><script language="VBScript"><![CDATA[ rem objIEに走っているスクリプトを入れて関数を呼び出す　Unicode で保存 Function obj(jobName) :Set Container = GetObject("new:{C08AFD90-F2A1-11D1-8455-00A0C91F3880}") CreateObject("Wscript.Shell").Run "Cmd.exe /c Cscript.exe //Nologo " & _ """" & Wscript.ScriptFullName & """" & " //job:" & jobName & " " & Container.HWND & _ " || (echo Error In JobInitialize. & pause) ", 6 On Error Resume Next :Do :Err.Clear:Set objScript = Nothing Set objScript = Container.GetProperty(Container.HWND) Loop While objScript Is Nothing : On Error Goto 0 If Err.Number <> 0 Then : Err.Raise Err.Number : End If Set obj = objScript : Container.Quit : Set Container = Nothing :End Function ]]></script><script language="VBScript"><![CDATA[rem *** FUNCTIONS *** Function objSelf() : Set objSelf = CreateObject("Scripting.FilesystemObject").GetFile(WScript.ScriptFullName) End Function ]]></script><script language="VBScript"><![CDATA[If WScript.Arguments.Count = 0 Then Set fso = obj("fso") : msgbox fso.objSelf.Path ,32 : fso.Quit End If]]></script><script language="VBScript"><![CDATA[If WScript.Arguments.Count = 1 Then PutPropertyMyself() : Zzz() : Sub PutPropertyMyself() : PropertyID = Wscript.Arguments(0) + 0 For Each objIE In CreateObject("Shell.Application").Windows : If objIE.HWND = PropertyID Then objIE.PutProperty PropertyID, Me : Exit For End if : Next : End Sub : Sub Quit() : WScript.Quit : End Sub : Sub Zzz() : Wscript.StdOut.WriteLine "id: " & WScript.Arguments(0) Do : Wscript.Sleep 1000 : Wscript.StdOut.Write "Zzz..." : Loop : End Sub End If]]></script></job></package> 366 名前：デフォルトの名無しさん mailto:sage [2010/07/07(水) 22:46:31 ] つまらん 367 名前：デフォルトの名無しさん mailto:sage [2010/07/08(木) 13:33:47 ] IEのハンドル調べて、オブジェクトとプロパティのやり取りしていろいろやるのか。凄いな。 で何が凄いんだが、解説ヨロ 368 名前：デフォルトの名無しさん mailto:sage [2010/07/08(木) 19:10:09 ] 面倒だからやだ 369 名前：デフォルトの名無しさん mailto:sage [2010/07/08(木) 21:27:57 ] 複数ジョブを走らせると 終了時にcmd.exe が成仏しないことに 気がつきましたので 差し替えさせていただきます どーも　すみません 370 名前：デフォルトの名無しさん mailto:sage [2010/07/08(木) 21:28:51 ] <?xml version="1.0"?><package><job id="fso"><script language="VBScript"><![CDATA[ rem よそのスクリプトの関数を呼ぶ.wsf Unicodeで保存 Function obj(jobName) : Set container = GetObject("new:{C08AFD90-F2A1-11D1-8455-00A0C91F3880}") CreateObject("Wscript.Shell").Run "Cmd.exe /c Cscript.exe //Nologo " & _ """" & Wscript.ScriptFullName & """" & " //job:" & jobName & " " & container.HWND & _ " || (echo Error In JobInitialize. & pause) ", 6 : On Error Resume Next : Do : Err.Clear Set script = Nothing : Set script = container.GetProperty(container.HWND) : Loop While script Is Nothing On Error Goto 0 : If Err.Number <> 0 Then : Err.Raise Err.Number : End If Set obj = script : container.Quit : Set container = Nothing : End Function ]]></script><script language="VBScript"><![CDATA[Function objHere() Set objHere = CreateObject("Scripting.FilesystemObject").GetFile(WScript.ScriptFullName).ParentFolder End Function]]></script><script language="VBScript"><![CDATA[If WScript.Arguments.Count = 0 Then Set fso = obj("fso") : msgbox fso.objHere.Path, 32 : fso.Quit = TRUE End If]]></script><script language="VBScript"><![CDATA[Dim Quit If WScript.Arguments.Count = 1 Then : PutPropertyMyself() : Zzz() : End If Sub PutPropertyMyself() : PropertyID = Wscript.Arguments(0) + 0 For Each objIE In CreateObject("Shell.Application").Windows If objIE.HWND = PropertyID Then : objIE.PutProperty PropertyID, Me : Exit For : End if : Next : End Sub Sub Zzz() : Do : Wscript.Sleep 1000 : Wscript.StdOut.Write Typename(Quit) If Quit Then : Exit Do : End If : Loop : End Sub]]></script></job></package> 371 名前：デフォルトの名無しさん mailto:sage [2010/07/09(金) 17:55:11 ] GetObject("new:つかってみたかったのか？ CreateObject(ie)でよかろうもん 372 名前：デフォルトの名無しさん mailto:sage [2010/07/09(金) 18:28:23 ] どっちもいらんけどな 373 名前：デフォルトの名無しさん mailto:sage [2010/07/16(金) 21:18:50 ] おまいらWSHのデバッグどうしてる？ エラーダイアログ見て直す？あと個別に変数表示させる？ またはスクリプトデバッガいれてレジストリ直して//xでやってる？ もっと他にいい方法あるかな？ 自分でツール作ってやってる人いるかな？ 374 名前：デフォルトの名無しさん mailto:sage [2010/07/16(金) 22:43:29 ] >>373 いわゆる printf デバッグ ただ、WScript.Echo() のままでは面倒なので、 msgout("a={0}, b={1}", [a, b]) みたいに使えるヘルパ関数は自作してる 375 名前：デフォルトの名無しさん mailto:sage [2010/07/16(金) 22:53:26 ] よく使うのは msgbox escape() msgbox typname() だね 376 名前：デフォルトの名無しさん mailto:sage [2010/07/16(金) 23:09:08 ] 正規表現とかの文字列処理は組み込んでからデバッグするんじゃなくて 該当部分だけ先にインタプリタ系ツールで試して問題ないことを確認してから プログラムの本体に組み込む 377 名前：デフォルトの名無しさん mailto:sage [2010/07/17(土) 00:36:58 ] なるほどなるほど・・・ MSのスクリプトデバッガつかってるひとはいないのか。 試してみて、使いやすいとは思えなかったんでエディタと連携させて 自分で適当な関数を作ったほうがいいのかもしれんと思ったのだが・・・ デバッグに絡んで、関数の中で、実行中のその関数の名前を取得したいと思って いろいろ試してるんだが、 functest=function(a){ s1=arguments.callee.toString() ;//だとfunction以降の中身が表示されて、関数の名前は表示されない。 s2=arguments.callee.name;//　だとnetscapeでは関数の名前が表示されるらしいがJscriptでは使えない。 WScript.Echo(s1 +"\n"+ s2); }; functest(); ということでいろいろ聞きたかったんだが function　functest(a){ とやることで名前を取得できるメドが立ちましたｗ 一応チラ裏ってことでメモ。 378 名前：デフォルトの名無しさん mailto:sage [2010/07/17(土) 13:59:43 ] IE8に標準のデバッガ使うのはどうだ？ラッパー関数つかって誤魔化せばどうにかなりそうだが。 379 名前：デフォルトの名無しさん mailto:sage [2010/07/20(火) 00:33:11 ] JScript(HTA)で 20→"\x20\00\00\00" // 32bitリトルエンディアン みたいな変換をする方法があったら教えてください バイナリ列を扱おうとして詰まった・・・(´･ω･｀) 380 名前：デフォルトの名無しさん mailto:sage [2010/07/20(火) 01:05:23 ] >>379 20 => "\x14\x00\x00\x00" でよいのかな? それでよいなら無理やりだけど以下 function SaveBin(filename, bin) { var stm = new ActiveXObject("ADODB.Stream"); stm.Type = 1; // 1=adTypeBinary; stm.Open(); stm.Write(bin); stm.SaveToFile(filename, 2); // 2=adSaveCreateOverWrite } function CodeToBinary(code) { var uc1 = String.fromCharCode(code & 0xffff); var uc2 = String.fromCharCode((code >> 16) & 0xffff); var stm = new ActiveXObject("ADODB.Stream"); stm.Type = 2; // 2 = adTypeText stm.Charset = "UNICODE"; stm.Open(); stm.WriteText(uc1); stm.WriteText(uc2); stm.Position = 0; stm.Type = adTypeBinary; stm.Read(2); return stm.Read(4); } SaveBin("binary1.dat", CodeToBinary(20)) SaveBin("binary2.dat", CodeToBinary(65536)) 381 名前：379 mailto:sage [2010/07/20(火) 02:32:44 ] >>380 レスありがとうございます >20 => "\x14\x00\x00\x00" でよいのかな? そうです。>>379は誤りですorz そのような力業しかないのですか・・・ がんばってみます 382 名前：デフォルトの名無しさん mailto:sage [2010/07/20(火) 03:45:38 ] こういうのじゃだめなん？ function toString32LE(code){   var s = "";   for (var i = 0; i < 4; ++i) {     var  n = code & 0xff;     code = code >> 8;     s += String.fromCharCode(n);   }   return s; } function parseString32LE(str) {   return (     str.charCodeAt(0) +     (str.charCodeAt(1) << 8) +     (str.charCodeAt(2) << 16) +     (str.charCodeAt(3) << 24)   ) >>> 0; } 383 名前：380 mailto:sage [2010/07/20(火) 13:13:50 ] >>382 以前試したとき、文字列で保持するとファイル読み書きが うまくできなかった気がした バイナリファイルの解析みたいなものだとそれがネックになる 逆にいえば、それを気にしないか、あるいは読み書きがクリアできるなら 確かに文字列の方が楽だと思う JavaScriptで画像解析みたいなネタもどこかで見たので、 ひょっとするとそもそもそんな難しい問題ではないのかもしれないが 384 名前：デフォルトの名無しさん mailto:sage [2010/07/21(水) 03:22:23 ] JScriptのバイナリファイルアクセスは鬼門だよな。 書き出しはADODB.Streamをlatin-1で使えばいいとして、読み込みがしんどい。 バイナリタイプでは手も足も出ないからテキストタイプを使うしかないけど、 latin-1で読み込むと0x80-0x9fがutf-16の対応する文字に変換されちゃうし(逆変換で対応)、 utf-16で読み込むと先頭がBOMに一致する場合の対処が必要だし、 他のキャラクタセットだともっとめんどいし。 385 名前：デフォルトの名無しさん mailto:sage [2010/07/21(水) 15:29:48 ] そうかなぁ ADODB.Stream使えば読むのも書くのも自由自在だけど バイナリを１バイト置きにコピーしてUnicodeで見ればよい。 386 名前：デフォルトの名無しさん mailto:sage [2010/07/22(木) 00:54:32 ] 結局テキストファイルほど簡単にはいかなくて、>>380みたいな変換処理が必要になるのか。 387 名前：デフォルトの名無しさん mailto:sage [2010/07/22(木) 02:41:08 ] 00-ffを透過するコードページを使う 388 名前：デフォルトの名無しさん mailto:sage [2010/07/22(木) 19:15:04 ] ADODB.Streamはマカフィーが問答無用で警告を出すのでちょっと使いにくい(特にスクリプトを配布する場合) 389 名前：デフォルトの名無しさん mailto:sage [2010/07/22(木) 19:49:06 ] HTML＋JavaScriptでアプリ作成の決め手になるの？Titaniumってやつ。 Windows, Linux, Mac, Andoroid,iPhoneまで同じ技術でカバー出来るらしいが。 HTAみたいなもんか？ オマイらどう思う？ ここはAppcelerator Titaniumの日本語情報を整備するためのプロジェクトです。 クロスプラットフォームのアプリ開発としては非常に敷居が低く、javascriptだけでなくpythonやruby、phpなどを利用する事で、 webサービス系ライブラリの流用も可能であり、手軽なツールからサービスクライアントの作成が非常に容易になります。 * 2010/03/22 o 公開 ttp://www.appcelerator.com/products/download/ Titanium Desktopでアプリケーション開発中 ttp://blog.livedoor.jp/takabrk/archives/52647017.html Appcelerator Titanium DesktopでRuby,Python,PHPを使ったお手軽デスクトップアプリ開発その１ ttp://d.hatena.ne.jp/yuichi_katahira/20100219/1266605194 390 名前：デフォルトの名無しさん mailto:sage [2010/07/24(土) 09:49:36 ] 謎のオブジェクトを発見 rem a.vbs msgbox WSH Is WScript 391 名前：デフォルトの名無しさん mailto:sage [2010/07/24(土) 15:39:44 ] >>390 ほれ 謎のオブジェクトを発見.js for(var o in this){WScript.Echo(o);} 392 名前：デフォルトの名無しさん mailto:sage [2010/07/27(火) 11:04:47 ] //なるほど。その方法でも関数の名前が取得できるね。 getfunctionname=function(obj){ var sname;for(sname in obj){;}; return(sname); }; funtest=function(s){ var sret=getfunctionname(this); WScript.Echo('1 '+ function(){var s='';for(var o in this){s=o;};return(s); }() ); return(sret); }; WScript.Echo('この関数の名前は '+ funtest() ); 393 名前：デフォルトの名無しさん mailto:sage [2010/07/28(水) 10:14:25 ] ログをＥｘｅｃｅｌシートに貼り付け〜なんて非生産的な作業があって、これをKeyLoggerみたいなので 自動化できればと思いまして、ＷＳＨで作れるかなと思ったのですが。 あまり詳しくないんだけども、イベントを追跡してってソフトの起動、ボタンクリック等の操作を記録で きますでしょうか？それが無理ならキーボードのキーやマウス操作を記録して操作の再現ができますか？ 394 名前：デフォルトの名無しさん mailto:sage [2010/07/28(水) 10:52:32 ] Excelのオブジェクトを操作するんじゃなくて、キー操作でうにゃうにゃしたいなら UWSCでいいんじゃないの？日本語HELPもある。ポータブルでも動くし。 途中で複雑な判断いらない処理なら、UWSCでキー操作を記録して片付けるのがいい。 WSHに詳しくて、その技術を使って途中でいろいろ処理を分けたほうがいいとしたら、 他のソフトに絡むとこだけUWSCで記録しといたマクロをRunさせてまぜて使うとか。 またはAutoItXのDLL使って、ほかのソフトと絡む部分だけ処理させる。 USBのフォルダにシステムからコピーしたWScript.ExeやCscript.exeとmanifestとDLL使えば UWSCと同じようにポータブルでも使える。 395 名前：デフォルトの名無しさん mailto:sage [2010/07/28(水) 16:58:13 ] excelでやれば 396 名前：デフォルトの名無しさん mailto:sage [2010/07/28(水) 22:50:48 ] ありがとうございますAutoItにUWSCですね。これはしかし動作を指定する必要がありますね。 癖とかありそうで結構手間がかかりそう。。 単純にWindows上の操作を一定期間記録して後で再現とか、できないんですかね。 397 名前：デフォルトの名無しさん mailto:sage [2010/07/29(木) 02:52:53 ] すれ違いだよ 398 名前：デフォルトの名無しさん mailto:sage [2010/07/29(木) 02:59:51 ] ソフト板で聞け 399 名前：デフォルトの名無しさん mailto:sage [2010/07/29(木) 03:21:57 ] 謎のオブジェクトを発見 rem a.vbs msgbox typename(me) 400 名前：デフォルトの名無しさん [2010/07/29(木) 05:19:19 ] >>396 こいつ、UWSCについて調べずに書き込んだな。 401 名前：デフォルトの名無しさん mailto:sage [2010/07/29(木) 08:02:10 ] >>単純にWindows上の操作を一定期間記録して後で再現とか、できないんですかね。 UWSCってそういうことするためのソフトなんだが・・・ 402 名前：デフォルトの名無しさん mailto:sage [2010/07/29(木) 09:52:25 ] ゴメンさらっと見てそういう事ができると思わなかった。UWSC便利ですね。 複数のソフトをダウンロード＆自動インストールなんて事もできるんだろうか・・ ちょっと使ってみます。どうも。 403 名前：デフォルトの名無しさん mailto:sage [2010/07/31(土) 17:11:20 ] Document.body.innerTextでWeb上の文字列を取得し その文字列に含まれるキーワードを検索して 発見した場合の処理と見つからなかった時の処理をするにはどうしたらいいでしょうか if ((IE.Document.body.innerText)==("文字列")) { //処理1 } else { //処理2 }; これだと動かないのです 404 名前：デフォルトの名無しさん mailto:sage [2010/07/31(土) 18:31:36 ] vbscriptならinstr()だな 405 名前：デフォルトの名無しさん mailto:sage [2010/07/31(土) 19:08:06 ] >>404 ありがとうございます JavaScriptではどうなのでしょうか 406 名前：デフォルトの名無しさん mailto:sage [2010/07/31(土) 19:21:28 ] Stringオブジェクトのメソッドに同じようなものがあるだろ 407 名前：デフォルトの名無しさん mailto:sage [2010/07/31(土) 19:33:28 ] match()？ 408 名前：デフォルトの名無しさん mailto:sage [2010/07/31(土) 21:22:20 ] if( /hogehoge/i.test(IE.Document.body.innerText)){ / * true * /;　 ;}else{　/ * false * / ;}; //正規表現のtestじゃだめか？ 409 名前：デフォルトの名無しさん mailto:sage [2010/08/03(火) 15:41:46 ] >>403 自分は、この方法で逃げている。 if ((IE.document.body.innerText).indexOf("文字列") != -1) { // 処理1} else { // 処理2 }; VBSはシラネ 410 名前：409 mailto:sage [2010/08/03(火) 15:53:02 ] match()を使うなら、 if ((IE.document.body.innerText).match(/文字列/) != null) { // 処理1 } else { // 処理2 }; 411 名前：デフォルトの名無しさん mailto:sage [2010/08/03(火) 17:43:08 ] Webページを操作するなら、スクリプト使うのが前提の ＮｉｌとかBugとかプニルつかって、そっちのオブジェクトつかったほうがいいんじゃない？ どうしてもＩＥ使ったほうがいいの？ 412 名前：デフォルトの名無しさん mailto:sage [2010/08/03(火) 20:15:08 ] >>409のついでに質問してみる innerHTMLで文字列を発見した時その行のリンクをクリックするのは可能？ 413 名前：409 mailto:sage [2010/08/03(火) 20:51:08 ] >>412 可能だとは思う。 該当するinnerHTMLが含まれている、"a"タグを特定して、.click()で出来るのでは。 自分は泥臭い方法でやってるけど、スマートな方法が有ったら教えて欲しい。 自分がやっている方法： for (var i = 0; i < IE.document.all.tags("a").length; i++) { if ((IE.document.all.tags("a")[i].outerHTML).indexOf("文字列") != -1) { IE.document.all.tags("a")[i].click(); // リンクをクリック後に行う処理 break; } } 414 名前：デフォルトの名無しさん mailto:sage [2010/08/03(火) 20:54:03 ] >>412 リンクからたどればよい for (i=0; i<ie.document.links.length; i++) { if (ie.document.links[i].innerText=="リンク文字列") { ie.document.links[i].click(); break; } } もし、リンク文字列ではない文字列から近隣のリンクを探したいってことならもっと面倒になる 415 名前：デフォルトの名無しさん mailto:sage [2010/08/03(火) 21:55:44 ] >>414 >もし、リンク文字列ではない文字列から近隣のリンクを探したいってことならもっと面倒になる それがやりたいけど方法が思いつかないのよね >>413のように IE.document.all.tags("a")[i].click(); を使えばできるかもしれないけど これだと 目的のリンクをクリックしてくれるとは限らないというね 416 名前：デフォルトの名無しさん mailto:sage [2010/08/03(火) 21:59:15 ] >>415 indexOfで文字列を発見した所より前の文字列でIE.document.all.tags("a")[i].click(); を使う・・・あ　できるかも ちょっとソースコード書いてみる 417 名前：409 mailto:sage [2010/08/03(火) 22:09:17 ] >>415 ＞>もし、リンク文字列ではない文字列から近隣のリンクを探したいってことならもっと面倒になる ＞それがやりたいけど方法が思いつかないのよね 文字列が、aタグの外に有る場合なの？ 文字列0<a href="...">文字列1</a>文字列2 で、文字列1ではなく、文字列0や文字列2を探してクリックとか。 確かに面倒だね。 .parentNodeとか、.previosSiblingや.nextSiblingとか、ゴチャゴチャ使わないと駄目そうだね。 418 名前：409 mailto:sage [2010/08/03(火) 22:10:27 ] もう眠い。 今日は寝る。 419 名前：デフォルトの名無しさん mailto:sage [2010/08/03(火) 22:13:23 ] >>417 <a href="...">文字列1</a>文字列2 文字列2を検索するのは if ((IE.document.body.innerText).indexOf("文字列2") != -1) 文字列1を検索するには 文字列2より前の文字列を検索する必要がある 420 名前：デフォルトの名無しさん mailto:sage [2010/08/03(火) 22:20:14 ] >>419 調べてみたら使えそうなものがあった lastIndexOf これでソースコードを完成できるよ　みんなありがとう 421 名前：デフォルトの名無しさん mailto:sage [2010/08/03(火) 22:43:38 ] for (i=0;i< IE.document.all.tags("a").length; i++) { if ((IE.document.all.tags("a")[i].outerHTML).lastIndexOf("文字列2") != -1) { IE.document.all.tags("a")[i].click(); これじゃだめなのか・・・ 422 名前：409 mailto:sage [2010/08/04(水) 06:50:25 ] >>421 それ、後方から文字列を探すやつ。 前方から探すより、後方から探す方が探す時間が短い場合が有るから、そういう時に自分は使っている。 例えば、文字列1と文字列2が、非常に酷似していて、最後の数文字だけが異なる様な場合、比較回数が多分少ないのではないかと… <a href="...">[文字列A][文字列1][文字列B][文字列2][文字列C]</a> とかの場合。 423 名前：409 mailto:sage [2010/08/04(水) 15:22:56 ] >>421 HTMLのタグ構造がどうなっているか示さないと、一体何をしたいのか分からないと思うよ。 (１) <div><a href="...">文字列1</a>文字列2</div> となっているのか、 (2) <a href="...">文字列1</a><p>文字列2</p> となっているのか等。 (1) の場合、 for (var i = 0; i < IE.document.all.tags("a").length; i++) { if ((IE.document.all.tags("a")[i].parentNode.indexOf("文字列2") != -1) { IE.document.all.tags("a")[i].click(); break; } } (2) の場合、 for (var i = 0; i < IE.document.all.tags("a").length; i++) { if ((IE.document.all.tags("a")[i].nextSibling.outerHTML).indexOf("文字列2") != -1) { IE.document.all.tags("a")[i].click(); break; } } とかじゃ駄目かな？ 試してないから分からないけど。 424 名前：409 mailto:sage [2010/08/04(水) 15:29:47 ] それより、JScriptからファイルをランダムアクセスする事って出来ないのかなぁ？ JScriptから利用出来るフリーのDLLとか有れば良いんだけど。 Perl等のファイルにランダムアクセス可能なスクリプトからIE操作すれば、一番良いんだろうけど、 PerlもVBも分かんねーし。 425 名前：デフォルトの名無しさん mailto:sage [2010/08/04(水) 18:06:24 ] >>ファイルをランダムアクセスする ？？？ 426 名前：デフォルトの名無しさん mailto:sage [2010/08/04(水) 21:24:12 ] >>424 adodb.streamは？ 427 名前：デフォルトの名無しさん mailto:sage [2010/08/05(木) 08:18:18 ] IEのボタンクリック VBSだとちゃんとできるのにJScriptだとできないなぜだぁぁぁぁ <form action="." method="post" > <input type="hidden" name="...." value="..." class=""> <input type="hidden" name="..." value="..." class=""> <input type="hidden" name="..." value="..." class=""> <input type="hidden" name="..." value="..." class=""> <input type="hidden" name="..." value="..." class=""> <input type="hidden" name="..." value="...." class=""> <center> <input type="submit" value="..." class="..."> </center> </form> VBS : IE.Document.Forms(0).Item(6).click JScript : IE.Document.forms(0).Item(6).click(); 428 名前：デフォルトの名無しさん mailto:sage [2010/08/05(木) 09:31:37 ] これも反応しない <input type="text" value="" size="20" class="test"> IE.Document.forms(0).Item(0).value = "あああ" 429 名前：デフォルトの名無しさん mailto:sage [2010/08/05(木) 10:22:11 ] そういうことなら、その部分だけとりあえずはスクリプトコントロールで逃げといて、あとでじっくり考えるｗ 430 名前：デフォルトの名無しさん mailto:sage [2010/08/05(木) 22:30:49 ] JScriptで普通にいけるんじゃないの? ie = new ActiveXObject('InternetExplorer.Application'); ie.visible = true; ie.navigate('www.google.co.jp/') WScript.Sleep(2000); ie.document.forms(0).item(2).value='WSH'; ie.document.forms(0).item(3).click(); 431 名前：デフォルトの名無しさん mailto:sage [2010/08/06(金) 08:25:47 ] >>430 どうもそのページだけできないんだ 入力フォームをクリックするとフォームの横に文字が表示されるものだから Inputタグのclassが怪しいと思うんだが 432 名前：409 mailto:sage [2010/08/06(金) 12:13:20 ] >>431 nameやclassの属性がformsになっていたりしない？ 433 名前：デフォルトの名無しさん mailto:sage [2010/08/06(金) 12:30:33 ] >>432 なってない さすがにそんなミスはない

---

---

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

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