10/06/03 17:53:48 iUihJw3M
var ie;var url,login_id,login_pw;function wait() { while(ie.Busy || ie.ReadyState!=4){ WScript.Sleep(100); }} function browser() { ie=new ActiveXObject('InternetExplorer.Application');ie.Visible=true;ie.Navigate(url);wait(); }
function post() { ie.document.forms[0].exec.click();wait(); } function reload() { ie.Navigate(url);wait(); } try{ url='★';browser();for (i = 0; i < 5; i++) { post();reload();}} catch(e){ } finally{ ie.Quit(); }
これのtry{}にあるurlに書かれたURLに飛んだあと別のURLに飛ぶようにできないのだろうか
var ie;var url,login_id,login_pw;function wait() { while(ie.Busy || ie.ReadyState!=4){ WScript.Sleep(100); }} function browser() { ie=new ActiveXObject('InternetExplorer.Application');ie.Visible=true;ie.Navigate(url);wait(); }
function post() { ie.document.forms[0].exec.click();wait(); } function reload() { ie.Navigate(url);wait(); } try{ url='★';browser();url='★';for (i = 0; i < 5; i++) { post();reload();}} catch(e){ } finally{ ie.Quit(); }
これだと飛ばぬ・・・
921:名無し~3.EXE
10/06/03 18:23:45 iUihJw3M
>>920にあともう一つ
IEタブを2つ表示させて 1つ目のタブにURL1を
2つめのタブにURL2を飛ばしたいけどどうしたらいいのかわからない
922:名無し~3.EXE
10/06/09 14:11:04 iwdCkyf4
>>921
navOpenInNewTab
923:名無し~3.EXE
10/06/09 19:47:37 dzSkViOB
>>922
それvbsだよね?
JavaScriptでは無理なのか?
924:名無し~3.EXE
10/06/09 19:56:48 jlgSYqLi
言語には関係ない
925:名無し~3.EXE
10/06/10 14:14:01 kJViM8Jd
ExecWBでソースの表示ってできない?
926:名無し~3.EXE
10/06/10 15:22:23 6Q2g02au
ブラウザそのものにはソースとかないしなぁ
927:名無し~3.EXE
10/06/11 12:21:04 uxlvNz01
>>925
IOleCommandTarget::Exec
928:名無し~3.EXE
10/06/11 23:26:51 biU9CjCk
JScriptをコンパイルしたいんだが、
WScriptオブジェクトなんてしらねって弾かれてもうた(´・ω・`)
Wscriptオブジェクトを引っ張ってくる方法か、
QUITとADODB.Streamの代替手段をおしえてくだせえ
929:名無し~3.EXE
10/06/12 00:31:54 tGmfb7H0
SendKeysで今までWebブラウザや2chブラウザOffice関連やその他の色んなソフトで自動化に成功してきましたが、
ゲームのエミュレータにだけはなぜか、ウィンドウをアクティブにした状態であってもキーを送れないです。(反応しないので送れているかわからない)
nnnesterやsnes9kやMAMEなどで試しましたが、どれもSendKeysで送ったキーでゲーム内のキャラが動いてくれませんでした。
エミュレータは(SendKeysが可能な)他のアプリケーションとは入力の受付方法が違うのでしょうか
またそのようなソフトに対してはWSHではキーを送って操作することは不可能ですか?
930:名無し~3.EXE
10/06/12 00:58:38 tGmfb7H0
調べたところ、SendKeysの問題ではなく、アプリケーション側のDirectInputの方の問題でした。
解決したのですみません。お邪魔しました
931:名無し~3.EXE
10/06/12 21:51:27 RtlbTOqz
win7でIE起動しようと思ったら動かない
Option Explicit
Dim objIE
Set objIE = CreateObject("InternetExplorer.Application")
Set objIE = Nothing
932:名無し~3.EXE
10/06/13 01:10:20 Czl7gJkW
そりゃだめだ
933:名無し~3.EXE
10/06/13 01:42:07 O+PAYz4/
Win XPの標準機能のみでパスワード付きZIPファイルを作りたいのですが、
VBScriptで実現させるにはどうやったらよいのでしょうか?
(できればSendKeys未使用で)
用は↓にパスワード機能を追加したいのです・・・
URLリンク(www.vector.co.jp)
934:名無し~3.EXE
10/06/13 07:43:33 ejrpzprv
>>933
unzip32.dllを実行する.exeってなかったっけ?
そいつに引数を渡す、つまり単純なWScript.ShellのRunってのはダメなのか?
935:名無し~3.EXE
10/06/13 11:42:29 h7K8R6ZR
会社のPCとかで、DLLやexeを勝手に入れられない環境なのかも。
ところで、Win XPの標準機能でパスワード付きZIPって作れたっけ?
936:名無し~3.EXE
10/06/13 13:08:28 OOuLiq/a
>>935
zipファイルをフォルダとして開いて、その中で右クリックして「パスワードの追加」を選ぶ
>Windows XP で圧縮 (zip) フォルダーを作成および使用する方法
>URLリンク(support.microsoft.com)
Shell.ApplicationのNameSpaceでzipファイルを開いて
InvokeVerbで出来ないかな・・・と思ったんだが、
どうも通常のコンテキストメニューじゃないっぽい。
というわけで漏れはあきらめて、7-zip.exe経由のスクリプトにした罠
937:名無し~3.EXE
10/06/14 02:59:19 Shk6x1Ga
SendKeysでできるならそれでいいじゃないか
938:名無し~3.EXE
10/06/15 16:20:48 U7q+ETSX
>>928
var Wscript=new Object();
939:名無し~3.EXE
10/06/27 20:05:44 519MlYZh
ScriptControlについて詳しく解説してるページはないでしょうか
MSのページ以外で
940:名無し~3.EXE
10/07/06 18:27:24 /FuRxImU
はい