【マクロ】　UWSC　Part4　【シェアウェアか】

1 ：ミスターユーダブリューエスシー：2008/01/14(がつ) 14:47:14 ID:VrXr82Zu0: こうしきサイト
http://www.uwsc.info/

1 http://pc7.2ch.net/test/read.cgi/software/1107738590/
2 http://pc11.2ch.net/test/read.cgi/software/1156416884/
3 http://pc11.2ch.net/test/read.cgi/software/1176358142/

「UWSC」をふくむにっき - はてなダイアリー
http://d.hatena.ne.jp/keyworddiary/UWSC
UWSCのおとしものへや
http://siromasa.xxxxxxxx.jp/dl/_dl.html
UWSCのゆうわく
http://ochoja.web.fc2.com/uwsct/0610uwsct.html
2 ：ななししさん＠おはらいっぱい。：2008/01/15(ひ) 00:48:48 ID:6WQevle80: ｷﾀ━━━━━━m9( ﾟ∀ﾟ)━━━━━━!!
3 ：ななししさん＠おはらいっぱい。：2008/01/15(ひ) 11:48:23 ID:qSysXr2n0: どうようのきのうをもったフリーソフト

AutoIt
http://www.autoitscript.com/autoit3/

WindowController
http://chi.usamimi.info

AutoHotkey
http://www.autohotkey.com
http://pc11.2ch.net/test/read.cgi/software/1184556627/
4 ：ななししさん＠おはらいっぱい。：2008/01/15(ひ) 14:31:49 ID:YTAr/5jI0: こんにちは、おしえてくんですみません<(_ _)>
UWSCでつくられたe.xeファイルのUWSCスクリプトのソースをみるほうほうって
ありますか？しってらっしゃるほうおしえてください。
5 ：ななししさん＠おはらいっぱい。：2008/01/16(みず) 10:02:29 ID:KDV0+Mn+0: さきにこっちつかおうよ・・・

http://pc11.2ch.net/test/read.cgi/software/1176677869/
6 ：ななししさん＠おはらいっぱい。：2008/01/20(にち) 07:29:39 ID:mKnsvmOl0: あらしにしんみになってこたえるのはしんせつでもなんでもない。
そのあらしをいつかせ、さらなるどうるいのあらしをよびこむ。
そのことにきづいてください。
7 ：ななししさん＠おはらいっぱい。：2008/01/20(にち) 15:36:22 ID:HGvEXPwB0: しんスレｷﾀ━━━━━━m9( ﾟ∀ﾟ)━━━━━━!!
8 ：ななししさん＠おはらいっぱい。：2008/01/20(にち) 17:31:03 ID:/h9BPzq00: <html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=shift_jis">
<meta http-equiv="Content-Language" content="ja">
<title>IEGetSrcのテスト</title>
</head>
<body>
<form>
<p>　タ　グ　<input type="checkbox" name="C1" disabled="disabled"><input type="text" name="T1" size="82" onclick="this.select()" value="body">　
ばんごう<input type="text" name="TNUM" size="7" onclick="this.select()" value="1"><br>

ぜんぽうもじ<input type="checkbox" ID="C2" name="C2" disabled="disabled"><input type="text" name="T2" size="53" onclick="this.select()">　
こうほうもじ<input type="text" name="T3" size="57" onclick="this.select()">
</p>
<p><input type="button" value="ソースしゅとく" name="B1" onClick="C1.checked=true">　
<input type="button" value="きりだし" name="B1" onClick="C2.checked=true">
<input type="reset" value="リセット" name="B2" onClick="C1.checked=false; C2.checked=false; T1.value=''; T2.value=''; T3.value=''; S1.value=''">
<input type="button" value="しゅうりょう" name="B3" onClick="CEND.checked=true">
<input type="checkbox" ID="CEND" name="CEND" disabled="disabled" ></p>
<p><textarea name="S1" rows="13" cols="101" ></textarea></p>
</form>
</body>
</html>
9 ：ななししさん＠おはらいっぱい。：2008/01/20(にち) 17:43:05 ID:/h9BPzq00: HTMLのフォームをりようするのをかいたけどそののちとうこうできない
10 ：ななししさん＠おはらいっぱい。：2008/01/20(にち) 17:46:30 ID:/h9BPzq00: Form = CreateOLEObj("InternetExplorer.Application")
Form.visible = True
Form.navigate(GET_CUR_DIR+"/IEGetSourceTest.htm")
REPEAT; sleep(0.1); UNTIL !Form.busy AND Form.readystate = 4
FormID = HNDToID(Form.HWND)

IE = CreateOLEObj("InternetExplorer.Application")
IE.visible = True
IE.navigate("about:blank")
ID = HNDToID(IE.HWND)

// Formのかんし
While 1
Ifb Form.document.forms[0].C1.checked Then
Form.document.forms[0].S1.value = IEGetSrc( IE, Form.document.forms[0].T1.value, Val(Form.document.forms[0].TNUM.value) )
Form.document.forms[0].C1.checked = false
Endif
Ifb Form.document.forms[0].CEND.checked Then
Form.Quit
IE.Quit
break
Endif
sleep(0.1)
Wend
11 ：ななししさん＠おはらいっぱい。：2008/01/20(にち) 17:55:07 ID:/h9BPzq00: >>8をIEGetSourceTest.htmってなまえで、UWSCのところにほぞんして、
>>10をUWSファイルとしてほぞん。

blankをひょうじしてるほうのまどでソースしゅとくしたいページをひょうじして
タグめいしていしてクリックすると、ソースがしゅとくできる。

どうてきにそうにゅうされるコードはIEのひょうじ－ソースじゃとれないんでべんりかも。
オブジェクトむこうのチェックまでしたほうがよかったけどどうすればいいんだか。
BetweenStrのぎょうがあるととうこうできなかったんでさくじょしてます。

できそこないのHTMLだけどつくるのに１にちかかった。
12 ：ななししさん＠おはらいっぱい。：2008/01/21(がつ) 11:44:51 ID:U5tw6KbY0: >>8のHTMLをアップしました。
ローカルでひらくとセキュリティのけいこくでひっかかるのが、Webサイトからひらけばでなくなります。
もちろんふつうにどうさします。
UWSファイルのアドレスを↓にかきかえてつかってください。

http://scripts.web.fc2.com/scriptsup/iegetsourcetest2.htm
13 ：ななししさん＠おはらいっぱい。：2008/01/21(がつ) 12:46:25 ID:6v7U5uf70: ここはおまえのひきちょうじゃねーぞ
14 ：ななししさん＠おはらいっぱい。：2008/01/21(がつ) 13:07:22 ID:U5tw6KbY0: >>13
ああ、わるい。
しかし、おれがわるいんじゃないぞ。
ほかのにんがかきこまないのがわるいんだ。
なんかおれがせんゆうしてるみたいにみえるのはそのせいだ。
・・・
まさかおれいがいのだれもつかってないなんてことはないよな？
15 ：ななししさん＠おはらいっぱい。：2008/01/21(がつ) 13:11:26 ID:U5tw6KbY0: >>12のHTMLをFormかわりにつかえないことはないけど
F5でさいひょうじしただけでUWSCでエラーになる。
IEコンポーネントつかわないとそうさはできないとしても、
べつアプリつかったりしてほかのページにとべないようにしないとまずいな。
.Navigaterをロックしてこうしんできなくできればいいんだが。
16 ：ななししさん＠おはらいっぱい。：2008/01/21(がつ) 17:52:23 ID:PRrhEx8A0: WHILE TRUE
IFB GETKEYSTATE(VK_NUMPAD1) THEN
REPEAT
KBD(VK_2,DOWN,10)
KBD(VK_3,DOWN,10)
UNTIL GETKEYSTATE(VK_3)
SLEEP(0.1)
KBD(VK_4,DOWN,10)
ENDIF
WEND

のようなスクリプトがあるとして、Num1もなにもおしていないのに
さいせいしたしゅんかん4キーがかってにれんだされるのですがドコにげんいんがあるでしょうか？
17 ：ななししさん＠おはらいっぱい。：2008/01/21(がつ) 17:55:08 ID:U5tw6KbY0: ローカルのHTMLをひらいてけいこくがでるのはIEがだしてるのであってIEコンポーネントじゃないんだよな。
つまりIEコンポーネントをつかうアプリケーションがけいこくをださなければいいはなしなんだけど
CreateObjectとかするとアプリケーションはIEがきどうするんだよな。
せんようアプリをさきにきどうすればじつげんできるけどやりほうがスマートじゃない・・・
けどIEつかうよりふつうのFormっぽいからできればつかいたい。
あんまりがんばってもUWSCをつかういみがなくなりそうだから・・
けどスクリプトのForm・・・じぶんでWindowsAPIをよべばいいのかな・・・

>>16
KBDがむじょうけんにじっこうされて、じぶんでそうしんしたキーじょうほうをGETKEYSTATEでひろってるんじゃね？
18 ：ななししさん＠おはらいっぱい。：2008/01/21(がつ) 18:10:19 ID:U5tw6KbY0: フォームをHTMLでつくるのはプログラムくまなくてもすむけど、
どうさがわずかならActiveBasicでがめんつくればすむ。
ゆうしょうはんUWSCのフォームがどんなもんかしらないけどたいさないんじゃないかな。
まあスクリプトのデバッガはやっぱあればあるにこしたことはないけど。
HTMLはんのフォームはWebうえのをそのままひらいてつかい、
じっこうファイルはんはUWSとおなじばしょにほぞんし、スクリプトからじどうできどうします。

やっぱHTMLはんはつかいがってがわるい。
まあぼくがみばえをコントロールしきらんだけかもしれんが。

ということで、UWSCをむりょうのままでフォームをつかうばあいはActiveBasicがてがるでおすすめ。
けどじっこうファイルつくるんならチェックボックスじゃなくてトグルボタンくらいつかえんとみためわるいよな・・・

HTMLはん
フォーム：http://scripts.web.fc2.com/scriptsup/iegetsourcetest2.htm
スクリプト：http://scripts.web.fc2.com/scriptsup/iegetsrc2.uws

じっこうファイルはん
フォーム：http://scripts.web.fc2.com/scriptsup/iegetsrctest.exe
スクリプト：http://scripts.web.fc2.com/scriptsup/iegetsrc3.uws
19 ：ななししさん＠おはらいっぱい。：2008/01/21(がつ) 19:18:10 ID:KzLKIOdZO: すでにＩＥでひらいてるページにめいれいするのわかりません
どこかてきとうなサイトでＦ５クリックするさんぷる
おねがいします
サンプルをいろいろとみてきましたがないみたいです
おねがいします
20 ：ななししさん＠おはらいっぱい。：2008/01/21(がつ) 19:40:45 ID:U5tw6KbY0: >>19
while 1
KBD(VK_F5, CLICK, 1000)
wend

IEをてまえにもってくるのは、かいしでsleep(5)とかでまたせてるまにじぶんでクリックするか、
IEオブジェクトをさがしてアクティブにする。
21 ：ななししさん＠おはらいっぱい。：2008/01/22(ひ) 12:38:35 ID:htPUwuSa0: 「ほかのにんがかきこまないのがわるいんだ。」

とか、ほざくガキがでてくるしまつ
22 ：ななししさん＠おはらいっぱい。：2008/01/22(ひ) 12:45:24 ID:UGnsuQEl0: >>21
まだかきこんでないにんいるのにそのにんたちをさしおいてなにかきこんでんだよと
レスばん９００すぎるまでひっこんでろと。
23 ：ななししさん＠おはらいっぱい。：2008/01/22(ひ) 13:14:26 ID:UGnsuQEl0: スクリプトにいちじていし・しゅうりょうボタンをつけるサンプル。
じっこうファイルはつかいまわしでいろいろつかえるとおもいます。

http://scripts.web.fc2.com/scriptsup/UWSC_Control.exe
http://scripts.web.fc2.com/scriptsup/ControlSample.UWS
24 ：ななししさん＠おはらいっぱい。：2008/01/22(ひ) 15:07:14 ID:bb0NpIu80: >>23
㌧
25 ：ななししさん＠おはらいっぱい。：2008/01/22(ひ) 16:28:16 ID:YY7h1Q/JO: いちじていしはひつようだな
>>23
おつ
でもおれがためしたらとまんなかったよ
なんかいもためしたけどね
さきにそれをきどうさせておくの？
それともUWSCがさきにきどうかね？

それとうえのほうでクリック1000てなんだよ
ガキのいたずらこぞうか
むちゃくちゃするなよ
あらしにんてい
でいりきんしね
26 ：ななししさん＠おはらいっぱい。：2008/01/22(ひ) 16:31:00 ID:YY7h1Q/JO: でいりきんしはひどいな
>>20はかいとうきんしね
27 ：ななししさん＠おはらいっぱい。：2008/01/22(ひ) 17:24:05 ID:UGnsuQEl0: >>25
＞クリック1000てなんだよ

クリック１まわして１びょうきゅうけい。
まあ、CPUせんゆうしちゃうからじっさいにはKBDではじかんはしていしない。

つまり↓になる
while 1
KBD(VK_F5)
sleep(1000)
wend

＞でもおれがためしたらとまんなかったよ

スクリプトファイルみればわかるとおもうけど、UWSファイルのなかでじっこうファイルをよびだしてるから。
たんどくでじっこうファイルをきどうしても、ボタンがあるだけでなにもしないよ。
UWSC_Control.exeとControlSample.UWSはおなじばしょにほぞんしないとよびだせないよ。

WindowsXPではちゃんとうごいたけどほかのだともしかしたらどうさおかしいかもしれない。
だけどCreateWindowていどのきほんてきなAPIしかつかってないのにうごかなかったらおかしいよ。
28 ：ななししさん＠おはらいっぱい。：2008/01/22(ひ) 18:53:51 ID:M+28Nez10: メモちょうに「テスト」ってかきつづけてとまんないぞ
けっきょく「Alt」「F2」できょうせいしゅうりょう
ほかのUWSファイルでそうさしていていちじていしさせるばあいには
このソースをかきたすってことなんだな
しかしボタンのおすじゅんばんまちがえたら
えいえんに「テスト」ってかきつづけてる・・・
29 ：ななししさん＠おはらいっぱい。：2008/01/22(ひ) 19:46:16 ID:UGnsuQEl0: >>28
＞メモちょうに「テスト」ってかきつづけてとまんないぞ

それをやめるためのていしボタンなんですが。

ただ、ていししたりしゅうりょうしたりはスクリプトできじゅつすることでじつげんしてるので、
それがかかれてないスクリプトはとまりませんね。

がめんがひょうじされてないUWSCほんたいをコントロールすればかくじつにやめられるかもしれないけど・・・

＞しかしボタンのおすじゅんばんまちがえたら
＞えいえんに「テスト」ってかきつづけてる・・・

もしかして、いちじていしなかにしゅうりょうをおしてもしゅうりょうしないとか？
いちじていしをかいじょすればしゅうりょうするけど、
それがいやならいちじていしループのだっしゅつじょうけんに、しゅうりょうボタンをおしたときをいれればいいよ。
そうかいておくべきだったかな？
30 ：ななししさん＠おはらいっぱい。：2008/01/23(みず) 00:15:54 ID:vayeXHsD0: IE7
XP
どうやったらUESCでHTMLファイルみれるんだ
ふつうにIE7からはみれてる
RECIEでHTMLないのボタンクリックからはじめたかったのになー
RECIEはHTMLよめないんかね
31 ：ななししさん＠おはらいっぱい。：2008/01/23(みず) 00:24:30 ID:vayeXHsD0: 30だけどじこかいけつした^^
32 ：ななししさん＠おはらいっぱい。：2008/01/23(みず) 12:34:58 ID:vayeXHsD0: IE７ですでにひらいてるページをUWSCでそうさしたいんだ
アクティブウィンドーのしゅとくだけではうごかないんか？
どこかサンプルソースないですか？

ぐたいてきにはひどうきつうしんするためのスクリプトがきさいしてあるHTMLからIE７をひらく
そのひらいてあるページをそうさしたい

どなたかサンプルおねがいします
33 ：ななししさん＠おはらいっぱい。：2008/01/23(みず) 12:46:13 ID:iN7rdS2C0: >>32
IE = GetActiveOLEObj("InternetExplorer.Application", "")
34 ：ななししさん＠おはらいっぱい。：2008/01/23(みず) 12:56:29 ID:vayeXHsD0: >>33
おお
さっそくのレスありがとう
いまからテストしてみる
いつもわるいね
あなたもしかんさいにこれるならいちどメシくいにいきますか
わたしはいま、おちめでたいへんなんだけど
ラーメンとカレーはたべあるいたのでおいしいとこしってるよ

＞IE = GetActiveOLEObj("InternetExplorer.Application", "")
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　↑このさいごの、””なにかね？
35 ：ななししさん＠おはらいっぱい。：2008/01/23(みず) 13:21:26 ID:vayeXHsD0: >>33
できた！ありがとうおおおお！

さいごの””づけたままでもうごいたよ
こんなかんじ

IE = CreateOLEObj("InternetExplorer.Application")
IE.Visible = True
IE = GetActiveOLEObj("InternetExplorer.Application", "")

このあとラジオボタンやセレクトメニューをえらんでつぎのページへとんで
そこでもじどうそうさできた
マジでありがと

なぜか1かしょだけフォーカスあわせてたのがマウスであわせないとダメになってたけど
まあいいやごうかく！
そのフォーカスののちにこのまえおしえてもらった「Ctrl」ボタンおすまでスリープ0.01ループさせてたんだけど
あれがよういんかな？
でもそのフォーカスにマウスであわせてテキストにゅうりょくごに「Ctrl」おしたら
すぐに「つぎのページへ」をじどうでおしてくれた
きのうまでじぶんでいろいろやってたんだけど
「かんすうIEがしていされていません」とか「○○へんすうが・・・」まあエラーばっかりだったんだ
きいてよかったよ
ありがとう
カレーライスでよかったらおごるよ
JRかんじょうせんのふくしまえきちかくにあるじょうとうカレーってしょっけんきでおかねばらうおみせなんだけど
ここがおいしいよ！
36 ：ななししさん＠おはらいっぱい。：2008/01/23(みず) 13:57:18 ID:iN7rdS2C0: >>35
そのコードだめです。
まずすいしょうコードから

>>10のがそれですが、よけいなのもあるんで。
IE = CreateOLEObj("InternetExplorer.Application") // IEのきどう
IE.visible = True // ひょうじ？
IE.navigate("http:/www.yahoo.co.jp") // アドレスにゅうりょく
REPEAT; sleep(0.1); UNTIL !IE.busy AND IE.readystate = 4 // ページひょうじかんりょうまち
ID = HNDToID(IE.HWND) // コントロールするなまえがなかったりするばあいにりよう
input("") // どうしてもにゅうりょくまちしたいばあい。

※IEのソースをのぞいたりすればIEオブジェクトだけでいろいろできるけど、
みためだけでそうさかのうなIDはけっこうつかえる。

んで、>>23のをつかうなら、いちばんさいしょにじっこうファイルをきどうし、
じょうきinputのいちにていしコードをそうにゅう。
けどマウスいちをあわせないといけないなら>>23のとかinputはつかえないね。

ちなみにぼくはきゅうしゅうだしおきんまったくないんでむり。
しゅうしょくのためにひっこすつもりもないし、かといってじもときぎょうにはちかよりたくもないし。
ネットでのであいにはこりてるからOFFあとかもでませんから。
えどがわくでなんかばいしゅんサイトがてきはつされてるけど、あそこにすんでたころはまいにちしょうちゅうがくせいにラブコールしてた。
37 ：ななししさん＠おはらいっぱい。：2008/01/23(みず) 14:00:52 ID:iN7rdS2C0: >>35
-- だめなりゆう --
１．CreateしたIEはほうちしてべつのをGetしてる。タイミングてきにどういつのをひろってくるかもしれないがいみがない。
２．きどうちょくごのをひろってきているからそうさできないじょうたいにある。
まあそののちのコードはしょうりゃくされてるだけでちゃんとまってるかもしれないけど。

マウスをあわせないといけないばしょってどんなですか？
Webページは、ウィンドウをちぢめるとレイアウトがかわるのでマウスざひょうではもんだいありますよ。
よかったらアドレスとクリックしたいばしょをおしえてください。
38 ：ななししさん＠おはらいっぱい。：2008/01/23(みず) 19:07:30 ID:vayeXHsD0: >>36
よくわからんけどさいしょの2おこなをいれないとエラーになるんよ
すでにひらいてるページなので
＞IE.navigate("http:/www.yahoo.co.jp") // アドレスにゅうりょく
＞REPEAT; sleep(0.1); UNTIL !IE.busy AND IE.readystate = 4 // ページひょうじかんりょうまち
これはいれるひつようないとおもうのでかいていない
＞ID = HNDToID(IE.HWND) // コントロールするなまえがなかったりするばあいにりよう
＞input("") // どうしてもにゅうりょくまちしたいばあい。
これはべんきょうになった！ありがとう
>>36はUWSCのかいせつぼんかいてみたらどうだ
UWSCのヘルプよりかなりりかいできるぞUWSCのかいせつぼんってこばやしシンヤしのだけだろ
もうちょっとめいれいひとつひとつをせつめいしてくれたらうれしいめいれいのかいせつにめいれいをいんようしてるんだからわかんないよ
ほんしゅつしたら、おれぜったいにかうよ
マウスをあわせるばしょはがぞうにんしょうのにゅうりょくだよ
IDとPASSののちにがぞうにんしょうにゅうりょくしてつぎのがめんへいくボタンをおすんだ
いまはこんなかんじでやってる（はじめからUWSCでひらいたIEがめんならフォーカスがあわせられたままたいきしてるのにね

Assert(IESetData(IE,"123456789","loginId"),12) // IDにゅうりょく
Assert(IESetData(IE,"abcdefghijk","passWd"),13) // PASSWORDにゅうりょく
IE.document.forms(0).elements(5).focus()//がぞうにんしょうにフォーカスあてる
REPEAT; sleep(0.1); UNTIL GetkeyState(VK_CTRL)//「Ctrl」おすまでたいき
Sleep(0.1)
Assert(IESetData(IE,True,"","alt=ログイン"),19) // IMAGEログインボタンおす
REPEAT
SLEEP(0.1)
UNTIL !IE.BUSY AND IE.READYSTATE = 4

>>23はつかうかどうかわかんないじっさい0.1びょうをあらそうようなタイミングなのでマウスでボタンをおすより
めのまえのキーボードできめられたボタンおすほうがわずかでもはやいようなまれガス
>>36
そうだとおもったよたじゅうログインのけいこくがめんがでるようになったしょりするようにしておいたけど・・・そういうことか。なるほど。ありがと
もしおおさかにくることがあればかならずこえかけてみてくれ。んじゃ
39 ：ななししさん＠おはらいっぱい。：2008/01/23(みず) 19:51:05 ID:vayeXHsD0: >>36
すまん
さいしょの2おこなしでいけた
りゆうもわかった
なにかとべんりなのでふだんつかうブラウザがFirefoxで
そのページをみるときだけアドオンツールつかってIE7にしてた
おれのエラーのりゆうはたぶんそうだわ

いま、さいしょからIE7できどうしてひらいたページにたいしてやってみたら
＞IE = CreateOLEObj("InternetExplorer.Application")
＞IE.Visible = True
↑これなしでいけた

ちなみにFirefoxからIE7へきりかえてそのページをひらきながらテストしてみたら
じょうきの1ぎょうめをぬいてやってみたら

>Uスクリプトへんすう：IEがていぎされていません
>5ぎょうめ：IE.Visible = True
とエラーがでてた

でもやっぱりがぞうにんしょうのフォーカスはされていなかったので
いまもマウスで1クリックしてからしゅどうでテキストにゅうりょくした

inputためしてみるわ
ありがと
40 ：ななししさん＠おはらいっぱい。：2008/01/23(みず) 21:29:17 ID:vayeXHsD0: なんかいもすまん

IE.document.forms(0).elements(5).focus()//がぞうにんしょう
を
input("")
にへんこうするにはどうすればいいですか？
とりあえずinputはまだつかわずにfocus()に0からじゅんばんに1.2.3ていれてみようか？
innputでのたいきがわからないよ^^;
いつもわるいね
41 ：ななししさん＠おはらいっぱい。：2008/01/23(みず) 22:11:39 ID:iN7rdS2C0: >>40
input("")はにゅうりょくダイアログがでるだけで、IEのそうさはしませんが。

がぞう？にフォーカスするのがもしがぞうにOKボタンみたいなきのうがわりあてられてるんなら、
フォームにSUBMITをおくるだけでおｋだったりしますよ。
42 ：ななししさん＠おはらいっぱい。：2008/01/23(みず) 22:30:35 ID:vayeXHsD0: >>41
おお
いつもわるいなあ
ありがとう
IE.document.forms(0).elements(5).focus()//いまこれSUBMIT

IE.document.forms(SUBMIT).elements(5).focus()
IE.document.forms(0).elements(SUBMIT).focus()
IE.document.forms(0).elements(5).focus(SUBMIT)
こういうかんじでテストしてみるわ
ちょっとふろはいっってくるね
んじゃ
43 ：ななししさん＠おはらいっぱい。：2008/01/23(みず) 22:56:28 ID:iN7rdS2C0: >>42
document.forms[0].submit()
です。

elementをとくていしないふんらくです。
44 ：ななししさん＠おはらいっぱい。：2008/01/24(き) 01:33:06 ID:/j+XTb4D0: つかれた～
こんにちはテストおわり
けっきょくフォーカスじどうでフォーカスをあわせられなかった
みぎくりきんしなのでそのへんもあるのかも
マウスでどこかを1かいでもクリックしたら
TABであわせられるけど
マウスクリックしないとTABボタンうごかない
つまりじどうではあわせられないようなんだ

サブミットではないよ
がぞうのよこにテキストにゅうりょくのボックスがあるから
タグネーム＝キャプチャインプットになってた
とにかくつかれたわ
おやすみ～
45 ：ななししさん＠おはらいっぱい。：2008/01/25(きん) 17:20:59 ID:GcGkQc0q0: ひょっとしてIESetDataってhttpsのページにはどうさしないの？
46 ：ななししさん＠おはらいっぱい。：2008/01/25(きん) 18:07:29 ID:y4xJvkBL0: しらないけどSENDSTRならかんけいなくおくれる
47 ：ななししさん＠おはらいっぱい。：2008/01/25(きん) 23:27:42 ID:683OcADH0: しつもんです。eTilTranというがぞうかたむきほせいソフトようのじどうよみこみ→ほせい→ほぞんのスクリプトをかいているのですが、ファイルかずがすくないばあいはもんだいなくうごくのですが、
ファイルかずがおおいとよみこんでるまにＵＷＳＣうえでCLICKITEMなどのしょりがおわってしまい、てきせつにしょりできなくてこまってます。ＳＬＥＥＰかんすういがいによみこみがおわるまでたいきしつづける
ようなめいれい・かんすうがあったらおしえてください。
48 ：ななししさん＠おはらいっぱい。：2008/01/25(きん) 23:44:46 ID:QZuQLGj/0: そんなべんりなかんすうはないよ。
「スキャンしています」「ほぞんしています」とかいうさぎょうちゅうのダイアログがでるなら、getidでそのさぎょうちゅうダイアログがでているかんたいきして、きえたらつぎのしょり。
あるいはしょりしゅうりょうじに「へんかんがしゅうりょうしました」というダイアログがでるなら、getidでそのダイアログがでるまたいき。
ウインドウじゃなくstatic_txtのメッセージやウインドウのタイトルでさぎょうちゅうかどうかをはんだんするばあいもある
つまり、かくアプリによって、たいきのタイミングをはかるほうほうはそれぞれちがう。
49 ：ななししさん＠おはらいっぱい。：2008/01/25(きん) 23:55:46 ID:683OcADH0: >48
なるほど、やっぱそれしかないですか。よみこみかんりょうときにダイアログもウインドウのタイトルもかわらないんでタイミングはかりようがないんですけど、
しんちょくじょうきょうをつたえるバーがビーーーとのびていくんですが、これはＧｅｔＩＴＥＭとかでしゅとくできるじょうほうなんでしょうか？
50 ：ななししさん＠おはらいっぱい。：2008/01/26(つち) 07:17:27 ID:UAcIKHXR0: ボタンのじょうたいみてあげるよろし

ID=GETID("eTilTran")
STATUS=-1
WHILE STATUS=-1
STATUS=CHKBTN(ID,"りょういきせってい")
WEND
51 ：ななししさん＠おはらいっぱい。：2008/01/26(つち) 19:16:29 ID:iQgREZVD0: >>39だけど
いまさらなんだけどね
アクティブウィンドしゅとくに
＞IE = CreateOLEObj("InternetExplorer.Application")
＞IE.Visible = True
この2ぎょうがいるときとなくてもつぎへすすむげんいんがわかったのでほうこくｗ

えらぶしょうひんによってはまるでカレンダーのようながぞうをクリックしてはつぎへ
ってかんじなんだけど
IE７はタブほうしきなのでさきにひらけたページをきちんととじていないとおかしくなるみたい
IE6にもどそうとしたら「ふるいバージョンをインストールできませんって」もどせないよ^^;

さきの2おこなをつけてスタートしたときは
いちじていしでフォーカスがあわないままなんだ
もうIE7がわるいんだってことにしておこうｗ
IE６にもどすためのツールがあるらしいのでそれつかってIE6にもどすわ

おーあさからメシくわずにテストしてたからはらへった～
あさめしけんばんめしくってくるわ
んじゃ
52 ：ななししさん＠おはらいっぱい。：2008/01/26(つち) 19:58:31 ID:a90vN8qC0: >>50
ありがとうございます。うまくいきました。”りょういきせってい”とかかかれているのでわざわざeTilTranいれてもらったんだとおもいますが、それをみこんでもうひとつしつもんがあります。
eTilTraでがぞうをよみこむとひだりがわにがぞうのリストがひょうじされ、これはITM_LSTVEWでしゅとくできるじょうほうだなとおもい
ttp://blogs.yahoo.co.jp/uwsc_script/archive/2007/10/06
↑のスクリプトつかってじょうほうをしゅとくしようとおもったんですがかたまってしゅとくできません。もししゅとくできるならはいれつをつかってさしえのがぞうめいをしゅとくしてＤＯＳコマンドでべつのフォルダに
そのファイルをコピーしたりできるとおもっているんですが、どうやったらアイテムじょうほうをしゅとくできるでしょうか？よろしくおねがいします。
53 ：50：2008/01/26(つち) 20:50:09 ID:UAcIKHXR0: >>52
ITM_LSTVEWじゃむりそうだね
べつのほうほうでしゅとくできるのかどうか、わたしにはわかりません
54 ：ななししさん＠おはらいっぱい。：2008/01/26(つち) 21:38:44 ID:a90vN8qC0: >>53
そっかーやっぱITM_LSTVEWじゃだめなんですねー。とにもかくにもおてまおかけしました。ありがとうございました。
55 ：ななししさん＠おはらいっぱい。：2008/01/27(にち) 07:55:27 ID:oz1/lB8h0: けっきょく、ねないでIE6をインストールしようとがんばったけど
レジストリーまでいらってもダメだった
んでIE7をさいインコ
IE７のオプションをよくみてたら「タブブラウザをつかわない」ってチェックがあった
やったー
タブブラウザのおいんでこんなにひどいめにあってるんだ
これでやっとかいほうされるｗｗｗ
さてテストしてねようか・・・・・・
ん！？
がめんじょうはふつうのブラウザにみえるけど・・
まさか！
やっあぱりそうだ　ガーーーン！！
なんと1まいめのがめんがアクティブになっているがめんにすっかりかくれていた
なんなんだよ！！
タブじゃなくてもがめんを２つひらけていたら「たじゅうログイン」あつかいされてはじかれちゃうんだピョーン(;´д⊂ヽ

アクティブウィンドウいがいのウィンドウはすべてをとじるめいれいありますか？
それをさきにめいれいしてさいごにのこったアクティブがめんをそうさしたい

ウィンドウのなまえはそのつどかわるので
アクティブウィンドウいがいをせべてウィンドウはとじるってめいれいがあればなー
はーきのうからなにやってんだか
つかれたおやすみー
56 ：ななししさん＠おはらいっぱい。：2008/01/27(にち) 11:51:38 ID:A03LsX+d0: >>55
たじゅうログインはまどとじてもかいひできないよ。
ログインしたらそのまどでやらないと。
つまりログインしたまどにたいしてかくじつにそうさするひつようがある。

もしまどがかくれてしまうなら、ACWでActiveにしないと。

ActiveWindowいがいをとじるには、
ActiveWindowをしゅとくし、
すべてのWindowをしゅとくし、
すべてのWindowからActiveWindowをじょがいしたすべてをとじる。
↓がコード　　　>>56

IE = GETACTIVEOLEOBJ( "InternetExplorer.Application" )
ID = HNDToID(IE.HWND)
まどかず = GETALLWIN()
for i = 0 to まどかず - 1
ifb "InternetExplorer.Application" = STATUS( ID, ST_CLASS ) Then
ifb ID <> STATUS(ALL_WIN_ID[i], ST_PROCESS) Then
CtrlWin(STATUS(ALL_WIN_ID[i],　ST_PROCESS), CLOSE)
endif
endif
next
// ここで、さいしょにしゅとくしたアクティブウィンドウのオブジェクト（IE）と
// そのウィンドウID（ID）だけがのこっている。
57 ：ななししさん＠おはらいっぱい。：2008/01/27(にち) 11:56:26 ID:A03LsX+d0: >>52-54
ListViewとListBoxはみためおなじようでなかみはダイブちがうけどかんちがいしてない？
58 ：ななししさん＠おはらいっぱい。：2008/01/27(にち) 14:54:45 ID:oz1/lB8h0: >>56おはよ^^
>>55だよん
さっそくサンプルありがとう。そのままつかわせてもらったけどまどはとじなかったよ

んでぜんからでてたエラーがでた（アクティブがめんのボタンをおせないエラー）
ぜんぶまどをとじないでUWSCもそのまま（UWSをよみこませたままおいておいて）
しゅどうでアクティブじゃないほうのまどをとじて
ふたたびUWSCのよみこませていためいれい（>>56のめいれいをさいしょにかいてあるUWSファイル）をそのままさいスタートさせたらうまくいけた

やっぱりアクティブいがいのまどはぜんぶとじないとUWSCではエラーになるみたい
ちなみに
あらためてログインしなおしてしゅどうですすめていき
UWSCではエラーになっておせないボタンをしゅどうでおしてすすめてみると
さきにひらいていたまどはそのまましめなくてもいけた
しゅどうだとすすめるってことはサイトがわのもんだいではないね

もしかしたらUWSCはさきにひらいているじょうたいのまどをアクティブとにんしきしているのかな？
でもじっさいには2まいめにひらいたがめん（UWSCでそうさしたいがめん）がアクィブなんだ
なぜ2まいめがアクティブだとわたしがいいきれるのかといえばですね
2まいめがひらいてからなにもしないじょうたいでもマウスのスクロールがきいていた

UWSCがアクティブだとにんしきしてるまどとじっさいアクティブなまどとはちがうとそうていすれば
こんかいのようなエラーになるとおもう
だとすればUWSCへのめいれいは「アクティブウィンドウはとじてつぎのウィンドウへいどうしなさい」ってめいれいしなければいけない
しかしなんどもいうようにそのサイトではふせいたいさくのためにまどのなまえはまいかいちがうんだよね
ん～なやむなあ・・・そのサイトのアドレスをおしえればじょうきょうがりかいしてもらえるんだろうけど
ここはいろんなにんがみるのでそれはちょっとこまる・・・^^;

2まいのがめんがひらいているとき・・・UWSCからみてのActiveWindowをCLOSEすると
UWSCはのこりのがめんはまどめいがわからなくてもアクィブウィンドウとにんしきしてくれるんだろうか？
ちょっとちじせんのとうひょういってしょようをすませてまたテストしてみるわ。ありがとー
59 ：ななししさん＠おはらいっぱい。：2008/01/27(にち) 15:31:30 ID:A03LsX+d0: >>56の＞　ifb "InternetExplorer.Application" = STATUS( ID, ST_CLASS ) Then
これはまちがいだったかも
"InternetExplorer.Application"じゃなくて"IEFrame"だよね

↓はいぜんつくったやつだけど、じぶんでVid-DLをあたらしくひらきまくりだから
あらかじめすべてとじるしょりした。
タイトルがこていだからやりやすかったけど・・・
IEオブジェクトには.navigateってのがあるから、ひらいてるページをそれでしゅとくできるならタイトルはわからなくてもなんとかなるでしょ。

// すべてのIEをとじる
ID = GetID("Vid-DL", "IEFrame", 0.1)
While -1 <> ID
CtrlWin(ID, CLOSE)
ID = GetID("Vid-DL", "IEFrame", 0.1)
Wend
sleep(1)

// IEをきどう
ID = Exec("C:\Program Files\Internet Explorer\IEXPLORE.EXE " + url)
sleep(3)
IE = GetActiveOLEObj("InternetExplorer.Application", "Vid-DL" )
60 ：ななししさん＠おはらいっぱい。：2008/01/27(にち) 19:59:14 ID:oz1/lB8h0: >>59
おおきちょうなじょうほうだありがとう
いま、テストしていてわかったんだけど
そのサイトのページってIEにたいしてなにかせいげんをかけているみたいなんだ

みぎくりきんし、「F5」でこうしんできないとかはぜんからだったんだけど
ブラウザをFirefoxにかえてテストしてみたら
みぎくりOK、F5Ok、「Ctrl」＋「W」でわたしのいうアクティブウィンドーがとじた
（IEではどちらのまどもとじない）
たぶんどちらのまどもUWSCじしんではしゅとくしていない
しゅどうでてきとうなところをマウスクリックしたらUWSCがそうさかのうになる

UWSCがFirefoxにもたいおうしていたらなーもんだいかいけつなのに・・・
IEのオプションでみぎくりとっぱすればどうにかなりそうなまれガス
ほかにもやらなければいけないこといぱーい
ふうつかれるIEのみぎくりきんしをとっぱするのがかぎたな
UWSCはたぶんどちらのまどもしゅとくしていないのでボタンクリックのめいれいでエラーになるような

IEのオプションけんきゅうからやりなおしだわｗ
ありがとう
いつもわるいね^^
61 ：ななししさん＠おはらいっぱい。：2008/01/27(にち) 20:02:06 ID:oz1/lB8h0: あーぁIE7にバージョンアップしたのがいっしょうのふかくだよ
OSのインスコからやりなおすくらいしないと
もうIE6にもどせないしー
まったくあまいことばにごようじん
IE6がいいよホント
62 ：ななししさん＠おはらいっぱい。：2008/01/28(がつ) 02:21:08 ID:f2jwJo210: WHILEやREPEATをつかったループなかにしゅうりょうじょうけんをみたさずとも100びょうけいかしたら
きょうせいてきにつぎのしょりへいこう、とするにはどうしたらいいでしょうか？
63 ：ななししさん＠おはらいっぱい。：2008/01/28(がつ) 02:43:16 ID:rGtBli6R0: 100びょうってじかんをあわせるのはむずかしいけど、
forぶんで1びょうスリープ×１００かいならじどうてきに１００びょういじょうでぬけるから、
もうひとつのしゅうりょうじょうけんをIfぶんでついかですね。

1かいあたりのまちじかんが1びょうくらいならほぼきたいどおりのじかんだけど、
０．０１びょうでしていしてもだいたい０．１びょうくらいはかかるしね。

じかんをせいかくにするならGetTimeつかうかな。
けど、なにかしたらそれだけおもくなるし、ループにはSleepひっす。

StartTime = GetTime()
While しゅうりょうじょうけん
If StartTime + 100 < GetTime() Then Break

// しょり //

sleep(0.1)
Wend

じょうけんをどうじにはんだんしてもいいけど、じょうけんのしていをまちがったとき、
andのけいさんのゆうせんじゅんいがまちがってるとおかしくなる。

While しゅうりょうじょうけん１ and (GetTime() < StartTime+100)
64 ：ななししさん＠おはらいっぱい。：2008/01/28(がつ) 03:20:39 ID:f2jwJo210: >>63
くわしくおしえてくださってありがとうございます、たすかりました。
65 ：ななししさん＠おはらいっぱい。：2008/01/29(ひ) 03:09:04 ID:00BHvaXU0: じぶんで>>56つかってみたけどかなりまちがってるね
＞ifb "InternetExplorer.Application" = STATUS( ID, ST_CLASS ) Then
これは
ifb "IEFrame" = STATUS( ALL_WIN_ID[i], ST_CLASS ) Then
だし

GETALLWIN()でしゅとくしたぜんIEのひょうじページを
IE.document.URLみたいにかんたんにしゅとくしたかったんだけどな。
GetStrでもとれるけどIEオブジェクトからちょくせつとりたいけどオブジェクトがIDからじゃしゅとくできないんだよな・・・
66 ：ななししさん＠おはらいっぱい。：2008/01/30(みず) 00:15:15 ID:aG+PMwK+0: http://scripts.web.fc2.com/scriptsup/AutoDLClick.uws

http://www.uploda.org/
http://www.vipper.net/
じょうきアップローダーで、サムネイルからがぞうをえらんだのち、
じかんたいによってはこうこくページがひょうじされるのがめんどいのでじどうクリックする。

しゅうりょうのために、しゅうりょうボタンをひょうじし、
しょりたいしょうのページアドレスをメモちょうについかしていく。

ページこうせいがどうようのサイトであればつかえるので、たいしょうサイトについかしていけばほかのサイトにもつかえる。
ただし、アダルトサイトはダミーがおおいのでたいへんなことになるかも。
67 ：ななししさん＠おはらいっぱい。：2008/01/30(みず) 14:37:55 ID:bDlCrFc60: いよー
しょくんげんきでやっとるかね
わたしはあいかわらずたぼうつづきでへろへろ～w

IE7にかえたらアクティブウィンドーのしゅとくがおかしくなったってまえにわたしがはつげんしたんだけど
とりけしだ
そのサイトさいきんリニュアルしたんだけど
ソースをひとつづつチェックしてたらなんと！
IEにたいしていろんなせいぎょしてたんだ
* ENTERキーをおしたかのをけんさする
*ＩＥのショートカットキーおよびいちぶのきのうをむこうにする
* マウスのクリック(２じゅうリクエスト)
*マルチサブミットぼうししょり
* ファンクションキーのむこうか

これをジャバスクリプトめいれいにしてさきにヘッダぶぶんでよみこんでやがった
UWSCのそうさでどうにかできるもんだいじゃなかったんだ
ここでそうだんにのってくれたきゅうしゅうだんじありがとう
きみのソースでかなりべんきょうできましたが
サイトがわがIEにたいしてせいぎょかけていることがはんめいしました
いろいろとありがとう
さむいにちがつづくけどかぜひかないようにね

あ、UWSCにようぼうあるんだよね
・たじゅうきどうありにしてください（もっかいおかねばらってでもいいですのでバージョンアップということでおねがいします）
・IEだけでなくほかのブラウザにもたいおうしてくださいとくにべんりなFirefoxにたいおうしていないのはいたいです
いじょう
んじゃノシ
68 ：ななししさん＠おはらいっぱい。：2008/01/30(みず) 18:44:34 ID:aG+PMwK+0: http://www.vid-dl.net/

↑をつかってダウンロードするばあいはアドレスのはりつけがてさぎょうになる。
「URLリストをひらく」でアドレスがまとめてしゅとくできるが、ファイルめいがただしくない。
ひょうじされるファイルめいをしゅとくしてじどうてきにほぞんするスクリプトをUWSCでかいてみた。
ほぞんばしょはデフォルトなので、あらかじめ１つめをダウンロードしてばしょをしていしておかないとばしょがわからなくなる。

Vid－DLのまどをしゅうりょうすればスクリプトもしゅうりょうします。（アイドリングなか）
さいしょに「ほぞん」をクリックしてやらないとさきにすすまないばあいがあったのをしゅうせい。

http://scripts.web.fc2.com/scriptsup/Vid-DL.UWS
69 ：ななししさん＠おはらいっぱい。：2008/01/30(みず) 19:07:03 ID:bDlCrFc60: やっぱりUWSCがいいな
Firefoxようのじどうソフトをさがしてテストしてみたんだけど
どれもつかえない
RECIEがいいよ
ってことで
みぎクリきんしとF5きんしのとっぱをかんがえていたんだけど
UWSCでブックマークレットとかつかえる？
おきにいりにジャバスクリプトをとうろくしておいて
みぎクリきんしのページになったらそのブックマークをクリックするだけで
ジャバスクリプトがはつどうするんだ

それかUWSCでジャバスクリプトのめいれいをじっこうできる？
まあスクリプトのことはよくわかんないので
そのみぎクリきんしページになったらKeyせいぎょしている.jsのソースがわかったので
falseをtrueにかきかえるだけ^^;
どうなることやらwww

・UWSCでブックマークレットつかいたい
・UWSCでジャバスクリプトのめいれいをじっこうしたい

まいどきいてばかりでわるいね
よろしく
あ～はらへった～
きょうもいそがしくてあさめしもくっってないよ
メシくっってくるね
70 ：ななししさん＠おはらいっぱい。：2008/01/30(みず) 19:43:53 ID:ts57POVO0: RECIEてIEせんようだしCOMつかってるだけだろ。
ブラウザがらみじゃまきゅうとしからべつスレたてろよ。
71 ：ななししさん＠おはらいっぱい。：2008/01/30(みず) 20:17:03 ID:aG+PMwK+0: >>69
むりだとおもう。へんじはきたいできないよ。

>>71
// JaneDoe Viewのそうさをほじょする。
// スレをきりかえるとじどうこうしんし、さいしゅうしゅとくでならびかえる。

ID = GetID("JaneDoe View", "TMainWnd")
prev = GetSTR(ID, 1)
while 1
sleep(0.1)
// アプリがしゅうりょうされたばあいはれんどうしてしゅうりょう
if !IDToHND(ID) Then break
url = GetSTR(ID, 1)
ifb prev <> url Then
prev = url
cnt = 0
REPEAT; cnt = cnt + 1; UNTIL "" = token("/", url, true)
if 4 = cnt Then CLKITEM( ID, "《こうしん", CLK_MENU or CLK_SHORT )
endif
wend
72 ：ななししさん＠おはらいっぱい。：2008/01/30(みず) 22:55:45 ID:bDlCrFc60: みぎクリきんしのブックマークレストわかった!!
かきアドレス
https://www.squarefree.com/bookmarklets/zap.html#restore_context_menu
「Bookmarklets for Zapping Annoyances」でしょうかいされている
restore context menu というブックマークレットを「おきにいり」にとうろくします。

ブックマークにとうろくのしかたはIEならボタンのうえでみぎクリックする
「おきにいりについか」をえらぶと
「ついかしようとしているおきにいりはあんぜんでないかのうせいがあります。ぞっこうしますか？」
とでてくる
「はい」をえらぶとめでたくおきにいりいりだ

Firefoxはボタンのうえでみぎクリックして「おきにいりについか」でもいいし
ボタンを「おきにいり」までドラッグ＆ドロップしてもいい

こうかのほうはいまのところぜんせんせんしょうwww
みぎクリきんしにキミらもつかってみるといいよ

UWSCでおきにいりえらんでそうさできるのかね？？
すっげーたのしみだwwwww
73 ：ななししさん＠おはらいっぱい。：2008/01/30(みず) 23:14:16 ID:fdddoo4m0: なにかひとりのせいでこのスレもりしたがってるよね
KY←ほんにんよめるかな？
74 ：ななししさん＠おはらいっぱい。：2008/01/31(き) 00:11:32 ID:y3uw26PH0: ･ﾟ･(ﾉД`)･ﾟ･
あかんかったー
IERECではおきにいりおせないじゃん
しかしみぎクリとっぱのスクリプトはすごいのー

UWSCでジャバスクリプのじっこうのしかたおしえてくれ
75 ：ななししさん＠おはらいっぱい。：2008/01/31(き) 11:34:05 ID:PgtFh2oA0: EXEC(”ジャバスクリプ”)
76 ：ななししさん＠おはらいっぱい。：2008/01/31(き) 14:33:30 ID:Sz8SXbBx0: COMのみでできんのがスマートじゃないけども

ie.navigate("javascript:window.external.AddFavorite('http://google.co.jp/','グーグル')")
clkitem(getID("おきにいりのついか"), "OK", CLK_BTN)

これをうめればおｋ

ちなみにこちらおおさか　カレーおごってくさい
ｏｓａｋａ＿ｋａｒｅｅ＠ｙａｈｏｏ．ｃｏ．ｊｐ
77 ：ななししさん＠おはらいっぱい。：2008/01/31(き) 15:24:53 ID:y3uw26PH0: >>76
そのままだと「IEがていぎされていません」とエラーになるよ

んで2ぎょうたしてやってみたら「IEではダウンロードできません」「エラーがとくていできません」となる
IE = CreateOLEObj("InternetExplorer.Application")
IE.Visible = True
ie.navigate("javascript:window.external.AddFavorite('http://google.co.jp/','グーグル')")
clkitem(getID("おきにいりのついか"), "OK", CLK_BTN)

ちなみにjavaスクリプトもじっこうできなかったよ
それからおきにいりについかしたいんじゃなくて
IEのおきにいりボタンをおしてえらんでおす
「ブックマークレット」ぐぐってみ
ブックマークレットでみぎクリきんしをたいさくしたいの
ちなみにみぎクリきんしページでテストしてるけどいまのところぜんしょう
みぎクリきんしサイトすべてのページでみぎクリできるようになったもんね
だからこのブックマークレットをUWSCでつかいたいのさ
カレーライスはおあずけねｗ
んじゃ
78 ：ななししさん＠おはらいっぱい。：2008/01/31(き) 15:46:14 ID:PgtFh2oA0: ちゅうしゃきんしたいさくもUWSCでつかいたいよな。
79 ：ななししさん＠おはらいっぱい。：2008/01/31(き) 23:25:21 ID:M6YVRQDk0: ページないにみぎクリきんしのきじゅつをはっけんしたらそこをかきかえるってのを
SleipnirかFoxのプラグいんとしてぶちこんどいたらいいんじゃない？

あと、ブラウザのアドレスぶに
javascript:XXXXXX; (XXXXX = javascriptのきじゅつ)
をにゅうりょくするとページにたいしてjavascriptをじっこうできる。これをつかったらUWSCがもっとべんりになるべな。

ゆうたら、そのブックマークレットをアドレスぶにぶちこんでひらくUWSCをかけば
おきにいりのなかのボタンをおすひつようもなくなるんよ。

カレーおごってくさい
80 ：ななししさん＠おはらいっぱい。：2008/02/01(きん) 00:53:58 ID:lH8A3iAH0: アドレスににゅうりょくするのもしってたよ
しかしどうせななら「F5」「TAB」「「マウス」いっしょにかいきんしたいだろ
えいごのページにそれらしいソースがあったけど
250ぎょうある
アドレスさくせんは520もじまでなんだよね
あしたはびょういんか
はぁどーなることやら
んじゃーの
おやすみ
81 ：ななししさん＠おはらいっぱい。：2008/02/01(きん) 06:48:07 ID:QWFXvWvc0: みぎクリックきんしをなんとかしたかったんじゃないの?
F5 とか TAB ってきんしできるの?

そのそれらしいコードとみぎクリックきんしのコードを js ファイルにほぞんして
がいぶスクリプトをよみこむようにすりゃいいんじゃない

OPTION EXPLICIT

DIM url = たいしょうの URL
DIM js = js のフルパス (ex. file:///X:/hoge.js)

DIM ieobj, headelm, scriptelm

ieobj = CREATEOLEOBJ("InternetExplorer.Application")
ieobj.Visible = True
ieobj.Navigate(url)

REPEAT
SLEEP(0.1)
UNTIL !(ieobj.Busy) AND (ieobj.ReadyState = 4)

headelm = ieobj.document.getElementsByTagName("head").item(0)
scriptelm = ieobj.document.createElement("script")
scriptelm.type = "text/javascript"
scriptelm.src = js
scriptelm.charset = "Shift_JIS"
headelm.appendChild(scriptelm)
82 ：ななししさん＠おはらいっぱい。：2008/02/02(つち) 16:58:15 ID:F1ruxvK80: ページのじどうさいどくみこみは、サーバーをまいかいチェックするようにせっていしとけば
↓のコードでいけるけど、F5とおなじどうさできんかな・・・キーをそうしんするとおもてにでてきてうざいから×
url="http://~~"
IE.navigate(javascript:parent.frames.location='"+url+"'")

>>76
Ctrl+Dでがめんなしでおきにいりについか。
だからSCKEY（ID, VK_Ctrl, VK_D)でいいよ

>>43
これうまくいかんことがある。
やっぱ↓のがかくじつ。submitはボタンのなまえかID
ClkItemならひょうじめいでしていできるけどWebページのボタンにはつかえんね。
IE.document.forms[0].submit.click()

そうそう。
さいひょうじをメニューからしていしようとしたんだけど、サブメニューがクリックできなかった。
たいていサブメニューになってるからCLK_MENUのじつようせいがひくい・・・
つかいかたがあるのかもしれんけどわからん。
83 ：ななししさん＠おはらいっぱい。：2008/02/03(にち) 02:10:17 ID:NyiDqMBY0: きほんてきなことでもうしわけないけど
「ざひょう(11,22)のしょくがしろ(FFFFFF)いがいになるまでまつ」スクリプトをおしえてください
84 ：ななししさん＠おはらいっぱい。：2008/02/03(にち) 04:48:20 ID:P/GvGTQ30: while peekcolor(11,22)=$ffffff
sleep(1)
wend
85 ：ななししさん＠おはらいっぱい。：2008/02/03(にち) 15:57:04 ID:OBLbC13y0: >>79
ブックマークレットいろいろさがしたんだけど
みぎクリとっぱ100％のブックマークレットはいくつかあったけど
「Tab」や「Ctrl」「Shift」「F5」とかまでむこうをとっぱできるのってないもんだな
っとおもってたら1こだけみつけたｗ
UWSCでテストしてOKだった
そのスクリプトここにはってもいいかどうかわかんないので
もしきになるならそれをおいてるアドレスおしえるわ

それからなぜがぞうにんしょうがめんにフォーカスをあわせられなかったり
みぎクリとっぱしてるのにマウスクリックできないのかわかった！！
そのテストするときはIE7でひらいているまどが２つあるんだけど
そのどちらかがアクティブだとおもっていたらなんと！！！！

そのじょうたいではUWSCがアクティブがめんになってるじゃん
しかもRECIEでしゅうせいしようとしても
RECIEでは「Alt」おさえっぱなし「Tab」1かいおして
「Alt」「Tab」りょうほうはなすってきろくできないじゃん

カメラできろくできるのかな（あとでやってみるけど
カメラできろくしたのってRECIEでつかえないエラーになることあるもんなー

「Alt」「Tab」つかってアクティブウィンドーをIE7にかえたら
まえにおしえてもらったフォーカスあわせるのができた
いまのままじゃアクティブウィンドーに1かいマウスクリックでもしないとアクティブにならない
UWSCがアクティブのままだったらIEのがめんをマウスクリックしないんだよね

このままじゃはんじどうっていうのかはんてうごっていうのかぜんじどうじゃないってことだ（なみだ
だれかRECIEのほうのめいれいでAltおさえっぱなしTab1はつおしえてクレヨンしんちゃんwww
いつもわるいね。あじがとーー
86 ：ななししさん＠おはらいっぱい。：2008/02/03(にち) 16:36:32 ID:OBLbC13y0: れんとうスマソ85です
でけた！
カメラできろくしたのをちょっとへんこうしただけでいけましたｗ

ALTダウン　TABクリック1かい　おしてアクティブウィンドーきりかえてALTアップ
そしてTABもう1かいおしてウィンドーないのテキストボックスきりかえて
CTRLおすまでたいき。
がぞうにんしょうをにゅうりょく→CTRLおしてつぎのがめんへさとひろみｗｗｗ
やったー
うれしい
おしえてくれたらカレーライスごちそうしようとおもったんだけど
じこかいけつでけたｗｗｗ

KBD(VK_ALT,DOWN,1000)
KBD(VK_TAB,CLICK,1)
KBD(VK_ALT,UP,1000)
SLEEP(0.1)
KBD(VK_TAB,CLICK,1)
SLEEP(0.1)
87 ：ななししさん＠おはらいっぱい。：2008/02/03(にち) 17:04:25 ID:OBLbC13y0: ふたたびれんとう
スマソｗｗｗ

アクィブウィンドーやっとしゅとくできたので
TABでテキストボックスのきりかえしなくても
そのままフォーカスあわせれた
やった！
これで0.1びょうそくくなったぞｗｗｗｗ

ここはわたしのにっきちょうたなｗ
んじゃノシ

KBD(VK_ALT,DOWN,1000)
KBD(VK_TAB,CLICK,1)
KBD(VK_ALT,UP,1000)
SLEEP(0.1)
IE.document.forms(0).elements(5).focus()
88 ：ななししさん＠おはらいっぱい。：2008/02/03(にち) 18:07:18 ID:pYlZOk5l0: よんでるかぎりなにがしたいのかよくわかんなってきたけども
フォーカスあわせてにゅうりょくするなら
IE.document.forms(0).elements(5).value = input("にゅうりょくしてください")
がクールなんちゃうかいな
これならフォーカスはずれててもぶちこめる
89 ：ななししさん＠おはらいっぱい。：2008/02/03(にち) 21:20:40 ID:VOpowv0z0: ２ゲットスクリプトじっこうしてたらきせいされた。
90 ：ななししさん＠おはらいっぱい。：2008/02/03(にち) 21:29:36 ID:VOpowv0z0: いちおうかんせいしたんだけどまだまだこうそくかできるかなと、ないぶしょりつくってるとちゅうだったのに。

スレッドいちらんだとこうしんがおくれることがあるんで、ふつうにニュースそくほう＋のページをこうしん。
ただし、フォームとかリンクとかおおくてじかんがかかるんで、HTMLだけをしゅとく。
きのうはもじばけのかいけつほうがわからなくてねてしまったんだけど、
ソースがシフトJISのデータはバイナリでじゅしんすればいいことがわかった。
とりあえずIEがめんなしでHTMLしゅとくするスクリプト
↓↓↓
oHttp = CreateOLEObj("MSXML2.XMLHTTP")
oHttp.Open("GET", "http://mamono.2ch.net/newsplus/", False)
oHttp.setRequestHeader("If-Modified-Since", "Thu, 01 Jun 1970 00:00:00 GMT");
oHttp.Send
str = BETWEENSTR(DECODE(oHttp.responseBody, CODE_BYTEARRAY),"<form method=GET name=f","<form action=")

どうせきせいくらうんだしまえバージョンのスクリプトアップしてもいいのかな？
ぎょうむぼうがいになっちゃうかもしれないからやめとくか。
91 ：ななししさん＠おはらいっぱい。：2008/02/03(にち) 21:50:16 ID:VOpowv0z0: http://hissi.dyndns.ws/read.php/newsplus/20080203/ZG9NeXR5cm4w.html
92 ：ななししさん＠おはらいっぱい。：2008/02/03(にち) 22:37:20 ID:BrcBr9Sw0: UWSCでつくるいみがない
93 ：ななししさん＠おはらいっぱい。：2008/02/03(にち) 22:40:57 ID:fSn7+mzp0: >>92
ふいたｗｗ
94 ：ななししさん＠おはらいっぱい。：2008/02/03(にち) 23:24:19 ID:r2Z5rDPi0: にっき、というよりひとりごとになってるな。
だらだらかきたいならブログでもつくってそっちにかいたら？
95 ：ななししさん＠おはらいっぱい。：2008/02/03(にち) 23:26:06 ID:fSn7+mzp0: >>94
いやほんとそうだよね
おてあげだよ。
96 ：ななししさん＠おはらいっぱい。：2008/02/03(にち) 23:36:12 ID:VOpowv0z0: >>92
ほかにいいスクリプトがあるならおしえてください。
97 ：ななししさん＠おはらいっぱい。：2008/02/04(がつ) 00:00:33 ID:r2Z5rDPi0: >>96
とりあえずなにがしたいのか３ぎょうでまとめてみ。
98 ：ななししさん＠おはらいっぱい。：2008/02/04(がつ) 00:06:35 ID:iTB6+LfJ0: >>97
あれとか
これとか
いろいろ
99 ：92：2008/02/04(がつ) 00:35:51 ID:GzuoCs/D0: ちなみにさっきのレスはあげっぱなしのやつにたいしてね
100 ：ななししさん＠おはらいっぱい。：2008/02/04(がつ) 00:40:31 ID:xbI3oztW0: ●にたいおうしないときせいされるよん
101 ：ななししさん＠おはらいっぱい。：2008/02/04(がつ) 00:41:37 ID:F2S5bE040: >>90
アップよろしく
102 ：ななししさん＠おはらいっぱい。：2008/02/04(がつ) 01:11:53 ID:iTB6+LfJ0: >>101
http://scripts.web.fc2.com/scriptsup/Auto2Get2chNSP.uws

まあなるようになるだろ。
うｐはよていしてなかったしゴミがのこってるけど>>91のじっせきのあるやつ。
やばかったらいきなりさくじょとかつうほうとかじゃなくここにかきこんでもらえるとありがたい。
103 ：ななししさん＠おはらいっぱい。：2008/02/04(がつ) 01:53:59 ID:F2S5bE040: >>102
thx!
みてみるぜ
104 ：ななししさん＠おはらいっぱい。：2008/02/04(がつ) 02:40:32 ID:iTB6+LfJ0: ないぶしょりでできてつうしんきせいかからなければこーゆーのもゆめじゃないんだけど
>>90のやりほうでつくりかけてるスクリプトじっこうするのに2びょうかかっちゃうんだよね。
HTMLもそれなりなサイズだしもじこーどへんかんしてるしスクリプトだし、1びょうみまんはむり。
しゅとくしたデータをストリームとしてちくじひつようなふんだけうけとってしょりするとか、
もじれつがバイナリはいれつととうかなCげんごとかならよけいなしょりをはぶけていいんだけどなあ。

http://mamono.2ch.net/test/read.cgi/newsplus/1202057922/1-2
1 なまえ：sek ◆inter/GWwg ＠sekつけφ ★[] とうこうにち：2008/02/04(がつ) 01:58:42 ID:???0 ?2BP(1113)
　
2 なまえ：2ゲットちゃん ◆.r1OODycY. [] とうこうにち：2008/02/04(がつ) 01:58:42 ID:iNELh+Ip0
2ゲット
105 ：ななししさん＠おはらいっぱい。：2008/02/04(がつ) 03:29:59 ID:iTB6+LfJ0: あたらしいスクリプトをかんがえたんだけどさすがにUWSCじゃむりだ。

てまえにひょうじされてるブラウザからひょうじちゅうのURLをゲットして、
URLなかのすうじぶぶんをぬきだして、ボタンひとつでぞうげんしたページをひらくようにできたら
リンクがはられてないけどれんばんになってるのをみるのにべんりたなとおもったんだけど。
すうじがなんかしょかあるばあいはボタンのかずもかえないとつかえないし。
106 ：ななししさん＠おはらいっぱい。：2008/02/04(がつ) 03:44:11 ID:iTB6+LfJ0: >>104
2びょうかかるってまちがい。
sleep（１）がいっってた。
sleepがひつようになるぶぶんをちょうせいしたら1びょうみまんはもんだいなくだせるそくどだった。
107 ：ななししさん＠おはらいっぱい。：2008/02/04(がつ) 13:23:11 ID:t8qljaZM0: >>105
そんなフリーソフトあったきがする。ベクタでさがしてみたら。
まあつくるのがたのしいならいいけど。

UWSCとにたようなソフトでAutoItもよいよ。ドキュメントじゅうじつしてるし。
えいごだけどなｗ
108 ：ななししさん＠おはらいっぱい。：2008/02/04(がつ) 18:21:10 ID:iTB6+LfJ0: >>107
WindowsうえのあらゆるコンポーネントをツリーひらいてせんたくするのがあったけどあれってAutoItだったっけ？
たしかにこうきのうだったけど、めんどくさかったきがしてほうちしてた。
えいごなのもめんどいし、しょしきがふくざつなきがしたのと、あとは、にほんごのコメントがつかえないきがした。

にゅうりょくサポートがあるのはよさげだけど・・
http://www.autoitscript.com/autoit3/scite/

オンラインドキュメントはきかいほんやくがつかえるからたすかる。
リンクさきまでじどうでほんやくしてくれるのがべんり
http://honyaku.yahoofs.jp/url_result?ctw_=sT,eCR-EJ,bT,hT,uaHR0cDovL3d3dy5hdXRvaXRzY3JpcHQuY29tL2F1dG9pdDMvZG9jcy8=,qlang=ja|for=0|sp=-5|fs=100%|fb=0|fi=0|fc=FF0000|db=T|eid=CR-EJ,ka3870e59ef7ec44819488f2a85ac769e,t20080205060421,

そうそう。
インストールしないとつかえないんだよね。やっぱ。
まあおいおいつかってみる。

それはそうと、2ゲットツールをかいぞうしてきせいくらわないようにしてるんですよ。
いたのトップページでかくじつにさいしんのスレらんをゲットしようとおもったのに
れんぞくでよみこんでるとこうしんしたページをかえしてくれなくなるから、
Janeをみならって15びょうに1かいのよみこみにせいげんし、さらに、
せんとう１０けんまではプレビューがでるけど、プレビューのでない11けんめいこうまでおちるのをまつという・・・
1ふんいじょうほうちされるようなおこぼれをひろうというせんりゃく。
これだとぜんぜん2ゲットできないんだけど、スクリプトによるかきこみかどうかはんだんできないし。

スレたてたほんにんがつづけてとうこうするばあいにわりこめなくなるけど、
わりこみするとどうやらめをつけられるようだからしかたない。
109 ：ななししさん＠おはらいっぱい。：2008/02/04(がつ) 20:54:01 ID:HsWmb/re0: 19ときにきせいされてたぞ、ほどほどになｗ
スレがたつまえのじこくで2getするほうほうもあるけど、
ここまであらすとなるとおしえられないな。
110 ：ななししさん＠おはらいっぱい。：2008/02/04(がつ) 21:05:49 ID:iTB6+LfJ0: >>109
2ゲットがあらしとかばかみたい。
みんなが2ゲットのためにF5アタックするくらいなら、２をとらせないほうがふかはへるはず。

＞スレがたつまえのじこくで
スレばんをよそうしてPOSTするんだろ。
111 ：ななししさん＠おはらいっぱい。：2008/02/04(がつ) 23:02:29 ID:Hux/5Icf0: awtをつかったJava GUI アプリでサーバーとつうしんしているものがあります。
（とくいさきコードをいれるととくいさきめいをよみこんできてひょうじしたり）
サーバーふかによってかえってくるじかんがちがうので、IEのbusyやreadystateのようにまちたい
のですが、どうしたらいいでしょうか？

なにかほうほうがあればおしえてください。
112 ：ななししさん＠おはらいっぱい。：2008/02/05(ひ) 00:29:54 ID:bHal2eZv0: ニューそく＋のほとんどのスレで、スレがたつとすぐにAAはってるやつらいるのに
ぼくだけがなんできせいされるのかわからない。
しゅどうっぽいスクリプトならいいんかと。
それともたんにつうほうされたのがぼくだけなのかと。

>>111
oHttp = CreateOLEObj("MSXML2.XMLHTTP")
oHttp.Open("GET", "http://mamono.2ch.net/newsplus/", False)

OpenのさいごがFalseならひどうきなのでまたない。
Trueならどうきなのでへんじをまつ。

こうしんがないかぎりなにもしないのなら、>>90では１９７０ねんとかしていしてるところを、
ほぞんしたLast-Modifiedをセットする。

LastModified = "Thu, 01 Jun 1970 00:00:00 GMT"
while 1
oHttp.setRequestHeader("If-Modified-Since", LastModified);
oHttp.Send("")
ifb 200 <> oHttp.status Then
continue
endif
LastModified = oHttp.getResponseHeader("Last-Modified")
wend

・・・UWSCのコードだからawtではかんけいないきがするけど。
まあどのげんごでもOLEつかうばあいはほとんどいっしょだとおもう。
113 ：ななししさん＠おはらいっぱい。：2008/02/05(ひ) 02:55:04 ID:hWzTsUwB0: あるwebのぶんしょうからあるもじれつのちょくごのすうじをへんすうにいれたいのですが、
やりほうしってるほうおしえてください、、。

たとえば

つぎのじこくは１０ときです。

とかかれてあるページから「じこくは」のもじれつのちょくごにある「１０」
を、あるへんすうにいれる

とかのしょりなのですが、、。
114 ：ななししさん＠おはらいっぱい。：2008/02/05(ひ) 03:14:16 ID:bHal2eZv0: もじれつ = "つぎのじこくは１０ときです。"

BETWEENSTR( もじれつ,　"つぎのじこくは",　"ときです。",　[しょうりゃく] )
もどりち："１０"
STRCONV("１０", SC_HALFWIDTH)
もどりち："10"
VAL( "10" )
もどりち：10

VAL( STRCONV(BETWEENSTR( もじれつ,　"つぎのじこくは",　"ときです。"), SC_HALFWIDTH) )

ああ、きょうめんきょこうしんしないとしっこうしちまうがひるまでにおきれるじしんがない・・・
めんきょしゅとくとかこうしんのときはいっつもねぶそくでめつきわるいんだよ。
てつやあけでいっぱつめんきょとったときはつらかったずら。
115 ：ななししさん＠おはらいっぱい。：2008/02/05(ひ) 03:36:06 ID:bHal2eZv0: >>112
ちょいミス。
Openしてどうきつうしんしないとね。
んでじこレスしなくてもせんようブラウザでじこレスのプレビューしたらみれるね。
>>115

oHttp = CreateOLEObj("MSXML2.XMLHTTP")
LastModified = "Thu, 01 Jun 1970 00:00:00 GMT"
while 1
oHttp.Open("GET", "http://mamono.2ch.net/newsplus/", True)
oHttp.setRequestHeader("If-Modified-Since", LastModified);
oHttp.Send("")
ifb 200 <> oHttp.status Then
continue
endif
LastModified = oHttp.getResponseHeader("Last-Modified")
wend

あんじかかってるおかげで２：３０～３：００はねむくなるんだけどそのじかんたいをはずすとすこしもねむくならないという・・・
116 ：ななししさん＠おはらいっぱい。：2008/02/05(ひ) 07:53:03 ID:i9OkSWcM0: けんさくしてでてきたじょうほうをぜんじどうでぜんぶのじょうほうをエクセルにとりこみたいんだけど
（UWSCとエクセルのWEBクエリーきのうをつかってです）
ようびやじかんによってはけんさくされてでてきたじょうほうが３ページのときもあれば６ページのときもあります
UWSCをつかって１ページめはエクセルにとりこんでほぞんできました
へんすうつかって２ページめ３ページめとおなじことをくりかえすことはかのうだとおもいます

こまったことにわからないことができました
けんさくででてきたページかぞってどうやってUWSCにはんだんさせればいいの？

エラーになってとまったままになってしまうと２けんめのけんさくサイトにいけないです
どなたかページかずのはんだんのさせかたをおしえてください
117 ：ななししさん＠おはらいっぱい。：2008/02/05(ひ) 09:18:37 ID:bHal2eZv0: // とうこうしょり ////////////////////
// もどりち：　TRUE:せいじょう、FALSE:エラー
// ひきすう：
// IE :ＩＥオブジェクト
// conturl :スレのばしょ
// TNo :スレばん
// text :とうこうテキスト
// メモちょう=0 :メモちょうＩＤ
// メモちょうＩＤはデバッグよう
Function Cont( Var IE, conturl, TNo, text, メモちょう=0)
result = true
ID = HNDToID(IE.HWND)

str = conturl+TNo+"/l1&nohead"
for i = 0 to 2
IE.navigate(str)
REPEAT; sleep(0.1); UNTIL !IE.busy AND IE.readystate = 4

// エラーページチェック
str = Status(ID, ST_TITLE)
errortitles[4] = str
for e = 0 to 4
ifb 1 <= Pos(errortitles[e], str) Then
select e
case 4 // エラーがなければぞっこうする。
break 2
case 0 // せつぞくエラーならきていかいすうしこうする。
sleep(2)
continue 2
default // そのほかエラーならエラーしゅうりょうする。
SendSTR( メモちょう, errortitles[e] + "<#CR>", 1, false, false )
IE.navigate("about:blank")
118 ：ななししさん＠おはらいっぱい。：2008/02/05(ひ) 09:28:01 ID:bHal2eZv0: result = false
exit
selend
endif
next
// ここにはこないはず
msgbox("エラーはんていミス")
exitexit
next

// とうこうがめんですでにかきこみがあればキャンセルする。
src = IEGetSrc(IE, "dt", 1)
ifb 1 <> Val(BetweenStr(src, "<dt>", " ：")) Then
result = false
exit
endif
119 ：ななししさん＠おはらいっぱい。：2008/02/05(ひ) 09:29:14 ID:bHal2eZv0: // テキストセット
IESETDATA(IE, text, "MESSAGE")
// そうしん
IE.document.forms[0].submit.click()
REPEAT; sleep(0.1); UNTIL !IE.busy AND IE.readystate = 4

str = Status(ID, ST_TITLE)
ifb 1 <= Pos("かきこみかくにん", str) Then
IE.document.forms[0].submit.click()
REPEAT; sleep(0.1); UNTIL !IE.busy AND IE.readystate = 4
endif

IE.navigate("about:blank")
REPEAT; sleep(0.1); UNTIL !IE.busy AND IE.readystate = 4
Fend
120 ：ななししさん＠おはらいっぱい。：2008/02/05(ひ) 09:55:18 ID:bHal2eZv0: ThreadNoにスレばん（ニュースそくほう＋のスレのURLのnewsplus/ののちのすうじ）をセットして
>>117-119のContをよびだす。
エラーをだしたくないいばあい、Contのなかで、"/l1&nohead"としてるのを"/1"としてじょうけんのあったページにします。

>>116
けんさくページにそのままはつかえませんが、エラーのはんていともどるそうさのサンプルです。
これがエラーにとんでしまったばあい、タイトルバーではんていするのがはやいですが、
さまざまなページにはたいおうしきれないので、かんぜんなどうさはほしょうできません。
エラーがでたばあい、 .Navigateじゃなく、IE.GoBack() をつかえばいいです。
いかは、Contをよびだすコード

conturl = "http://mamono.2ch.net/test/read.cgi/newsplus/" // スレッドほぞんばしょ
PUBLIC errortitles[]="サーバーがみつかりません", _
"ＥＲＲＯＲ", _
"ERROR", _
"error", _
""
text = "てきとうに"

// とうこうようブラウザをきどう
IE = CreateOLEObj("InternetExplorer.Application")
IE.visible = True

メモちょう = Exec("notepad.exe")
ThreadNo = スレッドばんごう

ifb Cont( IE, conturl, ThreadNo, text) Then
　　SendSTR( メモちょう, "good<#CR>", 1, false, false )
else
　　SendSTR( メモちょう, "err<#CR>", 1, false, false )
endif
121 ：ななししさん＠おはらいっぱい。：2008/02/05(ひ) 13:36:58 ID:i9OkSWcM0: 116です
>>117-120
エラーではんだんしてしょりするってことですね
アドバイスありがとうございます
じぶんてきにははじめてつくるだいかかりなものなのできながにやってみます
ありがとうございました
122 ：113：2008/02/05(ひ) 22:41:59 ID:hWzTsUwB0: >>114
かれいにおこたえありがとう。さんこうになります。
123 ：ななししさん＠おはらいっぱい。：2008/02/06(みず) 03:57:18 ID:K7KdaWNn0: すいませんまたですが、あるウィンドウのローカルざひょうをあつかうほうほうを
おしえてください、、。
124 ：ななししさん＠おはらいっぱい。：2008/02/06(みず) 05:06:35 ID:lHr9HGwD0: >>123
もくてきのまどをマウスクリックするそうさをろくがし、ファイルにほぞんする。
ヘルプをひらき、きろくされたそうさをするかんすうめいでキーワードからけんさく
MOUSEORGね。
125 ：ななししさん＠おはらいっぱい。：2008/02/06(みず) 12:08:49 ID:sGC7YRQn0: UWSCでテキストエディターのひでまるをきどうさせたいんだけどどうすればいいですか？
126 ：ななししさん＠おはらいっぱい。：2008/02/06(みず) 12:19:09 ID:K7KdaWNn0: しつれいします。
あるしょりがおわるまでほかのウィンドウをアクティブにさせない
ほうほうをおしえてください。ほかのじどうでひらくウィンドウにキーそうさが
とられてしまう、、、。
127 ：123：2008/02/06(みず) 12:20:21 ID:K7KdaWNn0: >>124
ありがとうございます。
ちょっとわかりませんがしらべてみます。
128 ：ななししさん＠おはらいっぱい。：2008/02/06(みず) 12:21:01 ID:QMr5shAm0: exec("C:\Program Files\Hidemaru\Hidemaru.exe")
129 ：ななししさん＠おはらいっぱい。：2008/02/06(みず) 12:21:35 ID:QMr5shAm0: ごばく
130 ：ななししさん＠おはらいっぱい。：2008/02/06(みず) 13:54:22 ID:sGC7YRQn0: >>126
それわたしのぎゃくだね
わたしのばあいサイトがわがふせいたいさくやじどうスクリプトたいさくのためにいろんなしかけがしてあって
UWSCがアクティブになりIEでひらいているまどはしゅどうでマウスクリックしないとアクティブにできなかったんだ
IEでウィンドーひらいてサイトをみているのにアクティブがUWSCにもどされていたのはなかなかわかんなかったよ

あなたのばあいはわたしとぎゃくにすればいいのではないでしょうか
いったん「Alt」+「Tab」をつかってUWSCにアクティブしてみたらどうでしょうか？

KBD(VK_ALT,DOWN,1000)
KBD(VK_TAB,CLICK,1)//このぎょうさいごのすうじはUWSCいがいにうごいているプログラムのかずでへんこうしてください
KBD(VK_ALT,UP,1000)
SLEEP(0.1)

IEにアクティブもどすときにもういちどおなじめいれいしてもどしてね

>>128
あじがと
それやってみてダメなんだよね
どうやってひでまるをきどうさせるんだろね？？
わかんないよｗ
131 ：ななししさん＠おはらいっぱい。：2008/02/06(みず) 14:51:11 ID:lHr9HGwD0: >>126
＞ほかのじどうでひらくウィンドウにキーそうさがとられてしまう、、、。

そんなあなたにSCKEY
//　ショートカットキーのじっこう
SCKEY( ID,　キー,　[キー,　キー,　キー,　...] )

シフト、Alt、DELとかのじゅんにしていするとタスクマネージャがでるとおもうけど、
べつにシフトキーとかしていなしにF5とかをしていしてもつかえる。
もんだいはさいせいじかんのしていがないことだけど、
ぼくはKBDつかうときもじかんしていは０でsleepいれてタイミングとってるから。
132 ：ななししさん＠おはらいっぱい。：2008/02/06(みず) 18:38:40 ID:sGC7YRQn0: >>128
ありがとう
ぜんかい、それできどうさせれないとはんだんしたのはわたしのにゅうりょくミスのようでした
もっかいやってみたらそれでひでまるをよびだせました^^
ありがとうです
133 ：ななししさん＠おはらいっぱい。：2008/02/06(みず) 19:14:24 ID:sGC7YRQn0: ひでまるをたちあげれたけどおわらすのはどうするの？
HIDEMARU.quit
HIDEMARU.out
HIDEMARU.down
HIDEMARU.exit
これぜんぶダメですよー
134 ：ななししさん＠おはらいっぱい。：2008/02/06(みず) 19:32:24 ID:oGdGMBlc0: （＾ω＾；）
135 ：ななししさん＠おはらいっぱい。：2008/02/06(みず) 21:42:39 ID:sGC7YRQn0: じこかいけつ
uwscでしゅうりょうのしじをだすのではなく
ひでまるのマクロでじどうしゅうりょうさせることにしたのだｗ
136 ：ななししさん＠おはらいっぱい。：2008/02/06(みず) 22:57:24 ID:lHr9HGwD0: >>133
>>135
ヘルプで「しゅうりょう」をけんさくしたらいっぱつででてくるんだけど。
137 ：ななししさん＠おはらいっぱい。：2008/02/07(き) 00:12:19 ID:wx7kSWwB0: http://scripts.web.fc2.com/scriptsup/test15.uws

↑は>>120でさらしたやつのほんたい。
スレトップページからひろってくるのがはやいだろうとおもってつくったけどまったくのむだだった。
トップページはれんぞくしてよみこんだりできないしにんがおおいとまったくこうしんされない。

まったくのしっぱいさくなんだけど、スレのしょしきがちがうのにたいおうしたりこうしんのチェックをしたりしてるので
Webページよみこむしょりのさんこうにはなるかなと。

とはいえ、データをまるごとうけとっても、くぎりがはっきりしてないテキストを
UWSCではうまくあつかえないのでいみないかも。
HTMLとかならかいぎょうコードをはぶいてくれるのはたすかるんだけど
２ｃｈの.datファイルでかいぎょうコードがけされてしまうとしょりできないしな・・・
138 ：ななししさん＠おはらいっぱい。：2008/02/07(き) 07:03:10 ID:wx7kSWwB0: ２ゲットツールをPythonでかきなおしてるんだけど
アプリケーションをそうさするのはかんきょういぞんしてしまうからきほんNGのようでできない。
いちおうWindowsのCOMをつかえるようにしたり、
Macでアプリケーションをつくるフレームワークがあったりするけどややこしい。
まずソフトがにほんごじゃないからインストールがめんどい。

アプリをそうさするんだったらかんたんなのに
めにみえないプロパティやらメソッドやらをマニュアルみて・・・

Pythonでやるのがまちがってんのかなあ
139 ：ななししさん＠おはらいっぱい。：2008/02/07(き) 08:44:12 ID:rT0F5c6A0: ぜんぜんまちがってないけどスレをまちがってる｡
140 ：ななししさん＠おはらいっぱい。：2008/02/08(きん) 02:06:34 ID:lKiof+0a0: ＸＰのＩＥ７でサイトのじゅんかいとじどうログインとほぞんにＵＷＳＣしようちゅう。
こんどＰＣをＶｉｓｔａにかいかえるんだが、おなじＩＥ７だからスクリプトはそのままうごくかな？
しようほうにもよるだろうが、ＸＰ→Ｖｉｓｔａにしたにんでもんだいあったりしたにんいたらおしえて。
141 ：ななししさん＠おはらいっぱい。：2008/02/08(きん) 03:46:27 ID:bciAgBLk0: >>140
そういえばIE７になると、タブブラウザだから
IEオブジェクトつくるまえにWindowsのShellオブジェクトつくらないといけないとかかいてあった。
142 ：ななししさん＠おはらいっぱい。：2008/02/08(きん) 04:47:40 ID:8R1SZh0d0: だれかひでまるエディターの「grepのじっこう」
けんさくもじ「じかん」でにゅうりょくするほうほうおしえてくれ
きのうからずっとやってるけどダメだ
とりあえず「grepのじっこう-ひでまる-」のまどはアクティブにして
けんさくもじにゅうりょくのところへフォーカスあわせるまではいくんだけど
じどうではえいすうじしかにゅうりょくできないのかな？？

30じかんはねてない・・・
まじやばねるわ
143 ：ななししさん＠おはらいっぱい。：2008/02/08(きん) 12:01:40 ID:bciAgBLk0: >>142
ひでまるがもじこーどちがうのかも
もじこーどちがうとNULLにおきかえられることがある。
メモちょうにならUWSCのもじはそのまましゅつりょくされるから、
おなじようにひでまるのへんしゅうがめんにはりつけられるかためし、
そんでダイアログにもできるかどうかためす。

あと、データのそうしんほうほうが、APIつかうのとユーザビリティーなんとかってのと２タイプがあるけど、
APIでだとうごかないばあいがある。
APIでうごかないのは、コントロールのしゅるいをまちがってしていしたばあいがあるけど、
ACCしていしてやればばんごうさえまちがわなければまずかくじつにそうしんできるよ。

ACCしていは、スタティックテキストもさがしだしてくれるからみためにちゅうじつ。
ACCしていするとウィンドウがアクティブになっちゃうからどうさはおそくなるし、
うらでうごかすことができなくなるけど、とりあえずどうささせたいばあいはつかえる。
144 ：ななししさん＠おはらいっぱい。：2008/02/08(きん) 12:34:25 ID:MXedu2vt0: exec("C:\Program Files\Hidemaru\Hidemaru.exe")
hidemaru=GetID(" - ひでまる","Hidemaru32Class")
scKey(hidemaru,VK_ALT)
scKey(hidemaru,VK_S)
scKey(hidemaru,VK_G)
grep=GetID("grepのじっこう","#32770")
sendstr(grep,"じかん",1,TRUE)
clkitem(grep,"OK",CLK_BTN)

これじゃだめなん？
145 ：ななししさん＠おはらいっぱい。：2008/02/08(きん) 12:40:17 ID:8R1SZh0d0: >>143
いよー^^
いつもわるいね
さっきもやってたんだけどわかんないよ
とりあえずカメラできろくしたものをいろいろやったけどダメっぽい

RECIEでほかにきろくしておいためいれいでつかえそうなのもためしてみたけど
まったくわけわかめ^^;
おてあげですよ

ひでまるのマクロのきろく、しゅうりょう、ほぞん、さいせいテストとやっても
けんさくもじはしゅどうにゅうりょくになってしまう
どうなってんだか？？
こんにちはもうじかんがないのでまたよるにでもテストしてみる
ちょっとでかけてくる
ありがと
んじゃ
146 ：ななししさん＠おはらいっぱい。：2008/02/08(きん) 12:42:48 ID:8R1SZh0d0: >>144
おぉ！
わたしがかきこんでるまにレスくれてたのか
ありがとー！
それよるにでもテストさせてもらうよ
いま、まじでスグでかけないとダメなんだ
よるになっちゃうけどテストけっかほうこくするよ
ありがと
んじゃいってきます^^
147 ：ななししさん＠おはらいっぱい。：2008/02/08(きん) 23:58:57 ID:8R1SZh0d0: >>144
ありがとう
テストけっかりょうこう！！
よみこめないもじがあったときのエラーたいさくなんかですこしじかんかかっちゃったけど
grepきのうはバッチリGOO!
あなたすごいですね^^
マジでカレーライスおごらせてください
じかんがあるときにでもれんらくくださいメルらん
じぶんはこじまですよろしく
ここでさらしてからへんなかんゆうメールがおおくなったので
そろそろすててしまおうかとおもってるアドレスだから
もしおおさかにこれるならはやめにれんらくください^^
よろしく

それからきいてばっかしでほんときょうしゅくなんだけど
grepしてるじかんのあいだはSLEEP(0.1)しかないかな？
いまは1ファイルをつくってテストしてるけどSLEEP(3.0)いじょうにしないとエラーがめんでるんだよね
IEのこんなかんじのめいれいあればいいのにね
いまはテストしようなのでかまわないんだけど
つかうとなったら20ファイルや30ファイルよみこませることもある
どうにかならんかね？
　　↓こんなかんじのひでまるにはできないの？
REPEAT
SLEEP(0.1)
UNTIL !IE.BUSY AND IE.READYSTATE = 4
148 ：ななししさん＠おはらいっぱい。：2008/02/09(つち) 00:23:44 ID:6WdrkSyQ0: ごめん　たまたまレスみてひでまるもってたからてきとうにかいただけでいままでのながれというかなにをつくってるのかわからんから（かいておいてなんだがGREPじたいどんなきのうかしらん）こたえようがないです。
149 ：ななししさん＠おはらいっぱい。：2008/02/09(つち) 01:29:17 ID:Q50fZGOu0: >>147
IEのばあいはこうかいされたオブジェクトとプロパティ、メソッドがあるからりようできるけど
それいがいのではじぶんでコントロールをよみとって、
きほんてきにUWSCにあるきのうしかつかえないからそのはんいないでなんとかする。

ぼくはシステムメニューをよみとるためにWindowsAPIをつかったりしましたけどたいへんです。
どっかからかんすうていぎをひろってきてUWSCにあわせてていぎ。
APIつかうにはデータをかきこむばしょをあらかじめよういしないといけない。
ひとつしかつかわなかったからnameをよういできたけど、APIっていろいろくみあわせないと
それだけではたいしたことできないわけで。
しかもスペースがひとつになってるけどじっさいには>>149のように
うけとるかのうせいのあるさいだいサイズをよういしてあり・・ませんが。

CONST MF_BYCOMMAND = $00000000
CONST MF_BYPOSITION = $00000400
DEF_DLL GetMenuItemID(HWND,Long):Long:USER32.DLL
DEF_DLL GetMenuStringA(HWND,Long,Var string,Long,Long):Long:USER32.DLL

DIM name = " "
GetMenuStringA( GETCTLHND(ID, GET_SYSMENU_HND), 8, name, namelen, MF_BYPOSITION )
150 ：ななししさん＠おはらいっぱい。：2008/02/09(つち) 20:43:56 ID:2kt35Fqa0: while getId("grepしょりちゅう") <> 1
sleep(0.05)
wend

while getId("grepしょりちゅう") = 1
sleep(0.05)
wend

すごくたんじゅんに。
0.1びょうやとウインドウがきえるのがはやすぎて0.05びょうということで
てきとうに grepWait() とかでまとめてポンポンおいたらええのんとちゃうかな
ごっちゃんです＾＾
151 ：ななししさん＠おはらいっぱい。：2008/02/09(つち) 21:49:06 ID:32nxHd5t0: りょうかいですよ^^
あとでメールしますね
よろしく
152 ：ななししさん＠おはらいっぱい。：2008/02/10(にち) 00:17:37 ID:3HZ9GDLo0: しかししゅうりょうじょうけんかかないとえいえんループで
ALT+F2できょうせいしゅうりょう
そのあとのしょりできんね

REPET
くりかえししょり
UNTIL//しゅうりょうじょうけん
つぎのさぎょうへ

grepのしゅうりょうじょうけんってなんだろね
153 ：ななししさん＠おはらいっぱい。：2008/02/10(にち) 00:39:20 ID:kb8o5vnU0: grepじっこうしたら、「grep しょりちゅう」てこまどがでない？
さっきのは、じっこうボタンおしたちょくごにおいて
こまどでる→こまどきえる→だっしゅつ
てながれだったんだけど。
ちなみにVer7でVistaです。

もしたまにしっぱいとかなら、
c = 0
while getId("grepしょりちゅう") <> 1
sleep(0.05)
c = c + 0.05
if c >= 3 then break
wend

while getId("grepしょりちゅう") = 1
sleep(0.05)
c = c + 0.05
if c >= 3 then break
wend

てなかんじでほけんかけといたらいいんじゃないかな
154 ：ななししさん＠おはらいっぱい。：2008/02/10(にち) 02:26:24 ID:fJsN/Fjm0: すみませんおしえてください。

IE.navigateでひらいたページにのっているリンクさきをIELINKでひらき、
そのリンクさきのページのテキストをIE.DOCUMENT.BODY.INNERTEXTで
とろうとしたのですが、なぜかリンクもとのテキストがコピーされてしまいます。
リンクさきのテキストをコピーするにはどうしたらよいのでしょうか？
（じじょうがあり、ちょくせつリンクさきのＵＲＬはしゅとくできないんです、、。）

れい
IE = CREATEOLEOBJ("InternetExplorer.Application")
IE.visible = true
IE.navigate("http://www.yahoo.co.jp/")

REPEAT
SLEEP(0.1)
UNTIL !IE.busy AND IE.READYSTATE = 4

IELINK( IE,"ショッピング")

REPEAT
SLEEP(0.1)
UNTIL !IE.busy AND IE.READYSTATE = 4

TEXT = IE.DOCUMENT.BODY.INNERTEXT

sendstr(0,TEXT)
155 ：ななししさん＠おはらいっぱい。：2008/02/10(にち) 02:40:20 ID:kb8o5vnU0: ielink()をつかわないほうほうになるけども

IE = CREATEOLEOBJ("InternetExplorer.Application")
IE.visible = true
IE.navigate("http://www.yahoo.co.jp/")

REPEAT
SLEEP(0.1)
UNTIL !IE.busy AND IE.READYSTATE = 4

a_tag = IE.document.getElementsByTagName("A")

for i = 0 to a_tag.length-1
ifb a_tag.item(i).innerText = "ショッピング"
IE.navigate(a_tag.item(i).href)
REPEAT
SLEEP(0.1)
UNTIL !IE.busy AND IE.READYSTATE = 4

print IE.document.body.innerText
break
endIf

ちょくではとべないもんだとかってにかいしゃくして、
ためしてないけどだいじょうぶなはず
156 ：ななししさん＠おはらいっぱい。：2008/02/10(にち) 02:40:59 ID:kb8o5vnU0: プラス
さいごに next ね
157 ：ななししさん＠おはらいっぱい。：2008/02/10(にち) 02:48:17 ID:qFjON2CV0: >>154
WinXPのIE6でやったけどちゃんとショッピングのページがとれたよ。

もくてきのHPかIEのバージョンのもんだいじゃないかな。
158 ：156：2008/02/10(にち) 17:48:22 ID:Jvn5XWpQ0: さらに
IE.navigate(a_tag.item(i).href) は
a_tag.item(i).click
ね

>>157のいうとおりいけるとおもうけど
159 ：ななししさん＠おはらいっぱい。：2008/02/11(がつ) 01:26:54 ID:K8IzIXto0: すいませんじぶんのかんちがいでした。>>154のれいではちゃんとショッピングの
ページのテキストがとれました、、。

じぶんのみようとするページでれいをかきたかったのですが、かいいんせいページ
だったので、、、。そしてそのかいいんせいページはやはりリンクもとのテキスト
がとれちゃうんですよ、、、。やっぱりショートカットでコピーかな。

>>156さん
たとありがとうございました。なぜかうごかないのですが、しらないtag
とかまだよくわからないのでしらべてみます。
160 ：ななししさん＠おはらいっぱい。：2008/02/11(がつ) 13:03:03 ID:Wqck78ny0: これ、HPみるとVistax64でのどうさけんしょうをしてないとかいてありますが、
やはり、ふぐあいでるのでしょうか？というのは、

MOUSEORG(ID,0)
ACW(ID,0,0)
MMV(50,141)

で、マウスがいどうせずに、IDでしていされたウインドウがいどうするのです。
UWSCはかんりしゃけんげん+XPSP2のごかんモードでじっこうしています。
161 ：ななししさん＠おはらいっぱい。：2008/02/11(がつ) 13:28:14 ID:MCjoPHjp0: MOUSEORG()できじゅんがかわるのは
MMV()、BTN()、PEEKCOLOR()、CHKIMG()
だからACW()でウインドウがいどうされる。
162 ：ななししさん＠おはらいっぱい。：2008/02/11(がつ) 13:40:44 ID:Wqck78ny0: すいません、したたらずでした。
ACWで(0,0)にはわざといどうさせてます。
そのあとMMVでさいどウインドウがうごきます。
いちてきには-400,200ぐらいに（がめんのそとにウインドウがはんぶんでます)
163 ：ななししさん＠おはらいっぱい。：2008/02/11(がつ) 14:53:16 ID:7fZalG9R0: ACWはウィンドウをうごかすコマンドだからね。
164 ：ななししさん＠おはらいっぱい。：2008/02/11(がつ) 15:00:50 ID:7fZalG9R0: MMVで・・か

マウスをいどうするまえにマウスクリック（ひだりボタンおしさげ）したことになってればまどがうごくし。
ACWでへんなところにとんでるわけじゃないなら、
マウスボタンをあげるそうさをそうしんしたらいいかも。
BT

【マクロ】 UWSC Part4 【シェアウェアか】

【マクロ】　UWSC　Part4　【シェアウェアか】