- 1 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/16(月) 07:57:49 ID:+HI9MOeK0]
- Windowsを自動化させるツールUWSC。
ttp://www.h7.dion.ne.jp/~umiumi/
uwsc使いのみなさま、ﾏﾀｰﾘ己のスクリプトを晒しましょ。
前スレ
自動化ツールuwsc使いよ集まれ2
pc11.2ch.net/test/read.cgi/software/1156416884/
- 766 名前：733 mailto:sage [2009/01/19(月) 15:25:59 ID:V9clvX4k0]
- みなさんのヒントを元になんとか完成しました。
またつまづいたらよろしくお願いします。
- 767 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/19(月) 20:54:27 ID:qcrdC3FS0]
- ハハ お断りします
(ﾟωﾟ)
＿(_つ/￣￣￣/＿
＼/＿＿＿/
- 768 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/20(火) 00:58:10 ID:CMylmmuM0]
- [Ver4.5]
- 769 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/20(火) 01:37:12 ID:0N/gC0gi0]
- 高レベル記録…
なんというお手軽システム。
- 770 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/20(火) 10:17:34 ID:Rt1OsezX0]
- うう、まだcall文で変数が使えんのか・・・
- 771 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/20(火) 11:22:31 ID:mivuHGw40]
- IE_Subってもう入手できないの？
- 772 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/20(火) 16:02:13 ID:6xnO4udb0]
- 一昨日からスクリプト組始めたんですが、どうにも配列変数の使い方(定義を含めて)がわからないので
詳しい方ご教示願います。
例えば変数ABC(x､y)に10*10=100個の変数にX軸Y軸共に1を格納していく場合、
BASICで書くと（うろ覚えですけど。）
FOR Y=0 to 9
FOR X=0 to 9
ABC(X,Y)=1
X=X+1
NEXT X
Y=Y+1
NEXT Y
と、したい所をuwscでは最初にどう定義して配列変数を使っていけばいいですか？
ヘルプ見たんですけど、イマイチイメージがつかめません
お願いします。
- 773 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/20(火) 16:09:22 ID:6xnO4udb0]
- あ、FOR〜NEXTってX=X+1とかいらないんだっけ？・・・orz
- 774 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/20(火) 17:49:05 ID:LpFWL/UM0]
- どうって、
DIM ABC[10][10]って定義して
> ABC(X,Y)=1
ABC[X][Y]=1
っていれてくだけでしょ…
- 775 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/20(火) 18:03:13 ID:6xnO4udb0]
- ああ、（x,y）じゃなくて[x,y]じゃないといけないのね・・・helpそういう意味かorz
とんだ勘違いしてました。どうもです
- 776 名前：名無しさん＠お腹いっぱい。 [2009/01/23(金) 08:39:26 ID:n0Gk8YsY0]
- 複数のスクリプトを連続で起動させるにはどうすればよいですか？
1のスクリプトがおわったら自動的に2をのスクリプト起動、2→3、3→4...という感じです。
- 777 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/23(金) 10:36:35 ID:E4bxtYk+0]
- >>776
各ｽｸﾘﾌﾟﾄの最後でcall。
もしくは
exec("ﾌﾙﾊﾟｽ\uwsc.exe ﾌﾙﾊﾟｽ\hoge.uws")
こちらは多重起動禁止だとダメかもしれん。
- 778 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/23(金) 12:19:14 ID:v1eHViqS0]
- >>776
1の頭で2,3,4をcallして
1でprocedureやFunctionを順に呼び出してもいいよ
- 779 名前：名無しさん＠お腹いっぱい。 [2009/01/23(金) 12:30:51 ID:n0Gk8YsY0]
- >>777
>>778
ありがとうございました。とても参考になりました。
- 780 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/23(金) 14:55:53 ID:uyPNdhnC0]
- >>705さんの
>IEを操作するのならCOM使うとフォーカス奪われないよ
これについて理解を深めたいのですがどのあたりを具具れ場良いのでしょうか？
- 781 名前：705 mailto:sage [2009/01/23(金) 20:41:40 ID:CkpYM4hA0]
- >>780
これに関してはググってないからわかんない
ヘルプのじゃ難しい？
スクリプト > スクリプト関数 > COMオブジェクト, IE操作関連
あとはページソースと睨めっこ
- 782 名前：780 mailto:sage [2009/01/23(金) 22:39:18 ID:aJMC8HA30]
- >>781 ありがとうございます。よく読んでみます。
- 783 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/24(土) 16:24:29 ID:T53k2DPg0]
- かなり、基本的なことで恥ずかしいことなのですがどうしても解決できず…
HAZU = GETID("www.***")
ClkItem(HAZU, "事件", CLK_BTN)
上記では、webウィンドウ上のアイテムをくりっくすることができません。
エラーは起きないのですが。。
原因としてはなにが考えられるでしょうか？
- 784 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/24(土) 16:35:10 ID:jFu+yqaK0]
- left clickではないだろうか。
- 785 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/24(土) 17:06:55 ID:JOvNHrQj0]
- >>781=>>783？
- 786 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/24(土) 19:22:15 ID:nTyZ62iO0]
- 早速のへんしんあり
Left Clickということは、そのあとに座標指定ですよね？
web上だとずれてしまいませんか？？
>>785
違いますよ〜
- 787 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/25(日) 02:35:43 ID:XdmZStkM0]
- >>782
わからなかったからここできくといいよ
その時はURL晒すように！
↓のようなレベルの質問しなければだけどｗ
ID:5VRwikzI0
ID:V1b5lGQF0
>>783
IE上のはCOMで書かないとだめ
ウィンドウ関連はWindowsフォームを扱うもの
- 788 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/25(日) 12:17:04 ID:mUdf+86S0]
- ＣＯＭで書くと言うことは、C++や、java言語で組め
ということですか？
- 789 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/25(日) 12:29:17 ID:KXHTzu1o0]
- 座標(720,100)の赤要素が200〜255の時はAキーを押し、
赤要素が199以下の時はBキーを押す。
というように動かすにはどう記述すればいいですか？
----------------------------------------------
IFB (PEEKCOLOR(720,100) and $0000FF) 55 then
KBD(VK_A,CLICK,40)
ELSE
KBD(VK_B,CLICK,40)
ENDIF
----------------------------------------------
上記のように書きましたがうまくいきません。
ご教授お願いします。
- 790 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/25(日) 13:03:24 ID:mUdf+86S0]
- ＩＥ上の、どのラジオボタンをクリックするのかを指定するにはどのようにすればよいのでしょうか？
IESetData(IE,True,"lr","lang_ja") // ラジオボタン選択：日本語のページを検索
IESetData(IE,"UWSC","q") // 文字設定：検索単語
IESetData(IE,True,"btnG","Google 検索") // SUBMIT
ヘルプではこのように載っていますが１行目のlrというのは、ラジオボタンということを示しているのでしょうか？
よくわかりません＞＜
- 791 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/25(日) 13:17:12 ID:yFPEYg0l0]
- 教授じゃなく教示だと何度言ったら
- 792 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/25(日) 14:10:16 ID:XdmZStkM0]
- >>790
IESETDATA( IE, 値, Name, [Value, 番号] )
google.co.jpのソースを見ると
<input id=all type=radio name=lr value="" checked><label for=all> ウェブ全体から検索 </label>
つまり Name=lr, value= ""
<input id=il type=radio name=lr value="lang_ja"><label for=il> 日本語のページを検索 </label>
同様に Name=lr, value= "lang_ja"
値がtrueということは，選択もしくはクリックするということ
- 793 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/25(日) 14:11:57 ID:XdmZStkM0]
- >>790
//以下コード
IE = CreateOLEObj("InternetExplorer.Application")
IE.Visible = True
IE.Navigate("www.google.co.jp")
BusyWait(IE)
IESetData(IE,True,"lr","lang_ja") // RADIO： 日本語のページを検索
MSGBOX( "日本語のページを検索 のラジオボタンをオンにしました．" )
IESetData(IE,True,"lr") // RADIO：ウェブ全体から検索
MSGBOX( "ウェブ全体から検索 のラジオボタンをオンにしました．" )
Procedure BusyWait(ie)
Sleep(0.5) // Wait
Const TIME_OUT = 90
tm = Gettime()
repeat
Sleep(0.2)
ifb Gettime() - tm > TIME_OUT
MsgBox("Time Out:BusyWait")
ExitExit
endif
until (! ie.busy) and (ie.readyState=4)
Sleep(0.5)
Fend
- 794 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/25(日) 14:34:02 ID:XdmZStkM0]
- >>789
IFB ( PEEKCOLOR( 720, 100 ) and $FF ) >= 200 then
andってどういうこと？教えて！
- 795 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/25(日) 14:44:55 ID:od339K0v0]
- >>794
ビット積
ttp://www3.bigcosmic.com/board/s/board.cgi?id=umiumi&mode=all&no=26&log=ON&cnt=1
ｵｲﾗも前に同じこと聞いたw
- 796 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/25(日) 14:48:20 ID:XdmZStkM0]
- >>795
ありｗ
- 797 名前：789 mailto:sage [2009/01/25(日) 18:08:13 ID:KXHTzu1o0]
- >>794
ありがとうございます。うまく動きました。
- 798 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/25(日) 23:25:00 ID:mUdf+86S0]
- >>792
なるほど。ソースを調べるわけですね
骨が折れますね
大事なことを教えて頂き、ありがとうございます＾＾
しかし、右クリックでソースを調べることが出来ない場合はどうすればよいでしょうか？
- 799 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/26(月) 00:00:03 ID:o/KQMVrn0]
- >>798
opera使うといいよ
右クリック禁止抑制とかフレームのソースも簡単に拾える
俺も解析用に使った
今ではメイン
- 800 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/26(月) 19:12:01 ID:+wQJsntF0]
- なにからなにまでありがとうございます
試してみます
- 801 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/26(月) 21:28:55 ID:+wQJsntF0]
- InternetExplorer上で、操作したいﾍﾟｰｼﾞを表示した状態で、
IE = GETACTIVEOLEOBJ("InternetExplorer.Application", "Web航海時代" )
IESetData(IE,True,"point","3")
↑のようなｺｰﾄﾞを実行しても、なにも起きません
エラーは起きていないし、nameやvalueも間違っていないと思うのですが…
- 802 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/26(月) 21:58:38 ID:lqCZORip0]
- nameかvalueが間違ってるんだと思う
IESetDataの戻値を見て正常かエラーか見てみればいかが？
- 803 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/26(月) 22:40:25 ID:+wQJsntF0]
- <input type=radio name=point value="3">
↑ソースコードですが、name,value共にあっているかと…
- 804 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/27(火) 03:31:42 ID:i4vBvxWB0]
- 志村ー!、ダブルクォーテーション!ダブルクォーテーション!
- 805 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/27(火) 21:41:22 ID:ko0WGgzz0]
- うぅ、、、ダブルクォーテーションまーくをつけたりとったりしてみましたが、エラーになりました＞＜
- 806 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/27(火) 21:51:17 ID:i4vBvxWB0]
- <input type="radio" name="point" value="3">
これで行けるはずだけど、行けなかったらごめん、その時は他が間違ってると思う。
- 807 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/28(水) 14:39:28 ID:Di5rN0Wd0]
- 色の判定をしてるのですが全然認識をしてくれません・・・
自分の環境に合わせてるつもりなのですが、どうすればBRG値をうまく範囲化できるのでしょうか＞＜？
- 808 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/28(水) 20:10:56 ID:aP03qKyG0]
- >>806
わざわざありがとうございました＾＾
しかし、なにもかわらず…
色々やってみます。
- 809 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/28(水) 20:42:55 ID:aP03qKyG0]
- 普段のＩＥの操作では実行できないページってあり得ますか？
例えば、私が操作しようとしているﾍﾟｰｼﾞは、そこのＵＲＬを直接打ち込んでもまっすぐ行けず
必ずﾎｰﾑに戻って、ﾎｰﾑから行きたいﾍﾟｰｼﾞのﾘﾝｸをｸﾘｯｸしなければならないんですよ
ホーム→ttp://www9.plala.or.jp/system19/
操作したいページ→www9.plala.or.jp/system19/games/koukai/
※Operaだと、直接飛ぶことが出来ました
- 810 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/28(水) 23:52:01 ID:NvkvtEFN0]
- ｵﾝﾗｲﾝｹﾞｰﾑ？
ならこのｽﾚの上の方で散々書いてあると思うよ。
(それに当てはまるかどうかは知らない）
- 811 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/29(木) 21:45:54 ID:3VYUuVlD0]
- 私は、ゲームの操作を自動化したいなとは考えていますが、特別なページ
殊に、上記のように、なぜＵＲＬ直接入力では希望のﾍﾟｰｼﾞに飛べないの
か疑問に思った
だけです。
- 812 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/29(木) 22:44:04 ID:7CcxhBvcP]
- >>811
ソースを見ればすぐ分かると思うのですが・・・
Windows Script Encoderはもちろん知っていますよね？
IEでのみlocation.replaceがdecodeされるので別ページに遷移するのです。
これがuwscと一体どう関係あるのでしょうか？
- 813 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/30(金) 03:55:44 ID:OeBnpuaS0]
- >>812
横レスだが
おまいは常に人を馬鹿にしてないと生きていけない奴だなｗ 哀れｗ
- 814 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/30(金) 04:18:35 ID:SPXRBmP00]
- >>813
横レスとか言いつつ本人乙
- 815 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/30(金) 04:25:19 ID:OeBnpuaS0]
- >>814
横レスだといったろ？ｗ
恥ずかしい奴だな おまいはｗ
- 816 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/30(金) 05:00:06 ID:3mlQ1XKW0]
- ここまで俺の自演
- 817 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/30(金) 05:17:44 ID:SPXRBmP00]
- >>815
単芝厨きもいです
- 818 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/30(金) 21:23:01 ID:AuYpJb6K0]
- と、ここまで俺の自演。
- 819 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/01/31(土) 00:13:38 ID:vsuJT7Qv0]
- 集まってるおまえらよ、そろそろ散れよ。
- 820 名前：811 mailto:sage [2009/02/01(日) 06:29:15 ID:KLbW2NFD0]
- すいません＞＜よく知りません
- 821 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/02/01(日) 12:52:27 ID:w5ujQ7MM0]
- UWSCのスケジュールの設定で質問があります。
インターバルの設定が、1〜5分の設定と10分毎の設定などがあるのですが
7分や8分でのインターバルの設定は、どのようにしたら良いのでしょうか？
式による設定で式を入れれば良いのでしょうが
どんな式を入れればインターバルが7分や8分になるのか
わかりません。
ご教授頂ければと思います。
- 822 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/02/01(日) 13:07:22 ID:VbDhycHQ0]
- >>821
インターバルだけでよかったら
Interval_7min.uws かなんか作ってそこに
Call Main.uws
while true
main() //関数呼び出し
sleep(420) //7分
wend
これでいいんじゃない？
- 823 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/02/01(日) 16:14:17 ID:ZukW/kKt0]
- それだと、
7分 + main()処理
じゃん？
GETTIME使えばピッタシ！！
> 式による設定
> 自分で式を記述する事により細かな時間設定が決められます
> 使える変数
> YY (年)、MM (月)、DD (日)、HH (時)、NN (分)、YMDNN (2000年からの経過分)、WW (曜日：日曜=0,.....土曜=6)
> 注意：チェックは分単位でされます、分単位の設定(NN, YMDNN)を忘れずに
> 例)
> (WW=2) AND (HH=0 OR HH=12) AND (NN=0) // 火曜日の０時と１２時
> (YMDNN mod 18)=0 // １８分間隔
7分 ： (YMDNN mod 7)=0
8分 ： (YMDNN mod 8)=0
１、YMDNN (2000年からの経過分)
２、modは割り算した余り
３、割り算して余りがゼロ
じゃまいのか？
- 824 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/02/01(日) 16:17:37 ID:ZukW/kKt0]
- ４、式を希望する日時で”真”になるようにすればいい
たぶん・
- 825 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/02/01(日) 16:59:54 ID:v32FCtQy0]
- >>823
Gettimeの戻り値が秒だからそれ使うだけでいいよ
分とか見たら割り切れないし。
ニュースの記憶見るかガンダム見るか悩むが
やっぱりガンダム見る
- 826 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/02/01(日) 19:06:26 ID:ZukW/kKt0]
- ？？？
SLEEPと、
Gettimeと、
スケジュール設定の式による設定
の3つのメリットデメリットを書いたんだけど。
>>分とか見たら割り切れないし。
って意味わかんないんだが、
何を意味した書き込みなんだ？
- 827 名前：名無しさん＠お腹いっぱい。 [2009/02/02(月) 04:55:33 ID:cpjbDFRd0]
- >>826
ああ、ごめん。
>YMDNN (2000年からの経過分)
これ知らんかった
- 828 名前：名無しさん＠お腹いっぱい。 [2009/02/02(月) 13:10:24 ID:yH09tKlS0]
- 質問です
.vbsファイルをuwscで開くにはどのように記述すれば出来ますか？
exe以外のファイルの開き方が分からず、
今はクイック起動にショートカットを作成し、クリックして開くように記述しているので
直接開く方法があればご教授頂きたいです。
- 829 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/02/02(月) 14:08:30 ID:pdMh/tE90]
- doscmd("???.vbs")
- 830 名前：名無しさん＠お腹いっぱい。 [2009/02/02(月) 14:30:06 ID:yH09tKlS0]
- >>829
有り難う御座います。
ですが実行されませんでした
フルパスで""も付けたんですが…
OSはvistaなんですが関係無いですよね…
- 831 名前：名無しさん＠お腹いっぱい。 [2009/02/02(月) 14:49:49 ID:cpjbDFRd0]
- >>830
ショートカットのプロパティにリンク先っていうのがあるでしょ。
それをコマンドラインに入力したらいいんだけど。
コマンドプロンプトを開いて実行するか、
ファイル名を指定して実行（Vistaにあるかは知らないが）で、実行できるか試してみて。
- 832 名前：名無しさん＠お腹いっぱい。 [2009/02/02(月) 15:05:20 ID:yH09tKlS0]
- >>831
有り難う御座います。
先ほどuwscで動かなかったので、
コマンドプロントからも直接やってみましたが、
vbsは実行されてませんでした orz
- 833 名前：rpaawnaw mailto:sgixjd@qloaau.com [2009/02/02(月) 15:07:51 ID:2TLMPBOD0]
- qFqgve <a href="lycvakiqmpbn.com/">lycvakiqmpbn</a>, [url=gxsxjoosngmt.com/]gxsxjoosngmt[/url], [link=ifsiyjjscezd.com/]ifsiyjjscezd[/link], piuboesbpern.com/
- 834 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/02/02(月) 15:11:57 ID:pdMh/tE90]
- >>832
Vistaでも問題なくできるぞ
どんなエラーメッセージが出る？
- 835 名前：名無しさん＠お腹いっぱい。 [2009/02/02(月) 15:21:46 ID:yH09tKlS0]
- >>834
いえエラーは出ないんですが、
コマンドプロンプトに（フルパス）.vbsをペーストしてEnterを押しても
動いた形跡が無いんですよね・・・
ただbatファイルをウインドウ非表示で実行させるだけの簡単な物なんですが
それとも何か必要な物が欠けているんでしょうか
普通にクリックしたときは動くんですが・・・
- 836 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/02/02(月) 15:28:21 ID:PVHBkFFR0]
- >>835
vbsのほうにメッセージボックスを1行入れてみたら？
- 837 名前：名無しさん＠お腹いっぱい。 [2009/02/02(月) 15:49:30 ID:yH09tKlS0]
- >>836
有り難う御座います。
色々調べてみて今、解決出来ました。
お騒がせしました。
- 838 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/02/02(月) 19:05:09 ID:Os9uDG+70]
- できれば、何が原因だったか教えてくれると有り難いとか思ってるのは俺だけかな？
初心者だからどういう時にそうなるのか気になる。
- 839 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/02/02(月) 20:36:43 ID:bbkYkSZI0]
- ブラウザを起動するときに最小化できませんか？
検索では、UWSC.exeのあるフォルダのUWSC.INIをメモ帳で開き、
StopForm=0 を StopForm=1 に変更して保存します。
とあったのですが、iniファイルがなく設定できませんでした。
キーボードからオルトとスペース、Nキーで最小化できるので
キー操作のスクリプトからできることはできるみたいですが
一回、表示されてからの対応になるのでできれば起動時から
できたらいいのですが。
- 840 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/02/02(月) 21:07:48 ID:yMTVVraI0]
- comでxmlhttpを使え。解決する。
他にも色々あるが、まぁ、とりあえず使ってみろ。
- 841 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/02/03(火) 03:38:57 ID:eeztqI130]
- >>839
UWSC.INI の StopForm キーの値は
スクリプト再生中に現れるフォームウィンドウを
表示するかしないかってやつじゃなかった?
最小化でアプリ起動ってのは API 関数の ShellExecute() を使う
HINSTANCE ShellExecute(
HWND hwnd, // 親ウィンドウのハンドル
LPCTSTR lpVerb, // 操作
LPCTSTR lpFile, // 操作対象のファイル
LPCTSTR lpParameters, // 操作のパラメータ
LPCTSTR lpDirectory, // 既定のディレクトリ
INT nShowCmd // 表示状態
);
ブラウザのパスは適宜変更してください
DEF_DLL ShellExecuteA(hwnd, string, string, string, string, int): dword: shell32.dll
CONST SW_SHOWMINIMIZED = 2
IFB ShellExecuteA(NULL, "open", "C:\Program Files\Internet Explorer\iexplore.exe", NULL, NULL, SW_SHOWMINIMIZED) < 32 THEN
MSGBOX("実行に失敗しました")
ENDIF
- 842 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/02/03(火) 03:52:05 ID:eeztqI130]
- >>841
すみません、比較式を間違えました
失敗時は 32 以下の値を返すので、正しくは以下です
IFB ShellExecuteA(NULL, "open", "C:\Program Files\Internet Explorer\iexplore.exe", NULL, NULL, SW_SHOWMINIMIZED) <= 32 THEN
MSGBOX("実行に失敗しました")
ENDIF
- 843 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/02/03(火) 09:29:53 ID:9ClBsfHO0]
- API 関数とかしりませんでした。
実際やってみたらブラウザは機動できました。
しかし、そこからの動作がされません。
指定のアドレスに移動するにはどうしたらいいのでしょうか？
DEF_DLL ShellExecuteA(hwnd, string, string, string, string, int): dword: shell32.dll
CONST SW_SHOWMINIMIZED = 2
IFB ShellExecuteA(NULL, "open", "C:\Program Files\Internet Explorer\iexplore.exe", NULL, NULL,
SW_SHOWMINIMIZED) <= 32 THEN
MSGBOX("実行に失敗しました")
ENDIF
IE = getactiveoleobj("internetexplorer.application")
IE.Visible = True
IE.Navigate("URL")
上記のような感じでやっています。アドバイスお願いします。
- 844 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/02/03(火) 21:49:12 ID:eeztqI130]
- >>843
起動と同時に URL に移動するには
ShellExecute() の第 4 引数に URL を渡します
なお、ProgID は大文字小文字を区別するので
正しくは『InternetExplorer.Application』です
また、以下のコードでも同じことができます
OPTION EXPLICIT
DIM url = "www.2ch.net/"
DIM ie = CREATEOLEOBJ("InternetExplorer.Application")
CTRLWIN(HNDTOID(ie.HWND), MIN)
ie.Visible = True
ie.Navigate(url)
- 845 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/02/04(水) 12:53:58 ID:m6en7Q5I0]
- uwscでIEを開いた後、そのIEで開いたHP内の文字データなどを
EXCELのセルに代入することはできますでしょうか?
- 846 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/02/04(水) 13:05:01 ID:tXqKlnWn0]
- できます
- 847 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/02/04(水) 13:20:25 ID:m6en7Q5I0]
- ありがとうございます
なんとかやってみます
- 848 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/02/04(水) 19:46:29 ID:MfK5WOxL0]
- >>844
勉強になります。ヘルプみたり過去の質問検索してみましたが、
あまり、APIとかのことが載ってないのね・・・
- 849 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/02/04(水) 23:12:09 ID:N1AZKeZ50]
- >>848
MSDN見たほうが手っ取り早い事が多いからなぁ？
- 850 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/02/06(金) 12:59:57 ID:hPEtxwon0]
- A = "●●"と言った感じのものを20ぐらいあるとしてそれを順に
送信しようと頑張っています。ちなみに一個だけならなんとかなる
のですが、複数だとどうしてもコードがいっぱいになってしまします。
IESetData(IE,A,"kakikaki")
id = getid("internet explorer")
clkitem(id,"ボタン",CLK_ACC,CLK_BACK)
sleep(15)
これが、そのコードなのですが、Aのところに複数の文字を順に設定
できたらと思っています。よろしくおねがいします。
- 851 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/02/06(金) 15:36:29 ID:q6mgGLtH0]
- A[0] = "●●"
A[1] = "○○"
FOR i = 0 TO 20 - 1
IESetData(IE,A[i],"kakikaki")
id = getid("internet explorer")
clkitem(id,"ボタン",CLK_ACC,CLK_BACK)
sleep(15)
NEXT
これでいいじゃん
- 852 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/02/06(金) 16:05:23 ID:BBz1+Wne0]
- レスどうも。m(_ _)m
実際に実行してみたら下記のようなエラーがでました。
Uスクリプト： 変数： A 配列をオーバーしてます
8行目：A[1] = "●●"
こんなエラーがでます。A[0]は、大丈夫みたいです。
なんでだろう？なにかわかりましたら詳細お願いします。
- 853 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/02/06(金) 16:32:11 ID:1eXzPAIO0]
- dim a[19]= "●●","○○","△△","▲▲",・・・・・(20個記述)
"とりあえず1から10まで聞いとけ"という性格が羨ましいと思うようになったこの頃。('A`)
- 854 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/02/06(金) 17:44:09 ID:BBz1+Wne0]
- うまくいきました。m(_ _)m
なぜ、前にやつはエラーがでたのかしら？
原因が分からない。
- 855 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/02/06(金) 18:42:36 ID:q6mgGLtH0]
- 変数の定義、宣言と
変数への値の代入という
二つの違いを理解してないから
- 856 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/02/07(土) 03:18:07 ID:vXpPMDOu0]
- 前から疑問だったけど、聞けなかったこと。
>>841のshellexecuteのnShowCmd。msdn等を見ると記述順番は
SW_HIDE, SW_MAXIMIZE, SW_MINIMIZE, SW_SHOW ･･･
で順番違うじゃない? この定数はどこで判別するんでしょ？
どなたか解説してくれないかな…
- 857 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/02/07(土) 09:37:19 ID:xlfhJ7RV0]
- >>856
Windows Platform SDK の WinUser.h で定義されてます
ドキュメントの値は、記号定数名でソートされてるようです
CONST SW_HIDE = 0
CONST SW_MAXIMIZE = 3
CONST SW_MINIMIZE = 6
CONST SW_RESTORE = 9
CONST SW_SHOW = 5
CONST SW_SHOWDEFAULT = 10
CONST SW_SHOWMAXIMIZED = 3
CONST SW_SHOWMINIMIZED = 2
CONST SW_SHOWMINNOACTIVE = 7
CONST SW_SHOWNA = 8
CONST SW_SHOWNOACTIVATE = 4
CONST SW_SHOWNORMAL = 1
- 858 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/02/07(土) 11:36:45 ID:l5adthQH0]
- >>857
回答ありがとう！見つけられました。
これ、目的の記述部分を捜すのは適当な属性値をGrepで捜すくらい
しか思いつかなかったのですが、（ちゃんと順を追ってじゃなく、
あくまでdef_dllのためだけという意味）他に良い方法ありますでしょうか？
重ね重ねで恐縮ですが、もし知恵があれば教えてくださいませ。
- 859 名前：名無しさん＠お腹いっぱい。 [2009/02/07(土) 20:34:24 ID:TsGY9ahZ0]
- ＢＭＰ画像（100ｘ100）からＵＷＳＣを使ってＲＧＢ値をテキスト出力するにはどうすればよろしいでしょうか？
- 860 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/02/08(日) 00:47:32 ID:fB3ojcA60]
- 色情報を取得してそれをファイルに書き出せばいいのではないでしょうか
- 861 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/02/08(日) 07:22:53 ID:QoTANPZk0]
- >>858
大抵の IDE はシンボルの定義部にジャンプする機能があるけど
確認のためだけに起動するのは避けたいので
俺は grep してます
- 862 名前：858 mailto:sage [2009/02/08(日) 18:05:42 ID:iaalqOSe0]
- >>861
ナルホド〜。
ひとつ賢くなりました。多謝。
- 863 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/02/08(日) 22:31:33 ID:dNKbKAR9O]
- いくつかの画像のサンプルがあって、指定したウィンドウ内からその画像を書いた順番で探す。
合ったら処理抜け、なかったら次の画像探し
最終的にどれもなかったらまた処理抜けってのをがんばってやろうとしてるんだけどどーすりゃいいのかな
いちいちifbで探してなかったらbreakみたいにやらんとダメ？
もーちょいスマートにやれないかな
- 864 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/02/08(日) 23:45:58 ID:vASK790PO]
- 日本語でおｋ
- 865 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/02/08(日) 23:51:13 ID:SXOT3GUb0]
- 例えば test test1 test2 って画像があって
どれかがヒットしたらその画像をクリックってことやらせたい場合
ifb chkimg (test.bmp) = true then
mmv(g_img_x, g_img_y)
sleep(1)
endif
ifb chkimg (test1.bmp) = true then
mmv(g_img_x, g_img_y)
sleep(1)
endif
ifb chkimg (test2.bmp) = true then
mmv(g_img_x, g_img_y)
sleep(1)
else
break
endif
↑よりもスマートってか効率的な書き方があるのかなってこと
- 866 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/02/08(日) 23:55:43 ID:3bfozRlh0]
- ifb chkimg (test.bmp) OR chkimg (test1.bmp) OR chkimg (test2.bmp) then
mmv(g_img_x, g_img_y)
sleep(1)
endif
|
 |
