[表示 : 全て 最新50 1-99 101- 201- 301- 401- 501- 601- 701- 801- 901- 1001- 2chのread.cgiへ]
Update time : 05/09 11:22 / Filesize : 293 KB / Number-of Response : 1002
[このスレッドの書き込みを削除する]
[+板 最近立ったスレ&熱いスレ一覧 : +板 最近立ったスレ/記者別一覧] [類似スレッド一覧]


↑キャッシュ検索、類似スレ動作を修正しました、ご迷惑をお掛けしました

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



1 名前:名無しさん@お腹いっぱい。 [2006/08/24(木) 19:54:44 ID:x9yegvov0]
Windowsを自動化させるツールUWSC。
ttp://www.h7.dion.ne.jp/~umiumi/

uwsc使いよ 己のスクリプトを晒すのだ。

前スレ
自動化ツールuwsc使いよ集まれ
pc7.2ch.net/test/read.cgi/software/1107738590/

654 名前:名無しさん@お腹いっぱい。 [2007/02/15(木) 00:20:10 ID:nGU/ckMc0]
サイズの一様(640×480)な中身が違うビットマップファイルが数百個あります。
そのBMPの中から、例えば、ある一定の区画 500, 200, 100 ,100を切り出した新しいBMPファイルを作りたいと思います。
数百もその作業をやるのはしんどうし、
切り出す区画は全ファイル同じ部分なので、uwscなどを用いて簡単に処理できないかと考えてみました。

充分なsleepを与えつつ、画像編集アプリケーションに取り込ませ実際操作する自動化は思いつきましたが、
それは非常にスマートではありません。

uwscのみで行うにはどういった手法があるでしょうか?
WINAPIとかを導入しないとできないでしょうか?

655 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/15(木) 00:25:42 ID:d0mE+fGw0]
psのアクション+パッチで十分な話だと思う
uwscさえ必要ねえ

656 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/15(木) 00:41:57 ID:SGEKa07X0]
IRfanでもできるかな

657 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/15(木) 01:36:36 ID:0kiNIKH70]
ImageMagick でやるのが楽かと

658 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/15(木) 01:38:23 ID:0kiNIKH70]
>>654
と言うか、
> 充分なsleepを与えつつ、画像編集アプリケーションに取り込ませ実際操作する自動化は思いつきましたが、
> それは非常にスマートではありません。
こういうスマートじゃない処理をするためだけに uwsc があると思うんだが。

659 名前:名無しさん@お腹いっぱい。 [2007/02/15(木) 02:16:43 ID:4zVU3Oy00]
>>654
こういうのは、PhotoShopのアクションと自動処理のバッチを使えば一発なんだけどね('A`)

俺なら、ImageMagickでも使うかなあ。

660 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/15(木) 12:48:27 ID:bY/cVw6K0]
>>654
自分なら、>>656の人と同じくIrfanViewを使うかな。

661 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/15(木) 15:50:26 ID:l9DhUzp90]
> GET_CUR_DIR   // 現在のカレントディレクトリ
ちょっと前とちょっとあとのカレントディレクトリはどうやって取得すればいい?

662 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/15(木) 17:12:45 ID:VdGp7gLH0]
>>661
ちょっと前に Get_Cur_Dir を使えばいい



663 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/15(木) 17:13:18 ID:VdGp7gLH0]
>>661
同じく、ちょっと後に Get_Cur_Dir を使えばいい

664 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/15(木) 17:15:14 ID:VdGp7gLH0]
>>661 冗談だと思うな、本当のことだぞ。



665 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/15(木) 18:29:55 ID:VJCrc4le0]
>>661
確かに>>662-664以外の方法はないと思う
ちなみにちょっとあとのカレントディレクトリを取得するのは不可能
未来を予知できるなら別だが。

666 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/15(木) 18:47:09 ID:RqXFGw0H0]
てか、UWSCでカレントディレクトリ変更できるの?

667 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/15(木) 19:02:09 ID:VJCrc4le0]
>654
皆が言うように、uwscよりも、内部マクロのようなものが使える画像処理アプリケーションを使う方がスマートだとは思う。
餅は餅屋ということで。

ただuwscを使ってという条件で(まあuwscのスレだし)
よりスマートに改善するなら
>充分なsleepを与えつつ
ここを見直してみるべきでは?

まあ自分ならあえてuwsc+ペイントでやるかなw

668 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/15(木) 20:35:48 ID:6ZnakJ6o0]
>>666 
色んな方法があるでしょ
ヘルプ見れば。
君がどういう方法でカレントディレクトリを変更したいのかにもよる。
DOSCMD コマンドもあるし とにかくHELP嫁

669 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/15(木) 21:01:54 ID:RqXFGw0H0]
いや、別に俺がしたいわけじゃないんだけど、できるのかなと疑問に思っただけ。
とりあえずDOSCMDではUWSC自体のカレントディレクトリは変更できない。

670 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/16(金) 07:25:23 ID:aEdQXwcP0]
こんなのはられてたw

game11.2ch.net/test/read.cgi/mmosaloon/1168954481/644-646


671 名前:名無しさん@お腹いっぱい。 [2007/02/16(金) 08:18:53 ID:CMWBeYzi0]
>>670
バロス
もっと見破られないようにしないとw

672 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/16(金) 10:19:10 ID:RClLESTD0]
kbd(VK_LEFT, DOWN, 50) //左ナビ
kbd(VK_LEFT, UP, 50)

このへんのDOWN・UPコンボで
一目で厨ぶりがわかるな



673 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/17(土) 00:35:46 ID:vy3y0xxR0]
ゲームによってはclickが正常に作動しないこともあるんだぜ?

674 名前:名無しさん@お腹いっぱい。 [2007/02/17(土) 21:48:54 ID:RM+qUXCD0]
その通り。
クリックの放す速度が速いと押したことにならないゲームもある

675 名前:名無しさん@お腹いっぱい。 [2007/02/18(日) 12:32:49 ID:EOUmUz5k0]
while True
  if (! IE.busy) and (IE.readyState=4) then Break
  sleep(0.1)
wend

IEの表示待ちはこれですけど
他のアプリケーションの表示待ちする場合の方法ってありますか?

676 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/19(月) 17:39:32 ID:P5MUdYEo0]
>>675
ヘルプで『GETID』をキーワード検索しろ

677 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/19(月) 18:39:43 ID:eyre+X9O0]
>>670のリンク先、延々uwscの話題をしていてワラタ


678 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/19(月) 22:15:18 ID:K8AGIvtf0]
操作すんのが面倒ならデモ画面でも見てりゃいいのにな。

679 名前:名無しさん@お腹いっぱい。 [2007/02/19(月) 22:52:16 ID:16dl77Y30]
comでエクセルを呼び出して作業させているのですが、
呼び出したエクセルのモジュールに作成した「sub処理()」を実行できずに、悩んでいます。
EXCEL.RUN("処理")やEXCEL.RUN "処理"とかやったのですがダメでした。
どなたか、ご教示願います。

680 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/20(火) 02:05:52 ID:jUqXQ7cY0]
>>675
STATUS, GETSTR, POSACC, CHKBTN
CHKIMG

681 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/20(火) 19:23:08 ID:Xpux+e7b0]
>>675
>>680以外ではGETITEMとか
//例(Jane): ステータスバーの表示が "|0 |完了 " になるまで待つ
repeat
  GETITEM(ID, ITM_STATUSBAR)
  sleep(0.2)
until all_item_list[0] + all_item_list[1] = "0完了"

682 名前:名無しさん@お腹いっぱい。 [2007/02/21(水) 01:04:00 ID:wkuVEwNm0]
1.WEBサイトの特定の英語のテキスト箇所をコピー。
2.翻訳サイト(Excite翻訳など)のフォーム部分に先程コピーしたテキストをペースト。

こんな感じの流れはこのソフトで可能ですか?



683 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/21(水) 01:43:41 ID:U+6PFKs/0]
可能ですけど、2. をするくらいなら直接 http で POST しちゃって、
結果をツールチップで表示とかのほうがいいんじゃ。
むしろ、そういうことをしてくれるソフトやアドオンはいっぱいあるんじゃ。

684 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/21(水) 01:56:38 ID:oJndc07q0]
RECタブブラウザ作ってください、IEは操作途中に落っこちちゃうんだよね

685 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/21(水) 02:09:31 ID:dZEZ/RMS0]
>>682
GoogleもGooもExciteも全部uwsc(w

// 選択範囲をコピーするウインドウIDの取得
FUNCTION MUSI()
  FOR I=0 TO GETALLWIN()-1
    T=STATUS(ALL_WIN_ID[I],ST_TITLE)
    C=STATUS(ALL_WIN_ID[I],ST_CLASS)

    // 無視するウインドウ
    IFB T=""_
      or C="TApplication"_
      or POS("#",C)>0
      or POS("UnicodeClass",C)>0
    // とか

      CONTINUE
    ELSEIF C="Progman"
      MSGBOX("ERROR: ウインドウがない")
      EXITEXIT
    ELSE
      BREAK
    ENDIF
  NEXT
  RESULT=GETID(T,C)
FEND


686 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/21(水) 02:35:02 ID:wkuVEwNm0]
夜分遅くにレスありがとうございます。
参考にして色々試してみます。

687 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/21(水) 22:35:01 ID:4wiCaUFR0]
うあ、、、、これ便利すぎるw

688 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/22(木) 06:36:09 ID:2kS6WF+F0]
質問です
複数の画像を指定して、その画像毎に違ったアクションをさせるにはどうすればいいですか?
サンプルの
/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/
while True
  if GETKEYSTATE(VK_ESC) then exit
MMV(G_SCREEN_W, G_SCREEN_H)
  ifb CHKIMG("test.bmp")
  〜〜処理〜〜
  break
  endif
  sleep(1)
wend
/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/
のSleep後に
/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/
  ifb CHKIMG("test.bmp")
  〜〜処理〜〜
  break
  endif
/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/
を処理する数だけ加えていけば可能ですが、
もう少しすっきりさせる為に皆さんの知恵をお貸しください。

689 名前:名無しさん@お腹いっぱい。 [2007/02/22(木) 15:30:25 ID:XrP4EUKx0]
UWSCの勉強に役立つ書籍はスレの最初の方にあった
”Windowsマクロテクニック”だけで問題ないですか?

690 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/22(木) 16:23:18 ID:qSpCSOux0]
>689
日本語でおk

691 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/23(金) 01:39:23 ID:0sH5Ww6M0]
例えば行の先頭から指定した文字列(句点、濁点等)までを選択して
クリップボードにコピーするのってどうやるん?

692 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/23(金) 02:17:40 ID:aKHo+G7T0]
キーボードのあるキーを押すと
マウスの左クリックを0.5秒後に押すマクロってどうやってつくるんでしょうか?

if KBD(VK_DIVIDE,CLICK) then BTN(LEFT,CLICK,500)

とかやってみたんですけどできなくて…



693 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/23(金) 02:42:27 ID:9AJmM97l0]
>>691
line= "例えば行の先頭から指定した文字列(句点、濁点等)までを選択して"
sendstr(0,token("、",line))
>>692
getkeystate


694 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/23(金) 02:46:11 ID:0sH5Ww6M0]
>>693
レスありがとです!

695 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/23(金) 15:22:29 ID:OI7ziwL20]
UWSCおもすれー( ^ω^)

696 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/23(金) 20:27:31 ID:6yiL1E+C0]
あるプログラムのメモリを書き換えるスクリプトは、
どういう記述をすればいいのでしょうか?>>533を見たのですが
APIやDLLは使い方がよくわかりません・・・

697 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/23(金) 20:35:33 ID:x+nYfDMf0]
>>696
WriteProcessMemory 呼び出すだけだろ。

698 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/23(金) 21:53:58 ID:g22vXUMk0]
みんなこのソフトどういう時に使ってるの?
なんか便利な使い道あったら教えて下さい。

このソフトプログラマーの人しか使わないのかな。

699 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/23(金) 23:32:07 ID:lMs4LxVV0]
>>698
俺はnPOPで受信したメールがたまってきたら
テキストに保存して纏めて圧縮してるんだけど,
その操作をuwscにやらせてる。
自分が頻繁に行う定型の操作があって,
プログラムを組むほどでもないようなことをuwscで,,,みたいな

700 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/23(金) 23:41:01 ID:Zsv/MN0i0]
>>688
DIM x[] = "test1.bmp","test2.bmp", ・・・
for i=0 to LENGTH(x)-1
  ifb CHKIMG(x[i]) then
    select i+1
      case 1
        処理 1
      case 2
        処理 2
      case ・・・
        処理・・・
    selend
  endif
next

701 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/24(土) 12:15:07 ID:ifk79U590]
>>700
ありがとうございます、参考になりました。
それに加えて、複数個指定した画像以外に
指定した画像がなかった場合の処理を組み込む事は可能ですか?

この場合、配列をもう一つ別に指定した方が綺麗にまとまりますか?

702 名前:696 mailto:sage [2007/02/24(土) 12:55:52 ID:NQZTMvMn0]
>>697
回答ありがとうございます、呼び出し方の記述がよくわからないので
勉強して出直してきます



703 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/25(日) 08:28:12 ID:Y68j1HBx0]
>>698
午前10時45分にシャットダウンしたい時。

704 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/25(日) 14:38:01 ID:4DUTXKqq0]
GETITEM() の ITM_ACCTXTやITM_ACCCLKで文字列取るときに「&」を取っ払うのは仕様なのか?
ショートカットキーを表現する「&」を消すのはまだ納得できるけど、URL内の「&」消されるのはつらいぞ。

705 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/25(日) 15:01:21 ID:rNvu9Obr0]
アクセスエクスチェンジとかだろ

706 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/25(日) 19:13:40 ID:dSivR6Uy0]
>>701
bmp = "test.bmp" //bmp = "test1.bmp" //bmp = "test2.bmp"

DIM x[] = "test1.bmp","test2.bmp"
DIM y[LENGTH(x)-1]
for i=0 to LENGTH(x)-1
  ifb bmp = x[i] then
    select i+1
      case 1
        msgbox(x[i]+"発見")
      case 2
        msgbox(x[i]+"発見")
    selend
//   break
  else
    y[i] = "無い"
//   msgbox(x[i]+"が無い")
//   break
  endif
next
for i=0 to LENGTH(x)-1
  ifb y[i]<>"" then
    select i+1
      case 1
        msgbox(x[i]+"は無かった")
      case 2
        msgbox(x[i]+"は無かった")
    selend
  endif
next

707 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/26(月) 18:55:13 ID:MQXBg9MI0]
失礼します。
最小化しているウィンドウに対して処理を行う事は可能ですか?
行おうとしている作業は、最小化しているメールソフトに対して、
一定時間毎に"送受信"ボタンを押す、というものなのですが、

while
ifb chkimg(送受信.bmp)
  btn(left, click, g_img_x, g_img_y)
  break
  sleep(60)
wend

に何を加えればいいでしょうか?
後、疑問なのですが、最小化しているウィンドウに命令を行えるなら
chkimgで指定した画像は、表示している画面をサーチするのか、
最小化しているウィンドウ内をサーチするのか、どちらなのでしょうか?

回答頂ければ幸いです。

708 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/26(月) 20:30:10 ID:XaitowDR0]
chkimgは画面表示をチェックするんだろ?
最小化していて表示されるところだけちぇっくすればOK。
それが嫌ならchkimgなんか使うな。
ちなみに俺はchkimgなど1度も使った事は無い。

709 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/26(月) 20:53:44 ID:5Y5GLnn70]
>>707
最小化したままだとchkimgでは無理ですね。
chkimg以外の方法で処理可能であるならば自分だったらこんな感じにするかな。
他の方法もあるかもしれないけど。

x = gettime()
while !getkeystate(vk_esc)//escキーで終了
  y = gettime()-x
  s = y mod 60
  sleep(0.2)
  ifb s = 0
    //処理
  endif
wend
MsgBox("終了")


710 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/27(火) 02:13:24 ID:bZ9qrAwt0]
>707
とりあえず
MOUSEORG(id,2)
あとは
PostMessage使うとか

711 名前:名無しさん@お腹いっぱい。 [2007/02/27(火) 02:14:15 ID:UsiWTpU40]
♪   /妊_娠\
 .   |/-O-O-ヽ|
   6| . : )'e'( : . |9
 (( ( つ`‐-=-‐ 'ヽ、 ))    ♪     ♪
   〉       と/  )))           ♪
  (__/ ̄ ̄(_)

♪    / ̄ ̄ \
 .    |      |   ♪
    (|\   /|)
♪   /   ̄ ̄   ) )) ♪     ♪
 (( (  . : ( : .  〈            ♪
    (_) ̄ ̄ヽ__)

♪   /妊_娠\
 .   |/-O-O-ヽ|
   6| . : )'e'( : . |9
 (( ( つ`‐-=-‐ 'ヽ、 ))    ♪     ♪
   〉       と/  )))           ♪
  (__/ ̄ ̄(_)


712 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/27(火) 05:12:53 ID:xdrZIzQI0]
>>707
WinLister(英)
ttp://www.nirsoft.net/utils/winlister.html

ProcessWalkerなど
ttp://www001.upp.so-net.ne.jp/yamashita/product/index.htm

最小化されているウィンドウの「クラス」「タイトル」なども取得できるソフト。
同系ソフトは他にもあるけど、この機能に限定すればWinListerが使いやすい感じ。



713 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/27(火) 05:33:04 ID:XIHG/8cC0]
>>712訂正
△最小化されているウインドウの
○不可視ウインドウの

714 名前:名無しさん@お腹いっぱい。 [2007/02/27(火) 13:09:22 ID:dd7Gb3CU0]
すっげー久しぶりに来た。3ヶ月は見てないかな。ここ。

>>547
>>589
SE = IE.document.getElementsByTagName("select").item(1)
Op = SE.options
for i = 0 to Op.length - 1
Itm = Op.item(i)
if Itm.text = "名前/ヨミガナ" then Itm.selected = true // 選択
next
SE.fireEvent("onChange") // onChange イベントを発生させる


715 名前:714 [2007/02/27(火) 13:10:56 ID:dd7Gb3CU0]
業務用の抜き出しなんで、適当に直してね。

716 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/27(火) 20:29:18 ID:5o3nqbUw0]
IEでリンクの文字列をクリックしたいのですがHTMLが

<a href="http://......">リンク名</a>

上記のような場合

IELink(IE_br[1],"リンク名")
で問題なクリックしてくれるのですが

リンク名のあとに改行が入っている場合、改行コードを追加したりしたのですが
うまく動きません

<a href="http://......">リンク名
</a>

IELink(IE_br[1],"リンク名"+"<#CR>") // 改行追加

複数行になってしまう場合は無理なのでしょうか?


717 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/27(火) 21:52:50 ID:mtZrmXvS0]
getElementsByTagName("a")とかで試してみては

718 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/28(水) 00:22:00 ID:/zsDSXub0]
>716
htmlに改行は関係ないはずだしそんなわけないやろ…と思って検証してみた。
うん、たしかに改行が入ってるとクリックできないわ。

RecIEで記録してみたら改行を含むリンクの方は改行じゃなくて
"リンク名 "みたいに半角スペースが入ってるみたい。

これに習って半角スペース入れてやれば、
無事クリックすることはできたけど。

…これってバグだよね?

719 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/28(水) 00:36:17 ID:lKePO2390]
UWSCでDirectInputを扱うことはできるかな?

720 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/28(水) 00:50:01 ID:+F5S3BZ40]
どういうのが扱うの定義なの?

721 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/28(水) 01:34:24 ID:lKePO2390]
ああ、ミジンコですいません・・・。

単純にKBDやBTNの代わりにDirectInputを使ってみたいな、と思いまして。だから
キーやマウス操作で使いたいんです。

どうもUWSCでそういう事例がないっぽい感じなんで、聞いてみた次第です。

722 名前:名無しさん@お腹いっぱい。 [2007/02/28(水) 04:11:01 ID:WxlpFZeq0]
>>716
umiumi様に報告しなっせ。



723 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/28(水) 05:50:57 ID:+F5S3BZ40]
>>721
特定のアプリのみなら DLL Injection すればできるよ。
後はドライバ作ればなんでもできる。キーボードだけなら mayu.sys 使えばいい。

724 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/02/28(水) 22:56:38 ID:lKePO2390]
>>723
なるほど。そういう策があるんですね。Thx!

725 名前:名無しさん@お腹いっぱい。 [2007/02/28(水) 22:59:46 ID:6bZJcGLF0]
IESETDATAに対応するvbscriptってあります?
これすげー便利なんだけどvbscriptで同じのがあれば教えてください。

726 名前:716 mailto:sage [2007/03/01(木) 00:20:04 ID:dHFep3w80]
>>717 , >>718様 
ありがとうございます。
スペースを入れることで無事解決いたしました。



727 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/03/01(木) 00:23:51 ID:KFbXBiFs0]
vbsでIE操作関連のライブラリは聞いたことないなあ。
IESETDATAぐらいの機能なら自分で互換プロシージャ書いたほうが早いかも。

VBScriptにこだわらず、PerlやRubyやJavascript使えるならMechanize使うべし。

728 名前:名無しさん@お腹いっぱい。 [2007/03/01(木) 03:11:08 ID:eWsgJP0Y0]
>>727
やっぱそうですか。
vbscriptで実現しようとするとうまくいかないサイトがありまして、
RECIEでやると簡単にいったんです。
IESETDATAってのをたくさん使ってたのでvbでもできないかなあといろいろググってます。
でもないんですねえ。素人にはむつかしい。
Mechanizeってのをググっても???が頭に浮かぶばかりです。
やたらIT英単語が羅列される高度なサイトしかでてこない。


729 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/03/02(金) 11:28:21 ID:wgmImKY+0]
すみませんちょっと教えてほしいのですが

CALL で呼び出した サブマクロをリリースすることは出来るのでしょうか?

やりたいことは 一日中動かす制御系マクロで、条件にしたがって CALLするサブマクロを変えたいのです。

只、問題になるのではないかと懸念しているのは

例えば 条件にしたがって A.UWS をCALLして
しばらくして、条件が変わり 今度はB.UWSをCALLした後
また、条件が元に戻って A.UWSをCALLすると、関数の重複エラーを起こすのではないかと思ってます。

CALLする際には、既にCALLしていればCALLしないような関数自体の制御はあるのでしょうか?

よろしくお願いします。

730 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/03/02(金) 12:09:17 ID:WyS8M7wk0]
CALLはスクリプトの始まりで全て読み込まれる仕様だったと思うが。

731 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/03/02(金) 12:11:33 ID:wgmImKY+0]
>>730 そうなんですか?
以前に 
Select 条件
 Case A
  Call A.uws
 Case B
  Call B.uws
 Case C
  Call C.uws
Selend

みたいなので動かしてましたが、条件に関係なく Callされてしまうということでしょうか?

732 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/03/02(金) 12:14:46 ID:WyS8M7wk0]
なので、CALLの中は関数のみにして条件式で関数を呼び出したほうが管理し易い。



733 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/03/02(金) 12:16:44 ID:wgmImKY+0]
>>732
了解です。アルゴリズムを変えます。

734 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/03/02(金) 12:19:54 ID:WyS8M7wk0]
> CALL文はスクリプトが走る前に評価してマージ
らしいので、何回呼び出してもOKということ。

735 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/03/02(金) 12:21:37 ID:wgmImKY+0]
>>734
そうなんですか、であればすごく楽です。いろいろありがとうございました。

736 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/03/02(金) 12:24:09 ID:WyS8M7wk0]
なので は変だったかな。
まとめると、CALLの重複呼び出しは可能だが、
関数呼び出しの方がCALLする数も減らせてよいのではないか・・と。

737 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/03/02(金) 17:18:17 ID:LEgHzb2/0]
教えてください

kbd(vk_tab)
kbd(vk_tab)
kbd(vk_tab)
kbd(vk_tab)
kbd(vk_tab)

の簡略化の仕方って、どうすればいいのでしょうか?
初歩的な事ですいません。

738 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/03/02(金) 17:40:28 ID:zd/tmG0Y0]
for i=1 to 5
kbd(vk_tab)
next

739 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/03/02(金) 18:51:13 ID:LEgHzb2/0]
>>738
なりました
どうもありがとうございました!

740 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/03/02(金) 23:29:55 ID:YTqW5ImN0]
kbd(vk_tab, 5 ) * 5;

741 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/03/02(金) 23:31:39 ID:YTqW5ImN0]
I=5
WHILE I--
kbd(vk_tab)
Wend

742 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/03/03(土) 00:35:02 ID:VMJxRwv40]
>740,741




……うそつき
(緒川たまき)



743 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/03/03(土) 09:17:41 ID:V9IC+ExM0]
kbd(vk_tab)
kbd(vk_tab)
kbd(vk_tab)
kbd(vk_tab)
kbd(vk_tab)

これを誰よりも複雑に書いてください。


744 名前:名無しさん@お腹いっぱい。 [2007/03/03(土) 20:43:41 ID:s3yQZgWo0]
kbd(vk_tab , vk_tab , vk_tab , vk_tab , vk_tab) ;

745 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/03/03(土) 23:14:36 ID:MQ3VC4ET0]
Dim TabCnt = 0
While TabCnt < 5
  repeat
    rd = RANDOM(100)
    ret = (int(rd / 10) * 10) mod 7
  until (ret = 3)
  kbd(vk_tab)
  TabCnt = TabCnt + 1;
wEnd

746 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/03/03(土) 23:23:26 ID:YLpnXPZY0]
>>316をDF 1.40で使ってるけど Sleipnir 1.xへ誤爆することがある。
タイトルは「DF」の2文字しかないし、クラス名がほぼ同じ・・・
リソース弄ってタイトル書き換えたらOKになったよ。

あと、DROPFILEの前にST_BUSYを入れてみたが効果は不明。
while STATUS(id, ST_BUSY); sleep(0.1); wend
DROPFILE(id, dir, fname)

>>741-742
意味無いけどこれなら動く。
i=5
while i
  i=i-1
  kbd(vk_tab)
wend

747 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/03/04(日) 02:53:05 ID:5kEaDmCz0]
ifb fopen("tab5.uws",f_exists) = 0
  fid = fopen("tab5.uws",f_read or f_write)
    fput(fid,chr(102)+chr(111)+chr(114)+chr(32)+chr(105)+chr(61)+chr(49)+chr(32)+chr(116)+chr(111)+chr(32)+chr(53),1)
    fput(fid,"<#tab>"+chr(107)+chr(98)+chr(100)+chr(40)+chr(118)+chr(107)+chr(95)+chr(116)+chr(97)+chr(98)+chr(41),2)
    fput(fid,chr(110)+chr(101)+chr(120)+chr(116),3)
  fclose(fid)
endif
while 1
  sleep(0.2)
  ifb fopen("tab5.uws",f_exists) = 0
    continue
  else
    break
  endif
wend
call tab5

748 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/03/04(日) 11:10:58 ID:jZ09oSHm0]
Class Tab5
  Dim Count5
  Procedure Tab5()
    Sleep(1)
    this.TabClick()
  Fend
  Procedure TabClick()
    kbd(chr(57))
    this.CountUp()
    this.TabClick()
  Fend
  Procedure CountUp()
    Count5 = Count5 + 1
    if Count5 = 5 then exitexit
  Fend
EndClass


749 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/03/04(日) 16:30:49 ID:ZVZ7OXQj0]
ブログのバックアップデータのあるCSVファイルがあるんだけど
コレをWIKIに移行しようと思って自動化プログラム作りたいんだけど

どんなプログラムくめばいい意

750 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/03/04(日) 16:34:23 ID:QvCR5Gc90]
>>749
要約するとこうだな
@ブログのバックアップCSVデータがある
AWIKIに移行する自動化プログラムを作りたい
Bどんなプログラムを組めばいいか?という質問

答え:自動化プログラムを組めばいい


751 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/03/04(日) 17:18:20 ID:ZVZ7OXQj0]
>>750
そう

わからないのが
エクセルから特定のセルをキャッシュにコピーする方法

特定のアドレスにアクセスする方法

がわかればたぶんできると思うのですが

752 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/03/04(日) 17:30:46 ID:m1xVfsXi0]
テキスト処理だけでできる作業を何でわざわざ GUI でやろうと思うのかが謎



753 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/03/04(日) 17:50:39 ID:aLBEPeVF0]
ここ数時間試行錯誤をしてるのですが解決しませんので質問させていただきます

メモ帳などでキーボードのaを押したら処理1が開始されるようなマクロを組みたいのですが
      start
  __________|________
  | |
aが押される bが押される (キーボード
  | |
処理1 処理2
|__________________|
|
~
このようなスクリプトはUWSCにはないのでしょうか
INPUTでは新たにウィンドウが出てしまいますし、エンターを押さなければ処理1には進みません

なにか知恵をお貸しいただければ幸いです

754 名前:名無しさん@お腹いっぱい。 mailto:sage [2007/03/04(日) 17:53:38 ID:QvCR5Gc90]
ifb GETKEYSTATE(VK_A) then
  //a key を押した時の処理
endif


当然 while 〜 wend に入れるべし


ていうか752にもあるように、UWSCでつくるべきプログラムじゃないよ






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

前100 次100 最新50 [ このスレをブックマーク! 携帯に送る ] 2chのread.cgiへ
[+板 最近立ったスレ&熱いスレ一覧 : +板 最近立ったスレ/記者別一覧]( ´∀`)<293KB

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