自動化ツールuwsc使いよ集まれ5

1 名前：名無しさん＠お腹いっぱい。 [2009/12/09(水) 05:27:33 ID:J1DL1P1U0] Windowsを自動化させるツールUWSC。 www.uwsc.info/ uwsc使いのみなさま、ﾏﾀｰﾘ己のスクリプトを晒しましょ。 285 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/03/31(水) 12:05:44 ID:wRNvV5G10] でもなんだかんだでこのソフトはチートでの使用が一番多いわけだが・・・ 286 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/03/31(水) 15:12:32 ID:02z0GkxwP] >>285に1票ｗｗｗ 287 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/03/31(水) 17:19:37 ID:db3wAIhw0] なんか変な流れを切るようで悪いんだけど教えてほしい。 既に開いてるＩＥをＦ５で更新した時に読み込み完了まで待ちたいんだけど どうすればいいのかな？ よく見かけるのは IE = CREATEOLEOBJ("InternetExplorer.Application") IE.visible = True IE.navigate("www.yahoo.co.jp/") REPEAT 　SLEEP(0.1) UNTIL !IE.BUSY AND IE.readystate = 4 これだけど、これだとブラウザ起動からしちゃうので目的と違うんだよね。 最初に上記でブラウザを起動してから更新の度に REPEAT 　SLEEP(0.1) UNTIL !IE.BUSY AND IE.readystate = 4 をすればいいのかな？ できればサイトを開くまでは手動でやりたいんだけど。 288 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/03/31(水) 17:57:48 ID:zl81UiL50] も少し、ヘルプよんでよ IE=GETactiveOLEobj ちなみに F5=IE.refresh 289 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/03/31(水) 18:45:29 ID:db3wAIhw0] >>288 レスサンクス ほんとだ、、、書いてあった。。。 ヘルプに書いてあるのに質問しちまって申し訳なかったね。 お蔭様で希望通りの動きができました。 ありがとうm(__)m 290 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/03/31(水) 20:08:51 ID:vqZHXpqN0] >>289 おいおい、ニダランスレから出て来るなよｗ 291 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/03/31(水) 21:03:28 ID:db3wAIhw0] ニダランスレってなんだ？ 292 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/01(木) 03:53:25 ID:fwJ098Wi0] 何でニダーラン？ 293 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/01(木) 04:01:38 ID:S8TPP2lzP] そんなことまで「なんで？」って聞き返してくるのかよ ここは昔から質問者に「なんで？」「何するの？」「何がしたいの？」 自分の開発のヒント探るために聞くだけ聞いて質問者への回答は無視か罵倒 だから嫌になって来なくなったんだけど たまたま覗いてみたら相変わらずのウンコ解答者ぶり 質問者さんへ ここで聞いても無駄だよ 作者のうみうみ氏のサイトで聞いた方が時間はかかるけど正確だ 質問するために少々勉強してからの方がいいが ここよりまともに回答してくれるよ 俺も以前はよく解答してたんだけど UWSCというより何か儲けれるツールを作れないか そのネタ探しに解答者ぶっているだけ こいつらアホだからここで質問しても無駄だよ 294 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/01(木) 04:27:25 ID:S8TPP2lzP] UWSC覚えるのには時間がかかるよ なんせ解説本は「Windowsマクロテクニック」という基本中の基本のみの あまり役立たない本が1冊のみ販売されている 何をしたいかによって習得期間は変わるけど オンラインゲームでちょっと自動化を作成するのに何ヶ月もかかった インターネットを通じてしか勉強できないのも原因のひとつだろね 解答者は無報酬で応えているので 生意気だと思えば応えないし応える義務も無い だから解答者ぶって質問者をイビリ倒すのが趣味って変人も多いよ ぶっちゃけ奥深く入っていくとUWSCでは間に合わないよ ゲームだけじゃないよ事務系の仕事を自動化するのも一緒 UWSCがでてすぐに課金ユーザーになって2年ほど夜も寝ないでUWSCばっかし勉強して気づいた事がある 結局間に合わせのUWSCは間に合わせに過ぎない きちんとしたプログラムを勉強するのが一番近道だよ それでパールやったけどパールもダメだな 掲示板の解答者がUWSCと同じ種類の人間だらけ それでジャバスクリプトも勉強したけど 結局スクリプト言語じゃダメだったんだ 初めからC++がいいよ C++ならなんでもできる 教材もいくらでもあるからね 掲示板でペコペコしながら質問する必要もない UWSCの2年間全く無駄でした 初心者は初めからC++のほうがいいよ じっくりやれば俺でも出来るようになった やりたいことはこれだけだからって簡単にUWSCを勉強しだしたけど 次から次へと課題は出てくるもんだ それをなんでも解決できるのはC++ですキッパリ 俺、おっさんなんだけど俺でも出来たがんがれ ここでいつもゴマすりながら質問してた自分が今でも情けないよ やればできるよ 295 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/01(木) 04:52:02 ID:S8TPP2lzP] 俺が一番最初に質問してた頃は1人物凄く親切な方がいてた 大阪に住んでるって言ってたな それで俺はUWSCの楽しさを教えてもらったんだ あの方には今でも感謝してるよ あの方はもうこないみたいだし 今、解答者ぶって質問者にレスしてる連中は 質問者が何をしたいか聞きだすのが目的なんだ 美味しいと思えば自分が先に作ってやろうって魂胆みえみえ それで質問者へのレスは適当にしておくか 更に罵倒して、その質問者はもう来れなくするか ヘンテコ解答者っていうか解答者の仮面を付けた基地外だな UWSCの使い方云々抜かしてるガキが出てきた頃から 大阪に住んでるって言ってた解答者さんは来なくなって 質問者も罵倒されるのが嫌で来なくなった 前スレか前々スレは過疎過ぎてダット落ちしてたみたいだし UWSCの使い方までご指導頂かなくて結構ですって言いたいんだけど それを言っちゃー解答もらえないから我慢する それで「質問者が何をしたいのかわからないので応えようが無い」とかはぐらかされて終了 UWSCとperlの解答者には気をつけた方がいいよ スクリプト言語なんて役に立たないことが多いし 悪い事いわないからC++かJAVAがいいよ ゲームに使おうがビジネスに使おうがお前に関係ないだろ＞糞解答者 296 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/01(木) 06:04:35 ID:f/9UZXtU0] おいおい、なんのコピペだよこれ 297 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/01(木) 06:11:53 ID:NSxeyl3Z0] 不覚にもワロタ 298 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/01(木) 11:07:20 ID:0yWWJhZV0] ID:S8TPP2lzP なにこのキチガイ 299 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/01(木) 11:14:41 ID:2Up7o9yS0] C++がいいよ 300 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/01(木) 21:46:18 ID:URK6iTyf0] 指定時刻に指定ポイントをクリックするスクリプトつくれる？ 301 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/01(木) 22:23:08 ID:5xeykHJ2P] 余裕で作れる というか初歩中の初歩 302 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/02(金) 00:28:22 ID:4cLa/HLo0] なんで？って聞くのは別のアプローチから期待された動作をさせた方が、 確実だったり楽だったりすることがあるからだろ… ジャバスクリプトとかカタカナで書いている所とか、一度も出てこなかったJAVAが一番最後だけ出てくるとか、 自己矛盾か自己批判を孕んでるあたりとか、自動化をやるのにC++なんぞを使うと言い出すあたりの所ですよね、笑うポイントは。 ゲームに使おうがビジネスに使おうがなんて言ってるけど、そもそもオンゲなんかはプロテクトがかかってるのが多いから、 それすら知らないとか、プロテクトをかいくぐる技術も無いのに質問するヤツが多いから回答者が辟易して、ゲーム関係をうざがるんだろーが… そういうダークな範囲で使いたいなら独学しろと… 303 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/02(金) 05:17:12 ID:/tViDlcK0] お前はなにをいっているんだ 304 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/02(金) 05:28:23 ID:Ue5xH3Cy0] ID:S8TPP2lzPには手を触れないよーに 305 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/02(金) 06:59:15 ID:I68nnadS0] たぶんこいつは本人で自演だろう 306 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/02(金) 09:08:28 ID:+bubi7hm0] 大阪に住んでる凄く親切な回答者：ID:S8TPP2lzPがしつこくてうざいからここくるのやめた 307 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/02(金) 13:18:16 ID:fDfu5inU0] >>302 うざい解答者ってお前のことだわ 308 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/08(木) 05:17:27 ID:YpPiuNaU0] 001 while 002　//いろいろ計算やら比較をやって 003 条件="おなら" 004 if 条件="ほにゃら" then break 005 print "ほにゃらではない" 006 wend 004行 で　breakで　ループを抜けたと思ったら、　005行を実行した上で　多重ループを抜けるんで 005　if ！( 条件="ほにゃら" ) then print "ほにゃらではなかった" というような 記述でとりあえずは逃げたんですけど、 こういうもんなんでしょうか? 309 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/08(木) 09:20:05 ID:n8jkUacb0] 003 条件="おなら" て書いてるかられしょ 310 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/08(木) 09:54:44 ID:3BOGl5Ct0] >>308 単純に、３行目のif文を間違えているだけだろう。 「5以上になったらループ抜ける」をやりたいのに「if 5>i then break」と書いちゃってるとか。 311 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/08(木) 09:56:16 ID:3BOGl5Ct0] >>310 符号が逆だった。 「5以上になったらループ抜ける」をやりたいのに「if 5<i then break」と書いちゃってるとか。 312 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/08(木) 13:47:14 ID:nLPIw5SzP] >>308 ×　003 条件="おなら" ○　000 条件="おなら" 313 名前：３０８: mailto:sage [2010/04/08(木) 14:31:05 ID:YpPiuNaU0] >>309-312 ありがとうございます． やはり ありえないって事のようなので指摘していただいた点を再度調べてみます． >>312 あ、初期値がUWSCから見えないってことでしょうか。その手の事だとすると実行前に構文チェックに掛かって修理してるような気がするんですが? 314 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/08(木) 15:00:26 ID:nLPIw5SzP] >>313 条件="おなら"　は 条件="おなら"　であって 条件="ほにゃら"　ではない 315 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/08(木) 15:29:50 ID:n8jkUacb0] >>313 初期値っていうかなんというか みんな言いたいことは、UWSCは間違ってなくて、記述どおり動いてるってこと 316 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/08(木) 15:35:19 ID:9crZpxrL0] >>313 いやちゃんと整理して考えてみ 317 名前：３０８: mailto:sage [2010/04/08(木) 16:24:53 ID:YpPiuNaU0] >>314 すみません．ぐっちゃぐちゃでした． 訂正 000　条件="おなら" 001　while　条件="おなら" 002　//いろいろ計算やら比較をやっった結果 003　条件="ほにゃら" 004　if　条件="ほにゃら"　then　break 005　print　"ほにゃらではない"　　→　　005　if　！(　条件="ほにゃら"　)　then　print　"ほにゃらではない" 006　wend こうかな?　こんな感じで　Break条件の　否定条件をつけて逃がしてます．でした．orz ってか、今作ったのを見直してるんですが、実際作った部分はこうです． 0001　mdelay=0; oldmdelay=mdelay; delaysw=0 //スクリプト冒頭で初期値設定済 0100　optx=7 //　POPUPMENU(pp,　STATUS(xID,　st_x),　STATUS(　xID,　st_y　)+STATUS(xID,st_height)) 0101　SELECT　optx 0102　　CASE　7 0103　　　　REPEAT 0104　　　　　x=　INPUT("Now　:　"+oldmdelay+"　to　set　new(ms):",mdelay) 0105　　　　　IF　x=　EMPTY　THEN　BREAK 0106　　　　UNTIL　CHKNUM(x) 0107　　　　IFB　!(x　=　EMPTY)　THEN 0108　　　　　　mdelay=　x;　oldmdelay=mdelay;delaysw=1 0109　　　　　　PRINT　"*Set07.　Delay.　ms:　"+mdelay 0110　　　　ENDIF 0111　　CASE　8 0112　　　　PRINT　"*Set08.　Hi　Sensitive Start." 1000　SELEND 1001　sleep(911) 0107 と 0110 が break したつもりでも抜けられなかったんで付け加えた行です． この行に”//"を入れてやったら、やっぱり抜け出せなかったです． 318 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/08(木) 17:13:56 ID:2KfY3Rs50] >>317 「107と110を付け加えた」のなら 例文と実際のコードのprint位置が違うのだが・・・ 「107〜110を付け加えた」のなら修正前のコードが欲しいところ。 319 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/08(木) 17:19:01 ID:nLPIw5SzP] >>317 ちょっと待て 0105 のbreakでどこを抜けようとしたって？ 0107にはxに数値が入ったときかxが空だったときとなるので その制御では分岐が確かに必要になる。 そうしないとxを使ったときにエラーになるからね。 それを0105でどうにかしようと思うならifb使ってそこになにやら書くか、 exit、もしくはループを追加してbreak 2 を使う必要がある。 UWSCはBasic系なのでcaseを抜けるbreakはない。 そこで、0105から0110に飛ぶようにしたらどうだろう？ 0102　　CASE　7 0102.5　　while true 0103　　　　REPEAT 0104　　　　　　x=　INPUT("Now　:　"+oldmdelay+"　to　set　new(ms):",mdelay) 0105　+---- 　IF　x=　EMPTY　THEN　break 2 0106　|　　　UNTIL　CHKNUM(x) 0108　|　　　mdelay=　x;　oldmdelay=mdelay;delaysw=1 0109　|　　　PRINT　"*Set07.　Delay.　ms:　"+mdelay 0110　+->wend ループ条件を変更して0108〜0109を次のようにするほうがいいと思う 010x　　　　ifb　CHKNUM(x)　then 010x　　　　　　mdelay=　x;　oldmdelay=mdelay;delaysw=1 010x　　　　　　PRINT　"*Set07.　Delay.　ms:　"+mdelay 010x　　　　　　break 010x　　　　endif 320 名前：３０８: mailto:sage [2010/04/08(木) 17:27:56 ID:YpPiuNaU0] >>318 すみません． 『break文で 多重ループを抜け出せない』って事があるものなのかって事を 相談したかったんで 条件式の錯誤に気がつかず、また実際のものとずいぶん違うものを提示してしまい迷惑をおかけしました． 最初 書いたときは 107 110行はありませんでしたが 105行の "EMPTY"(CANCEL)入力で BREAKしないので 単純に 107,110行を追加しているのが現状です． 321 名前：３０８: mailto:sage [2010/04/08(木) 18:30:40 ID:YpPiuNaU0] >>319 今 BREAK のヘルプを読んで 顔が熱くなってきました．はずかしい限りです． 0001　mdelay=0; oldmdelay=mdelay; delaysw=0 //スクリプト冒頭で初期値設定済 0100　optx=7 //　POPUPMENU(pp,　STATUS(xID,　st_x),　STATUS(　xID,　st_y　)+STATUS(xID,st_height)) 0101　SELECT　optx 0102　　CASE 7 0102.5　　while true 0104　　　　　　x=　INPUT("Now　:　"+oldmdelay+"　to　set　new(ms):",mdelay) 010x　　　　ifb　CHKNUM(x)　then 010x　　　　　　mdelay=　x;　oldmdelay=mdelay;delaysw=1 010x　　　　　　PRINT　"*Set07.　Delay.　ms:　"+mdelay 010x　　　　　　break 010x　　　　endif 0100　　　WEND 0111　　CASE　8 0112　　　　PRINT　"*Set08.　Hi　Sensitive Start." 1000　SELEND 1001　sleep(911) こうですね．バッチリきれいに抜け出せました，皆さんどうもありがとうございました． 322 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/11(日) 09:21:19 ID:WP7Ufm9tP] 無料版でIE以外のブラウザの操作もできますか？ 323 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/11(日) 10:53:36 ID:7t91Tinz0] >>322 基本、無理。 324 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/11(日) 11:09:55 ID:WP7Ufm9tP] そうですか。 このゲーム（待ってクリック、待ってクリックを繰り返すFH）で 自動戦闘を繰り返すマクロ作れたらお願いします ttp://mob-2.com/ 325 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/11(日) 11:40:13 ID:L29VjoPvP] 了解しました。 20万円くらい用意しといてね。 326 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/11(日) 16:04:40 ID:S762n6IR0] >>324 テンプレくらい読んで書き込めよカス 327 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/11(日) 16:21:34 ID:ikeA/Ag60] ブラザウ動かせない糞ソフト 328 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/11(日) 16:53:32 ID:7t91Tinz0] シベリアにいた頃に作った、ゲームでクリックするだけのマクロをあげとくわ。 太鼓の達人マクロ。 gamezone.gooside.com/taiko.htm //　（ .　 ）　　ピリオドの位置にマウスを合わせて開始するといい。 FUKIDASI("マウスを読み取り位置にあわせてください。<#CR>Ctrlキーをクリックで開始します。") // VK_CTRL が押されたら開始 Repeat; sleep(0.2); Until GetKeyState(VK_CONTROL) FUKIDASI("実行中。<#CR>Ctrlキーをクリックで終了します。") // マウス座標保存 MouseX = G_MOUSE_X MouseY = G_MOUSE_Y // キー保存変数 dim previousKey dim key dim isYellow = false dim isPreviousYellow = false sleep(1) while true 　isPreviousYellow = isYellow 　isYellow = false 　sleep(0.005) 　// VK_CTRL が押されたら終了 　if GetKeyState(VK_CONTROL) then break 　key = 判定( MouseX, MouseY, previousKey, isPreviousYellow, isYellow ) 　if ! key then continue 329 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/11(日) 16:54:06 ID:Ik0GncC3P] 　// キーをクリック 　ifb isPreviousYellow then 　　ifb isYellow then 　　　sleep(0.02) 　　endif 　endif 　KBD(key) 　// 最後に押したキーを保存 　previousKey = key 　sleep(0.02) wend // 戻り値：キーコード //　　　　 処理しない場合、０を返す。 // X: X座標 // Y: Y座標 // key: 最後のキー // fYellow: 前回のYellow フラグ // isYellow:今回のYellow フラグ // 呼び出し回数：呼び出し側は常に省略する。 //　　　　　　　 自分を呼ぶときは＋１する function 判定( X, Y, key, fYellow, var isYellow, n = 0 ) 　result = 0 　// 色を取得 　color = PEEKCOLOR( X, Y ) 　ifb ! fYellow then 　　//黄色が出た後はグレーの判定はなし 　　if isGray(color) then exit 　endif 330 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/11(日) 16:54:53 ID:7t91Tinz0] 　red = color and $FF 　green = (color and $FF00) / $100 　blue = (color and $FF0000) / $10000 　ifb fYellow then 　　// 黄色フラグが立っているときは、他のカラー（青、赤）の判定はしない。 　　ifb 0 = color then 　　　// 前回黄色だったら、黒は黄色とみなす。 　　　isYellow = true 　　else 　　　exit 　　endif 　elseif 255 = blue then 　　result = VK_M // 青なので「m」 　elseif 255 = green then 　　isYellow = true // 黄色 　elseif 255 = red then 　　result = VK_Z // 赤なので「z」 　else 　　exit 　endif 　ifb isYellow then 　　ifb 4 <= n then 　　　// 黄色で確定　// 黄なのでmとzを交互に 　　　if key <> VK_M then result = VK_M 　　　if key <> VK_Z then result = VK_Z 　　　exit 　　endif 　　// 規定個数の箇所をチェックする　// （黒を除く）グレーがあれば中断 　　if ! n then X = X + 35 　　result = 判定( X + (n * 5), Y, key, fYellow, isYellow, n + 1 ) 　endif fend 331 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/11(日) 16:55:11 ID:Ik0GncC3P] ////////////////////////////////////////////////////////////////// // グレーチェック // メーターカラーなどがグレーかどうかを調べる function isGray( color) 　red = color and $FF 　green = (color and $FF00) / $100 　blue = (color and $FF0000) / $10000 　sum = red + green + blue 　aveH = sum / 3 + 10 　aveL = sum / 3 - 10 　Ifb ( red < aveL ) or ( aveH < red ) Then 　　　RESULT = false 　elseif ( green < aveL ) or ( aveH < green ) Then 　　　RESULT = false 　elseif ( blue < aveL ) or ( aveH < blue ) Then 　　　RESULT = false 　else 　　RESULT = true 　endif Fend 332 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/11(日) 17:07:04 ID:7t91Tinz0] >>328-331 １．スクリプトを起動し、 ２．ゲームのページを開いて開始し、 ３．（ .　　）　←の顔を合わせる丸括弧のピリオドの位置にマウスを合わせ、Ctrlキーで開始する。 　　ゲーム中は放置。 ４．ゲームが終了したらCtrlキーでマクロを終了する。 マウスで指定した座標の色を監視し、顔が合わさる瞬間にキーを自動クリックするだけだが、 連打する部分を見分けるためにちょっとめんどくさい処理になっている。 顔の種類の判定をそれぞれ色素の一つしか見ずに済むこんなシンプルなゲームでも、 識別して適切な動作をするのにこれだけの長さのコードが必要になる。 グレーチェックの関数は流用でそれ以外の部分を新規に作ったが、 これだけで５時間もかけてる。 UWSCで小さいマップを動き回るマクロをいくつか書いてる僕がそれだけ時間かかるんだから、 実現可能だとしても、ゲームマクロにはそれなりの労力が必要。 ちなみにマップを動き回るマクロは１０００行くらい必要になった。 333 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/11(日) 21:45:43 ID:1FTtfnsf0] マウスの感度をよくするにはどうしたらいいものか 334 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/11(日) 22:12:34 ID:oXYAxr2f0] マウスの裏を掃除する 335 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/13(火) 22:18:41 ID:2xzsxj+L0] ﾏｳｽﾊﾟｯﾄﾞを敷く 336 名前：名無しさん＠お腹いっぱい。 [2010/04/14(水) 22:23:33 ID:bbwcK6IR0] ここに1個のpdfファイルがあります。 ページ番号はついていません。 自分で簡易製本するためページ番号をつけたいんです。 偶数ページには左下に、奇数ヘージには右下に。 そんなページ番号をpdfファイルに挿入するためにはどうすればいいですか？ 337 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/14(水) 22:47:05 ID:pM2mgX640] テンプレくらい読んできてね 338 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/15(木) 02:27:46 ID:Ti8sLQUA0] >>336 ググれ 基本的には印刷時にソフトで自動挿入だよ。 自動と言ってもUWSCとはまったく関係ないけどね。 PDFを直接編集するソフトなら手作業だろうね。 339 名前：名無しさん＠お腹いっぱい。 [2010/04/16(金) 23:21:01 ID:HC5SVg6T0] uwscはPDFの編集はできないよん 340 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/19(月) 21:26:23 ID:1NXVhFap0] 俺はエロサイトからダウンロードしてきた大量のエロ動画ファイルのファイル名を 管理するのにuwsc使ってます＾ｑ＾ノ 341 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/19(月) 21:54:44 ID:XgjI0OYr0] ダウンロードしたファイルの管理か。どうやってんだろ。 俺のSayMoveダウンロードスクリプトはダウンロードはするけどリスト化はしてないんだよな。 ダウンロードに失敗したり、あとで削除とかするからダウンロードソフトみたいに画面作って全部管理しないと意味ない気がするし。 342 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/21(水) 22:53:33 ID:j6JEIgFp0] フリー版でIEの自動操作はできないの？ 6,720円(税込)ってたけぇな 343 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/22(木) 01:47:11 ID:BzTJSDhd0] >>342 録画機能は有償版にしかついてないけど、再生は有償無償どちらでもできる。 ただ、開発支援環境もなしに作るのは大変。 あっても大変だし労力の割りにできることは大したことなかったりするけど。 まずはフリー版と、IEを自動操作するソースでも手に入れたら？ 344 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/22(木) 18:51:07 ID:1b3KZlwEP] IE自動操作ってそんなに難しかったっけ？ それとも俺が思ってるのとはまた別なのか・・・ 345 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/22(木) 22:38:55 ID:BzTJSDhd0] 上書き確認のダイアログ処理とかエラーメッセージの対応とか 動的ページの処理とか 結構大変やん？ 僕は一度作って改良して使いまわし出来るようになってからはそれほどかからんようにはなったけど、 半年くらいみっちりやらんとちゃんとしたもんは作れん。 いや、単純な操作なら録画・再生程度でそれなりにできるけどね。 フリー版入手よりも、シェア版のお試しを勧めるべきだったか。 んでＩＥオブジェクトのスレッド間使い回しがなんかバグりまくって動かんしね。 OLEEVENTで受け取ったＩＥオブジェクトも高確率で使えんし。 どーゆー条件でなら使えるのかよく分からん。 346 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/24(土) 08:10:49 ID:6nk6f6hV0] これってUWSCを動かすファイル？ www.dotup.org/uploda/www.dotup.org835021.jpg 347 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/24(土) 08:17:59 ID:kCRize2QP] ・・・情報提供料としていくらまで出せます？ 348 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/24(土) 12:55:57 ID:Xrgo5/kc0] ｗｗｗ 349 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/24(土) 17:10:01 ID:ZblMfkgKP] ゲームでキャラの位置を正確にしたいんだけど 何かいい方法ある？ 東西南北に敵キャラがいて丁度真中迄移動したいんだけど 微妙にずれていくので教えて下さい 東との距離が近くなれば西との距離が遠くなり 南との距離が近くなれば北との距離が遠くなる 上記のような感じでぴったし真中に合わせられないんですよ ゲーム内の位置とＰＣの座標を合致させる方法あれば教えてください ＵＷＳＣをゲームに云々のくだらない回答は不要です 答えられないならスルーでいいですから >>302と>>343書き込んだ人は自分へのレス禁止 うざいからお前のレスなんて要らねーから お前のレス必要ないから返事すんなよ ていうかお前わかってないのに答えようとするから邪魔なんだ罠 消えろ変人解答者 ここでうざい解答者ってお前のことだわ 別人の振りしてレスすんなよ 350 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/24(土) 17:11:45 ID:IaNfdo2A0] チートするための方法は教えられないなぁ 351 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/24(土) 17:17:38 ID:ZblMfkgKP] >>349です 色判定で3点あわせることに成功 自己解決しましたので３４９への回答は不要です 352 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/24(土) 17:18:41 ID:ZblMfkgKP] >>350 おまえさー 答えられないのに出てくんなよ マジうざっ お前がまともな回答したことあるの？ それ聞いてみたいわｗ 353 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/24(土) 17:20:13 ID:e4lY74IeP] スルーな 354 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/24(土) 17:28:03 ID:ZblMfkgKP] ２ｃｈのソフト板全体で言える事だけどｗ 質問者が何も前進しないレスが多いな 本人必死でやってんだから そっとしておいてあげればいいのに 前進どころかｗ 足をひっぱりにかかるからなー 質問者をこき下ろす事だけ書いた奴が解答者ぶってるのは 変だと思う 解答者の答えを答えつつ罵倒するならまだしも こいつわかってて解答者ぶってるの？みたいなのばっかしｗｗｗ 解答者ぶりたいから張り付いてるのが趣味なんだろｗ 355 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/24(土) 17:32:53 ID:ZblMfkgKP] >>350 >>353 ご苦労さん お前は今後このスレで回答しなくていいからね アホな質問に答えられないのはアホだから 意味わからんやろねｗ 人が楽しんでるんだからおれでいいだろ 誰にも迷惑かかってないし 万が一かかっていたところで お前がパトロールする必要ないから 回答できない解答者は消えろ 356 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/24(土) 17:50:07 ID:ZblMfkgKP] ＵＷＳＣは大変魅力のあるソフトなのに 誰かのせいで質問者来ないｗ ここは答え返ってくるよりまず罵倒されるの目に見えてるからなｗ ＵＷＳＣの魅力が一般人に伝わらないのは こういうアホ解答者が蔓延るからだろ まともな回答できないのかできるけどしないのか知らんけどｗ 作者のうみうみさんも痛し痒しだろなー 勝手な推測で罵倒された方はたまったもんじゃない ６７００円払って怒鳴られた挙句に自分のやりたい事は一歩も前進しない 6700円は社会勉強代として放置する人が多いのはお前の責任だ＞アホ解答者 ＵＷＳＣはいいソフトだよ もっと広めればいいのに アホ解答者は正義の味方を装うライバルソフトの関係者か？ チート使用者がチートの質問者に対して 「チートは不正！！！」って叫んでライバルを増やさないよう無駄な努力してるのと同じだわｗ クズ解答者の振りして実はＵＷＳＣの反映を阻止してるんだろなｗ 357 名前：343 mailto:sage [2010/04/25(日) 01:53:03 ID:MDkvEHtj0] >>356 まあ、作者サポートのある本家掲示板でいらんことを書き込んだことは確かにある。 でもここは２ちゃんねるだ。 だから本家掲示板で禁止されているネトゲのマクロの話もできる。 ID:ZblMfkgKPは作者をよいしょしているが、 ID:ZblMfkgKPだって本家掲示板からは追い出されるような人間だと言うことを自覚しろ。 俺は>>328-332を書き込んだものだけど、UWSCで位置探知は難しいのであんまりやってない。 多少なりともコントロールできているなら>>349はすごいと思うが、基本的なことが分かってないらしい。 正確なコントロールに必要なのは事象を数式化することだよ。 単純な座標計算ではなくね。 別に関数式一つで表せと言うことじゃなく、配列データを使ってもいい。 UWSCは複数のものを同時に探査できないからキャプチャタイミングがずれる。 タイムラグもあるのでそれを想定した操作をしなければならない。 だから�Tドット単位でのコントロールは、そこまでやっても大変だ。 結局、UWSCをメインに使うとしても、DLL関数を作らないといけなかったりする。 グラフィック処理がもっと多様に記述できて高速に動作する言語ならスクリプトだけでもいけるかもしれないが、 その辺がUWSCの限界だよ。 敵が移動しなくて時間もかけていいのなら、UWSCでもちゃんとぴったりあわせられるけど、 ぴったりあわせるのが目的なら、発想を変えて計測だけ自動で行い、自分で操作するという手もある。 UWSCを使いこなすのは立派だが、優れた人間は効率よく作業するためにいろんな道具を使うし、場合によっては道具を自作する。 僕がUWSCのことをあまりよく書かなかったのは、「あなたがやろうとしていることにUWSCが適しているだろうか」という疑問を投げかけただけだよ。 探せばフリーソフトで簡単に実現できるようなことかもしれない。 お金を出すんならもっといろいろあるだろう。 358 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/25(日) 02:24:53 ID:PrF2KgzeP] >>357 お前のレスはなんでそんなにひねくれてるんだ 美味いもの食ってゆっくり寝てみ ちょっとは考え方変わるから どーでもいいこと1人で理論付けて面白いのかどうなんだかｗ 359 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/25(日) 06:23:28 ID:5DiiqLEb0] 面白いキチガイが二人もいるとは 愉快なスレだな 360 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/25(日) 15:59:04 ID:inGnxg/U0] 思わぬ真性が釣れたみたいだな 361 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/25(日) 18:33:50 ID:O5DTM8+t0] ふりー版使用。 あるURLのページのソースを取得したいのですが IEのメニューで「ソース」を実行すると表示されるコードを取得するには public ie = CreateOLEObj("InternetExplorer.Application") IE.Visible = True ie.navigate(URL) REPEAT SLEEP(0.1) UNTIL !(ie.Busy) AND (ie.ReadyState = 4) allhtml=ie.document.body.innerHTML では違うんでしょうか? URL="www.google.com/images?hl=ja&source=imghp&q=検索ワード" で画像検索したページのソースを取得したいのですが、 メニュー・表示・ソースで出てくるコードと innerHTMLで得られるコードが違うのです 362 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/25(日) 19:32:32 ID:zNMUBgVl0] 64bitでSkScriptは動きますか？ 363 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/25(日) 23:45:37 ID:MDkvEHtj0] >>361 IEのソースは受信したそのまんま FireFoxのソースは文字コード変換済み ie.document.body.innerHTMLはそのときの（動的な処理が施された後の）HTML。（だと思う） ie.ReadyStateが３から４になるときに動的な処理が施される。 で、どうやったらその飯が取れるかだっけ？ ↓のoHttp.responseBody が多分そのまんまだよ oHttp = CreateOLEObj("MSXML2.XMLHTTP") LastModified = "Thu, 01 Jun 1970 00:00:00 GMT" while true 　sleep(５) 　// Webページ読み込み COM_ERR_IGN　　//COMエラー無視 　oHttp.Open("GET", url, True ) 　oHttp.setRequestHeader("If-Modified-Since", LastModified); 　oHttp.Send("") 　ifb 200 = oHttp.status Then 　　// ok 　else 　　continue 　endif 　LastModified = oHttp.getResponseHeader("Last-Modified") 　ifb COM_ERR_FLG 　　continue 　endif COM_ERR_RET　　//エラー処理復帰 　str = DECODE(oHttp.responseBody, CODE_BYTEARRAY) 　break wend print str 364 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/27(火) 15:23:05 ID:GVvjxkxo0] UWSCで空きメモリ容量を取得したいんですが、どうやったらいいでしょうか？ x264のエンコードをuwscを使って自動化しようとやっているんですが、 空きメモリが一定以上無い時は処理をスルーするようにしたいと思っています。 365 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/27(火) 16:49:04 ID:QTDzfzJxP] message = doscmd("systeminfo") msgbox(message) dosのsysteminfoから取ってくればいいんじゃね？ 366 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/27(火) 17:22:53 ID:GVvjxkxo0] そんなものが…と思って調べてみたらPro限定コマンドでHomeの自環境では 不可能でしたorz 367 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/27(火) 19:31:57 ID:5iz8oRr40] >>366 タスクマネージャ起動させといてパフォーマンスタブ-物理メモリ-利用可能読めば？ 368 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/27(火) 22:37:02 ID:GVvjxkxo0] >>367 ありがとうございます。タスクマネージャは常時起動しっぱなしだったんで これでなんとかなりました。 ところで、UWSC単体あるいはWSH等を含めてUWSCのスクリプト上？で 空きメモリを取得するにはどうしたらいいんでしょうか。 369 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/28(水) 01:26:20 ID:IFvYJtzA0] >>368 ttp://www.upken.jp/kb/HdPBaCEihTHpWKzfDZZsVhEJEYkamv.html FreePhysicalMemory ってプロパティがある。 上記を拡張子 .vbs で保存して実行すればとりあえず空きメモリが取得できる。 コマンドラインからファイルを指定してもダイアログが出るんだけど、 ＞ cscript test.vbs っていう風に、コマンドプロンプトからコンソール向けスクリプトで実行すると、 コマンドプロンプトに結果を返してくれる。 これをDOSCMD()で呼び出せば結果を文字列で受け取れる。 でも余計な文字列はDOSコマンドで除去した方がいいので ＞ cscript test.vbs | find "Free" として、空きメモリの行だけ受け取ればいい。 数値だけ受け取りたければ、findstrで正規表現を使って数値部分だけを返すようにも出来るけど val()に渡すだけで数値化できるならその方が簡単だね。 370 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/28(水) 02:23:37 ID:BNDwd4xF0] >>369 これ、殆どそのままUWSCでも使えるじゃないかｗ COMオブジェクトを触れるなら わざわざコンソールの文字列をfindしなくてもいいと思う。 まぁ、COMは難しいなぁ、と思うなら369のやり方でも実用上問題ないだろう。 371 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/28(水) 02:31:36 ID:5rPFMVrg0] UWSC上でVBScriptのfor-eachに該当するのってどういうやり方になるの？ 372 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/28(水) 02:32:05 ID:IFvYJtzA0] >>370 UWSCに直そうと思ったんだけど、For Each 〜　in をfor 〜　nextで実現する方法が分からなかった。 .lengthの回数配列でまわす程度のイメージは持ってるんだけど・・・できなかった。 そんな苦労をするくらいなら結果だけ使った方が簡単だと思ったんだ。 373 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/28(水) 03:26:20 ID:IFvYJtzA0] .length じゃなくて .Countだったっぽいけど、配列アクセスはできないものもあるらしい。 よくわからないけどもしかしたらそれかも。 WSH(・∀・)ｽﾚｯﾄﾞ! Part 4 ttp://pc12.2ch.net/test/read.cgi/tech/1243095768/210-218 Item Items ItemIndex とかいろいろ試したんだけど。 ・・・UWSCでのやり方出てきた。GetOleItem使うのか。 ttp://siromasa.xxxxxxxx.jp/Term/4ta1.html 　　Function Processor(Obj_CS) 　　　　Dim Col_Processor = Obj_CS.ExecQuery("SELECT * FROM Win32_Processor") 　　　　Dim i, Str 　　　　For i = 0 To GetOleItem(Col_Processor) - 1 　　　　　　Dim Obj = All_Ole_Item[i] 　　　　　　If i > 0 Then Str = "<#CR>" + Str 　　　　　　Str = "Cpu" + "[" + GHz(Obj.MaxClockSpeed) + "] [" + Trim(Obj.Name) + "]" 　　　　Next 　　　　Result = Str 　　FEnd 374 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/28(水) 06:07:04 ID:TGzzLXVI0] google画像検索で出てきた画像をまとめて保存するスクリプトを書いたのだが、晒すべきかどうか迷う… google画像検索で出たダウンロード先はそれぞれ別のサーバーだから、特定のサーバーに過重な負担をかける心配はない。 だが、pixivやふたば掲示板のような画像の置いてあるサーバが同一の掲示板やサイトで､同じようにスクリプトでダウンロードした場合、 あっという間にサーバーが悲鳴をあげる。そして管理者が対策をし、そのスクリプトは使えなくなってしまう。 サーバーに過重な負担をかけないよう、画像一枚に二分とか「手動でダウンロードするのと同じくらいのインターバルを置けばそういう事態は回避できるだろうし、 サーバーの貧弱なところからダウンロードする場合、自分ならそうする。 注意書きをしたからと言って百人に一人の馬鹿がそれを平気で破り、サイトそのものに大迷惑をかける恐れもある。 自分の発表したスクリプトが改変されてpixivやふたばに大迷惑をかけないという保証はどこにもない。 バカや不心得者にスクリプト技術を持たせばそれは凶器。 スクリプト荒らし一つで簡単に２ｃｈで特定のプロバイダがアク禁されてしまうことを考えれば、ちょっとの改変で画像サイトに大迷惑をかける恐れのある スクリプトは、やはり自分ひとりで使うのが正解だろうか… 375 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/28(水) 06:51:38 ID:IFvYJtzA0] IEを自動操縦するぶんについては、鯖から対策されると言うことはないよ。 ２ちゃんねるはプロ串とか荒らしツールの対策はされるんだけど、 IEの自動操縦についてはブラウザ情報がIEなもんだからソフト的な対策は施されない。 同じURLを書き込めば制限されたりするけど、それは自動か手動かを判断しない。 コピペ投稿したらIPアドレスで書き込み制限されるだけであって、ログ取得については無制限。人大杉にはなるけど。 Googleが負荷を気にするかについてだが、 今Youtubeが次々に自動的に動画を再生している。Youtubeの機能で。 つまり、Googleは情報を配信したがっているわけだから、収集ツールなんかはむしろ臨むところなんじゃないかな。 要するにくださいってことです。 376 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/28(水) 10:35:49 ID:5rPFMVrg0] >>373 369のをGETOLEITEMを使いアクセスするのはやったけど エラーも何も出ない代わりに何も出力されず終わる… 377 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/28(水) 11:32:02 ID:BNDwd4xF0] >>376 //--------------------------------------------------- Locator = CreateOLEobj("WbemScripting.SWbemLocator") objService = Locator.ConnectServer objEnumerator = objService.ExecQuery("Select * FROM Win32_OperatingSystem") 　GetOLEitem(objEnumerator) 　print "Free : " + ALL_OLE_ITEM[0].FreePhysicalMemory 　print "Total: " + ALL_OLE_ITEM[0].TotalVisibleMemorySize objEnumerator = null //--------------------------------------------------- WMIを使うなら、MSDNあたりを眺めておくと何が入っているかの見当がつくよ。 msdn.microsoft.com/en-us/library/aa394084%28v=VS.85%29.aspx　（Win32以外もたくさんあるけど） 巷にあふれるVBからのコード変換をする際の手助けになるはず。 378 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/28(水) 11:32:14 ID:IFvYJtzA0] >>376 出来たんだけど 【実行結果】 Count : 1 Free : 265140 Total: 523760 【ソース】 Locator = CreateOLEObj("WbemScripting.SWbemLocator") objEnumerator = Locator.ConnectServer.ExecQuery("Select * FROM Win32_OperatingSystem") print "Count : " + objEnumerator.Count for i = 0 to GetOleItem(objEnumerator) - 1 　Obj = All_Ole_Item[i] 　print "Free : " + Obj.FreePhysicalMemory 　print "Total: " + Obj.TotalVisibleMemorySize next sleep(10) 379 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/28(水) 11:39:28 ID:BNDwd4xF0] >>378 短時間でかぶりすぎだろｗ 380 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/28(水) 12:05:41 ID:5rPFMVrg0] あれ？ コードほとんど同じはずなんだけど… なんかミスってたかな。 ちょっとやってすぐ消したからどこが間違ってたのかわからんw 381 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/28(水) 13:01:21 ID:IFvYJtzA0] >>379 うん。書いた瞬間やっちゃったって感じだた。 >>380 for i = 1 とかがありがちなミス あとはprintした瞬間にスクリプトが終了とか。 結果を見るためのsleep(10)だからね。 UWSCを通常起動して実行すればログ窓は残ってるけど、 関連付け実行ならsleep()入れないとすぐ消える。 382 名前：374 mailto:sage [2010/04/28(水) 19:57:44 ID:TGzzLXVI0] 結局晒してしまう　google画像検索で出た画像を指定数、自動保存する ここから keyword="九龍城" // 検索キーワード downKazu=30　 // ダウンロードしたい数 folder="C:\Documents and Settings\k\My Documents\My Pictures"　// 保存先フォルダ public FS = CreateOleObj("Scripting.FileSystemObject") ifb FS.FolderExists(folder+"\"+keyword)=false then FS.CreateFolder(folder+"\"+keyword) endif for page=0 to ((downKazu+17)/ 18) pagenum=page*18 URL="www.google.com/images?hl=ja&source=imghp&q="+keyword+"&start="+pagenum+"&ndsp=18" public ie = CreateOLEObj("InternetExplorer.Application") IE.Visible = True ie.navigate(URL) REPEAT SLEEP(0.1) UNTIL !(ie.Busy) AND (ie.ReadyState = 4) allhtml=ie.document.body.outerHTML 383 名前：374(2) mailto:sage [2010/04/28(水) 19:58:59 ID:TGzzLXVI0] cutword="</A>" cut=toScanWord(str2,cutword) //print cut str2=afterScanWord(cut,"imgurl=") str2=beforeScanWord(str2,"&") print str2 nokori=copy(str2,pos(cutword,str2)+length(cutword),length(str2))// print nokori ie.navigate(str2) ieWait(ie) sleep(2) id=GetID(str2,"IEFrame") sckey(id,vk_alt,f,a) number=page*18+i numberStr=""+number orgName=copy(str2,pos("/",str2,-1)+1,length(str2)) orgName=chgmoj(orgName,":","") name=folder+"\"+keyword+"\"+numberStr+"_"+orgName print name id2=GetID("画像の保存","#32770") ifb id2>0 then sendstr(id2,name,1,true) sleep(2) sendstr(id2,name,1,true) sendstr(id2,name,1,true) sleep(1) clkitem(id2,"保存",CLK_BTN) sleep(1) else id2=GetID("Web ページの保存","#32770") clkitem(id2,"キャンセル") endif next 384 名前：374(3) mailto:sage [2010/04/28(水) 19:59:41 ID:TGzzLXVI0] next function fromScanWord(str,scan) // 検索ワード以後の文字列を切り取る　検索ワード含む result=copy(str,pos(scan,str),length(str)) fend function toScanWord(str,scan) // 検索ワード以前の文字列を切り取る　検索ワード含む result=copy(str,0,pos(scan,str)+length(scan)-1) fend function afterScanWord(str,scan) // 検索ワード以後の文字列を切り取る　検索ワード含まない result=copy(str,pos(scan,str)+length(scan),length(str)) fend function beforeScanWord(str,scan) // 検索ワード以前の文字列を切り取る　検索ワード含まな result=copy(str,0,pos(scan,str)-1) fend procedure ieWait(ie) REPEAT SLEEP(0.1) UNTIL !(ie.Busy) AND (ie.ReadyState = 4) fend 385 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/29(木) 04:18:51 ID:EPCxEO3u0] >>382-384 半角スペースだからインデント消えたのかと思ったら最初から入ってなかったぜ。

---

---

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

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