お前ら、wsh使ってますか? Part7at WIN
お前ら、wsh使ってますか? Part7 - 暇つぶし2ch920:名無し~3.EXE
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
はい


最新レス表示
レスジャンプ
類似スレ一覧
スレッドの検索
話題のニュース
おまかせリスト
オプション
しおりを挟む
スレッドに書込
スレッドの一覧
暇つぶし2ch