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

[表示 : 全て最新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/
331 名前：名無しさん＠お腹いっぱい。 [2006/12/01(金) 06:45:36 ID:HqQsiF3P0]: // Internet Explorer 上での文字設定、ボタンのクリック　（COM利用）
// エディトボックス、ボタンはHTMLソースの'NAME='や'VALUE=' から確認
IE = CreateOLEObj("InternetExplorer.Application")
IE.Visible = True
IE.Navigate("prog-etc.bbs.thebbs.jp/1164265310/")// 掲示板
while True　　　　　　　　　　　　　　　　　　　　　　　// 接続表示待ち
　　if (! IE.busy) and (IE.readyState=4) then Break
　　sleep(0.1)
wend
GETTIME()
timeｂ=g_time_yy2+"年"+g_time_mm2+"月"+g_time_dd2+"日"+g_time_hh2+"時"+g_time_nn2+"分"

IE.document.all["body"].value = timeｂ// タイトル書込み
IE.document.sm.click()

//IE.document.all["body"].value = "body"// タイトル書込み

IE.document.sm.click()

日付
書き込むところまでいくんだけど書き込みボタンクリックしない。
332 名前：名無しさん＠お腹いっぱい。 [2006/12/01(金) 07:12:38 ID:xAQgo5dN0]: 手軽に画像の更新をしたいなあと思って
画像をショートカット(実行ファイル)に放り込むと特定のアップローダーにpostする、ということをやりたいんですけど、
このツールで出来ますか？
333 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/01(金) 09:35:19 ID:bhBGT+M70]: >>332
まぁしこしこスクリプト書けばできるが、あまりUWSCが向いてるようには思わない。
PerlとかでHTTPしゃべらす方がスマートだと思う。
334 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/01(金) 11:48:02 ID:i7V3wzgJ0]: >>331
smは、documentの直下じゃないよ。
　　IE.document.Fm.sm.click()
とか
　　IE.document.all["sm"].click()
formsから辿る方法とか、いくらでもやり方ある
※ Fmは、FROMタグのname
335 名前：名無しさん＠お腹いっぱい。 [2006/12/01(金) 21:30:51 ID:Xs7RUjw90]: CHKIMGをFPSゲームで使おうと思っているのですが、動的なところでどうしても画像判別ができません。
マウスがアクティブになるところ（メニュー画面など）では一応読み込めるようです。
フルスクリーンやウィンドウ両方で試しても読み込むことができませんでした。
CHKIMGなどでは判別することは不可能なのでしょうか？
わかる方がいましたらお願いします。
336 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/01(金) 22:24:41 ID:9eh7+OGM0]: if timeGetTime-Lasttiger > DWord(teletime.Value*1000) then
if GetForeGroundWindow=TargetWnd then
begin

keybd_event(VK_F2+cbAutoSC.ItemIndex,0,0,0);
keybd_event(VK_F2+cbAutoSC.ItemIndex,0,KEYEVENTF_KEYUP,0);
LastAutoShortcut:=timeGetTime;
end;
end
else
LastAutoShortcut:=timeGetTime;
337 名前：名無しさん＠お腹いっぱい。 [2006/12/02(土) 00:03:58 ID:CWQeQlur0]: >>334ありがと
できた、
338 名前：名無しさん＠お腹いっぱい。 [2006/12/02(土) 00:34:00 ID:lizCI7GG0]: 06年12月02日00時33分
339 名前：名無しさん＠お腹いっぱい。 [2006/12/02(土) 07:48:39 ID:43OZZphG0]: しかしまだ難しい、ちょっと＂を全角．半角間違えただけでエラーがでて、その理由までＵＷＳＣは教えてくれない、
１０分もプログラムにらめっこ状態になった
340 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/02(土) 17:42:44 ID:hvFLwMCZ0]: エラーが出て教えてくれてるわけだが。
341 名前：名無しさん＠お腹いっぱい。 [2006/12/02(土) 19:33:04 ID:DDIOW/mZ0]: // Internet Explorer 上での文字設定、ボタンのクリック　（COM利用）
// エディトボックス、ボタンはHTMLソースの'NAME='や'VALUE=' から確認
IE = CreateOLEObj("InternetExplorer.Application")
IE.Visible = True
IE.Navigate("prog-etc.bbs.thebbs.jp/1164265310/")// 掲示板
while True　　　　　　　　　　　　　　　　　　　　　　　// 接続表示待ち
　　if (! IE.busy) and (IE.readyState=4) then Break
　　sleep(0.1)
wend
GETTIME()
timeｂ=g_time_yy2+"年"+g_time_mm2+"月"+g_time_dd2+"日"+g_time_hh2+"時"+g_time_nn2+"分"

IE.document.all["body"].value = timeｂ// タイトル書込み
IE.document.all["sm"].click()

IE.document.all["sm"].click() //ここがうまくいかなくて書き込めないTHEBBS 書き込み
342 名前：名無しさん＠お腹いっぱい。 [2006/12/03(日) 08:13:53 ID:Zdl4S4Sj0]: ソースにnameが無い場合、どうやってｃｌｉｃｋを設定するの？
343 名前：名無しさん＠お腹いっぱい。 [2006/12/03(日) 13:24:17 ID:snS6N3rq0]: 　sleep(0.1)を入れるといいかも
344 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/03(日) 19:09:01 ID:JP0s2lkY0]: >>341
せっかく新しい関数が追加されてるので

IESetData(IE,True,"TAG=input",4)　とか
IESetData(IE,True,"sm")

IE.document.Fm.sm.click()　でもいけると思うけど
345 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/03(日) 19:35:32 ID:JP0s2lkY0]: >>342
IE.document.all.tags["input"].item[3].click() 　みたいな感じで

あと最近追加されたIE操作用の関数もあります
346 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/03(日) 20:13:39 ID:Ww/6AySw0]: マウス動かしたりchkimgとか使わずにCOMの操作だけで済む場合は
UWS使わずにVBスクリプトで書くほうがスマートだなと最近気付いた。
まだWebで調べながら試行錯誤しながら書くレベルだけど
どこでも実行できるから便利だよね。
347 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/03(日) 21:04:09 ID:VUpqkTxs0]: 最近スレ伸びてるね
もしかしてどこか厨雑誌で紹介された？
348 名前：名無しさん＠お腹いっぱい。 [2006/12/03(日) 21:25:23 ID:JOKqZmnZ0]: // Internet Explorer 上での文字設定、ボタンのクリック　（COM利用）
// エディトボックス、ボタンはHTMLソースの'NAME='や'VALUE=' から確認
IE = CreateOLEObj("InternetExplorer.Application")
IE.Visible = True
IE.Navigate("pc7.2ch.net/test/read.cgi/software/1156416884/200n-")// 掲示板
while True　　　　　　　　　　　　　　　　　　　　　　　// 接続表示待ち
　　if (! IE.busy) and (IE.readyState=4) then Break
　　sleep(0.1)
wend
GETTIME()
timeｂ=g_time_yy2+"年"+g_time_mm2+"月"+g_time_dd2+"日"+g_time_hh2+"時"+g_time_nn2+"分"

IE.document.all["MESSAGE"].value = timeｂ// タイトル書込み
IE.document.all["submit"].click()
//このスレに挑戦
349 名前：名無しさん＠お腹いっぱい。 [2006/12/03(日) 21:30:43 ID:JOKqZmnZ0]: 06年12月03日21時30分
350 名前：名無しさん＠お腹いっぱい。 [2006/12/03(日) 21:31:57 ID:JOKqZmnZ0]: 成功21時40分に自動書き込み設定
351 名前：名無しさん＠お腹いっぱい。 [2006/12/03(日) 21:40:40 ID:JOKqZmnZ0]: 06年12月03日21時40分
352 名前：名無しさん＠お腹いっぱい。 [2006/12/03(日) 21:41:16 ID:JOKqZmnZ0]: よっしゃー
353 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/04(月) 00:28:04 ID:MJakTm8F0]: ↑喜んでるところまで自動なら神
354 名前：名無しさん＠お腹いっぱい。 [2006/12/04(月) 03:25:18 ID:WHrXC3Jy0]: ありがとうございます
355 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/04(月) 04:10:21 ID:OmF4uqP80]: テストはテストスレでやれよボケ
356 名前：名無しさん＠お腹いっぱい。 [2006/12/04(月) 09:02:00 ID:Qn4XOe5q0]: type="file"のボックスのvlalueに入力する方法ってある？

type="text"と同じように指定しても入らない
357 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/04(月) 19:10:25 ID:rtCP1keL0]: ファイル名入力フィールド（type="file"）

ブラウザからWWWサーバーにファイルをアップロードする際に用います。
入力フィールドの横には参照ボタンが表示されます。
WWWサーバー側にはファイルを受け取るための特別なCGIスクリプトなどを設置しておく必要があります。
セキュリティのために、初期値を設定したり、スクリプトで値を操作することはできません。

www.tohoho-web.com/html/input.htm
358 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/04(月) 21:10:31 ID:rtCP1keL0]: クリップボードへ入力したいものを送っておいて
フォーカスを移動して右クリック貼り付け
SCKEY(getid("- Windows Internet Explorer"),VK_APPS,VK_DOWN,VK_DOWN,VK_DOWN,VK_DOWN,VK_RETURN)
359 名前：名無しさん＠お腹いっぱい。 [2006/12/05(火) 00:38:41 ID:TfVwWult0]: IE = CreateOLEObj("InternetExplorer.Application")
IE.Visible = True
IE.Navigate("headline.2ch.net/bbynews/")// 掲示板
while True　　　　　　　　　　　　　　　　　　　　　　　// 接続表示待ち
　　if (! IE.busy) and (IE.readyState=4) then Break
　　sleep(0.1)
wend
ACW(GETID("２ちゃんねる　電車男　ニュース　ヘッドライン BBY (NEWS) - MICROSOFT INTERNET EXPLORER","IEFrame"),68,54,870,658,0)
KBD(VK_ALT,DOWN,40)
KBD(VK_F,DOWN,31)
KBD(VK_F,UP,0)
KBD(VK_ALT,UP,170)
KBD(VK_CTRL,DOWN,30)
KBD(VK_A,DOWN,10)
ACW(GETID("WEB ページの保存","#32770"),72,77,654,411,0)
BTN(LEFT,UP,)
//日付を入れて保存するにはどうすればいいの？
360 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/05(火) 03:17:03 ID:4dBMWCwl0]: お前等2chにアクセスすんのにいちいちIE使うなボケ。
361 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/05(火) 03:34:03 ID:lDz8eYVx0]: 基本は wget と curl だよな。
寂しくなったりしたときは telnet で喋るのもいいが。
362 名前：名無しさん＠お腹いっぱい。 [2006/12/05(火) 10:31:03 ID:PMUEJKEi0]: まだ難しいよな、数学で言えば、掛け算の九九をすっとばして、高等数学やるような気持ち
363 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/05(火) 15:04:59 ID:UmSZpxfc0]: でも「UWSCは難しい、もっと簡単にせよ」というのはこのスレでは一人なんだよな
364 名前：名無しさん＠お腹いっぱい。 [2006/12/05(火) 16:39:26 ID:Xx8yar820]: すれ違いかもしれないけど、
特定の時刻に決まった座標位置をダブルクリックしたい場合
このソフトうまく動かないんだけど、ネットゲームで使いたいんだけど
365 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/05(火) 17:28:39 ID:eR0sB+8F0]: >>359
ie = CreateOLEObj("InternetExplorer.Application")
ie.Visible = True
ie.Navigate("about:blank")
while ie.Busy or ie.ReadyState<>4; SLEEP(0.1); wend

ＩＥのウインドウＩＤ = GETID(" - Microsoft Internet Explorer","IEFrame")
DEF_DLL PostMessageA(HWND,Long,Long,DWORD):Bool:user32.DLL
PostMessageA(IDToHnd(ＩＥのウインドウＩＤ), $111, $102, 0)

ページの保存ダイアログＩＤ = GETID("Web ページの保存","#32770")
日付 = "現在の日時を設定"　// GETTIME(0)～
SENDSTR(ページの保存ダイアログＩＤ, 日付 , 1, True)
CLKITEM(ページの保存ダイアログＩＤ, "保存")
// 敢えて変数に全角を使った。このままで動くから…
366 名前：名無しさん＠お腹いっぱい。 [2006/12/05(火) 18:54:35 ID:PMUEJKEi0]: うーんうまくいかない。自分はタイマー自動でファイル（Ｆ）⇒名前をつけて保存
⇒ファイル名（Ｎ）でファイル名の後ろに日付をつけて保存したいんだけど、

マウスとカーソルだけでプログラム作れるようになればいいのになあ
367 名前：名無しさん＠お腹いっぱい。 [2006/12/05(火) 19:07:09 ID:PMUEJKEi0]: >>365
あーできた
ありがとうただ
ファイルの種類をアーカイブで保存したかった。
368 名前：名無しさん＠お腹いっぱい。 [2006/12/05(火) 19:17:24 ID:PMUEJKEi0]: //　文字の送信
SENDSTR( ID,　文字列,　[番号,　送信モードフラグ,　ACC指定] )
引数
　　ID：　Windowを識別するID
　　　　　（ID = 0　であればクリップボードへ）
　　文字列：　送りたい文字列
　　番号：　左上から数えたエディトコントロールの順番（１から指定）
　　　　　　　（デフォルトはフォーカスを持ったエディトコントロール）　　　　　　　
　　送信モードフラグ：　
　　　　　　　FALSE：　追加（デフォルト）
　　　　　　　TRUE：　置き換え
　　ACC指定：　
　　　　　　　FALSE：　APIによる（デフォルト）
　　　　　　　TRUE：　アクセシビリティ用インターフェースを利用
番号の部分が難しい、ウインドウみたいにソースが使えない
369 名前：名無しさん＠お腹いっぱい。 [2006/12/05(火) 19:28:22 ID:PMUEJKEi0]: なきゃないでかまわんがやはり
フリーのソフトはつかわんほうがいいのかな。
なんか怪しいソフトでも困るしなあ。いくら便利でも社長がちゃんとした人物
でないと、ウィンドウズＸＰ作ったビルゲイツはエイズの研究費出したり
して悪人でないだろうと思って使っているが、社員全部を管理できるかといえば
というきがする。
370 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/05(火) 19:43:58 ID:TbpDXn5y0]: な
フ
な
で
し
と
371 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/05(火) 20:07:59 ID:lDz8eYVx0]: とりあえず難しいから使えない=>フリーソフトは怪しいから使わない、
っていう論法にワラタ。

バカは無理して使わなくてもいいお?
372 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/05(火) 20:41:20 ID:kin3Zm3D0]: 個人的には、uwscがオートメーションサーバー機能搭載してくれたら最高なんだが・・・
wshから簡単に利用できると使用者激増するだろうなー。
独自言語だと、どうしても習得に手間と時間かかるし
373 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/06(水) 02:56:21 ID:UsSPovY80]: >>366,367
id = GETID("Web ページの保存","#32770")
GETTIME(0); 日付 = "_" + G_TIME_YY2 + "-" + G_TIME_MM2 + "-" + G_TIME_DD2
SENDSTR(id , 日付 , 1, False, True)
SCKEY(id, VK_ALT, T); SLEEP(0.1); SCKEY(id, VK_W, VK_RETURN)

//CLKITEM(id, "Web アーカイブ、単一のファイル (*.mht)", CLK_LIST) //←何故か失敗する
//CLKITEM(id, "保存")

>>362,368-369　ID:PMUEJKEi0
あんたの日記帳じゃないんだから、余計なレス＆コピペは不要！
374 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/06(水) 03:01:40 ID:+7fqDNkb0]: あっそ
375 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/06(水) 03:41:13 ID:FAzu1gps0]: >>372
要らん事言うな。
やり兼ねないだろ。VBS有るのに。
俺はもっと退化してほしい。
376 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/06(水) 05:31:27 ID:yhihj9By0]: >>372
いきなりではとっつき難いけど、WSHが書けるんなら楽勝だと思うよ。
ｵﾚはVBS,JSから入ったんで目から鱗状態だった。
WSHで出来ることはWSHでやればいいし。
UWSCからWSH等を利用するのは割と簡単なんだけどなぁ…

>>373
id = GETID("Web ページの保存","#32770")
tt = COPY(GETSTR(id, 1), 1, 8)　// ページタイトルの先頭から８文字をコピー
GETTIME(0); 日付 = "_" + G_TIME_YY2 + "-" + G_TIME_MM2 + "-" + G_TIME_DD2
SENDSTR(id, tt + 日付, 1, True)
SCKEY(id, VK_ALT, T); SLEEP(0.1); SCKEY(id, W, VK_RETURN)　// *.mht で保存
377 名前：名無しさん＠お腹いっぱい。 [2006/12/06(水) 13:43:20 ID:BvKVwaQG0]: エッフェル塔のライブカメラの画像を日付つけて保存、（スケジューラーで1時間ごとにするときれい）
IE = CreateOLEObj("InternetExplorer.Application")
IE.Visible = True
IE.Navigate("www.paris-live.com/paris_webcam/eiffeltowerwebcams.htm")// 掲示板
while True　　　　　　　　　　　　　　　　　　　　　　　// 接続表示待ち
　　if (! IE.busy) and (IE.readyState=4) then Break
　　sleep(0.1)
wend
ACW(GETID("PARIS-LIVE.COM - PARIS WEBCAM - EIFFEL TOWER - MICROSOFT INTERNET EXPLORER","IEFrame"),68,54,870,658,0)
BTN(LEFT,DOWN,800,67,140)
ACW(GETID("PARIS-LIVE.COM - PARIS WEBCAM - EIFFEL TOWER - MICROSOFT INTERNET EXPLORER","IEFrame"),68,54,870,658,0)
BTN(LEFT,UP,800,67,91)
KBD(VK_RALT,DOWN,340)
KBD(VK_F,DOWN,441)
KBD(VK_F,UP,60)
KBD(VK_RALT,UP,80)
KBD(VK_CTRL,DOWN,40)
KBD(VK_A,DOWN,0)
ACW(GETID("WEB ページの保存","#32770"),72,77,654,411,0)
378 名前：続き [2006/12/06(水) 13:43:49 ID:BvKVwaQG0]: KBD(VK_A,UP,0)
KBD(VK_CTRL,UP,0)
KBD(VK_RALT,DOWN,3465)
KBD(VK_I,CLICK,311)
KBD(VK_RALT,UP,170)
KBD(VK_RALT,DOWN,40)
KBD(VK_N,CLICK,40)
KBD(VK_SPACE,CLICK,40)

GETTIME()
timeｂ=g_time_yy2+"年"+g_time_mm2+"月"+g_time_dd2+"日"+g_time_hh2+"時"+g_time_nn2+"分"
SENDSTR(GETID("WEB ページの保存"),timeｂ+"EIFFEL TOWER")

KBD(VK_RALT,UP,340)
KBD(VK_RALT,DOWN,481)
KBD(VK_T,CLICK,30)
KBD(VK_RALT,UP,221)
KBD(VK_DOWN,DOWN,10)
KBD(VK_DOWN,UP,20)
KBD(VK_DOWN,DOWN,641)
KBD(VK_DOWN,UP,0)
KBD(VK_RETURN,DOWN,321)
KBD(VK_RETURN,UP,0)
KBD(VK_RETURN,DOWN,145)
ACW(GETID("WEB ページの保存","#32770"),322,283,379,168,0)
KBD(VK_RETURN,UP,0)
379 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/06(水) 15:11:21 ID:adcM/QV70]: NGWordに追加　KBD
380 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/06(水) 15:46:24 ID:KUjaXZFz0]: SCKEYっていうとっても便利な命令があるんだけどなーwww
381 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/06(水) 17:45:57 ID:GLEwdEWu0]: >>378
いいですね！
レスをまとめて参考にしたいのでコテにしてくれませんか
382 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/06(水) 19:44:23 ID:FU5gZqhb0]: 何この日記帳
383 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/06(水) 21:10:02 ID:quIrFEQz0]: >>377
わざわざIE起動せんでも、直接DLしたほうがいいんでないかい。

url = "www.images2-abcparislive.com/eiffelcam1.jpg"
http = CreateOLEObj("MSXML2.XMLHTTP");
http.open("GET", url, false);
http.SetRequestHeader("If-Modified-Since", "Thu, 01 Jun 1970 00:00:00 GMT")
http.SetRequestHeader("Pragma", "no-cache");
http.SetRequestHeader("Cache-Control", "no-cache");
http.send("");
ifb http.status = 200 then
gettime()
s_time = g_time_yy2+"年"+g_time_mm2+"月"+g_time_dd2+"日"+g_time_hh2+"時"+g_time_nn2+"分"
ados = CreateOLEObj("ADODB.Stream");
ados.Open();
ados.Type = 1;
ados.Write(http.responseBody);
ados.SaveToFile(s_time+" EIFFEL TOWER"+".jpg", 2);
ados.Close();
ados = NULL
endif
http = NULL
384 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/06(水) 22:55:14 ID:JB2DjNOW0]: 近頃異様にﾚｽ伸びてんなあ。
どこかで紹介されたか？
そういや、これでLotusNotesって操作出来るんかな？
385 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/07(木) 01:59:16 ID:VyEoqVxS0]: できないものはない
あえて言うとすればUWSCそれ自身
386 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/07(木) 02:02:14 ID:PZ8cfJA90]: DirectInput にイベント放り込んだりできないじゃない。
DLL 呼び出せばできるが。
387 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/07(木) 14:44:40 ID:FRC6maaU0]: キーボード操作で
KBD(VK_RALT,UP,100)
KBD(VK_D,DOWN,100)
とあるのですがUPとDOWNの違いは何なんでしょうか？
普通のクリックしかしていないつもりなんですが表記が違ってて…
388 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/07(木) 16:21:19 ID:7TNBYEsO0]: DOWNがキー押下げ
UPが押していたキーを離す
389 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/07(木) 16:32:10 ID:FRC6maaU0]: >>388
有難う御座います。
390 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/07(木) 16:50:46 ID:3GkzlLog0]: どういたしまして
391 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/07(木) 18:33:21 ID:hs1oaTsD0]: KBDとMMV以外は廃止したほうがいい。
392 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/07(木) 18:43:49 ID:7lLokSkD0]: むしろKBDとMMVを廃止したほうがいい。
393 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/07(木) 19:33:07 ID:hs1oaTsD0]: >>392
mmvとkbdだけなら他のOSでも動く。
mmvとkbdだけにしてそれを拡張したほうがいい。
394 名前：名無しさん＠お腹いっぱい。 mailto:sage NGWord KBD [2006/12/07(木) 20:04:35 ID:ICY6rlFi0]: >>369 >>378
かの有名な社長はきちんと偽善事業していますが
名前からして怪しい！そう思いませんか？
怪しいフリーソフトは使わない方が良いと思います。
KBDは便利ですが…手遅れになる前に…
あなたに感謝してます。
貴重な情報ありがとう。
395 名前：名無しさん＠お腹いっぱい。 [2006/12/07(木) 22:14:57 ID:7ZOeS0w50]: >>394
桜田門の人？
個人情報取るときは、本人に教えてほしい、共和党が選挙で破れたのは
国民の盗聴しすぎたからでないのかな、
民主党になれば権力のトップが替わるので不正が発見しやすい。
396 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/07(木) 23:37:18 ID:2dPIF4520]: Excelからマクロでスクリプトを出力してUWSCを起動させてる馬鹿は、俺以外にいるか？
397 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/08(金) 00:03:09 ID:chHOovwv0]: 漢だな

使ってるCADでショートカット割り振れないアイコン、しかも右下の辺鄙なとこにあるやつね、
そいつをクリックするのがめんどいんでロジの８つボタンマウスに割り振ってる、俺は。
398 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/08(金) 00:10:40 ID:ec1k12CL0]: 連動させてファイルの圧縮も自動化させたいんだけどなにか相性いいやつある？
できればコマンドラインで操作したい
LHAはファイル名の制限きついし……
399 名前：396 mailto:sage [2006/12/08(金) 00:37:07 ID:0g+qQw1G0]: >>397
エンドユーザが作成したデータを元に、
コマンドプロンプトもどき（メインフレームと通信する奴）に
入力する作業を自動化したら、そうなってしまったんだよ。

ホントレガシーシステムは地獄だぜ！フゥハハハーハァー
400 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/08(金) 14:52:07 ID:nDsO2FL70]: >>398
引数につけたファイルがアーカイブでなければ圧縮する
その際の設定は事前に設定しておく

っていうアーカイバを使えばいいんじゃないか？
401 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/08(金) 16:42:24 ID:0zLBfT2k0]: >>398
アイコンに D&D すると圧縮してくれる奴なら、
コマンドラインから渡せるんじゃないの?

と言うか別に DLL 叩けばいいんジャマイカ?
402 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/08(金) 19:32:34 ID:9NJfuLhZ0]: ずーっと前から気になってたんだけど○○叩くって何からきてんの？
DLL叩く、Winsock叩くとか日本語として変じゃない？
403 名前：名無しさん＠お腹いっぱい。 [2006/12/08(金) 20:27:49 ID:dcPVzq7I0]: IE = CreateOLEObj("InternetExplorer.Application")
IE.Visible = True
IE.Navigate("prog-etc.bbs.thebbs.jp/1164265310/")// 掲示板
while True　　　　　　　　　　　　　　　　　　　　　　　// 接続表示待ち
　　if (! IE.busy) and (IE.readyState=4) then Break
　　sleep(0.1)
wend
select RANDOM(7)
case　0
moji="長すけ「ばかやろ！」"
case　1
moji="仲本「長さんのいうとうり」"
case　3
moji="加藤「すんずれいしました」"
case　4
moji="高木「ブー」"
case　5
404 名前：続き [2006/12/08(金) 20:29:21 ID:dcPVzq7I0]: moji="荒井「なんだばかやろ」"
case　6
moji="志村「あいーん」"
case　7
moji="また来週"
selend
select RANDOM(3)
case　0
mo="志村"
case　1
mo="また来週"
case　2
mo="加藤"
selend
IE.document.all["crypt_moto"].value = moji// タイトル書込み
IE.document.all["name"].value =mo // 名前書込み
IE.document.all["body"].value =moji//テキスト書き込み
IE.document.all["sm"].click()
SLEEP(10)
ACW(GETID("THEBBS 書き込み - MICROSOFT INTERNET EXPLORER","IEFrame"),69,8,870,658,0)

IE.document.all["sm"].click()
405 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/08(金) 21:23:09 ID:nDsO2FL70]: そのURL覗いてみたら早速試されてる形跡があってﾜﾛﾀ
406 名前：名無しさん＠お腹いっぱい。 [2006/12/08(金) 21:33:55 ID:hZKfmjKg0]: ありがとう！
407 名前：名無しさん＠お腹いっぱい。 mailto:sage NGWord KBD [2006/12/09(土) 03:45:45 ID:himiiWWI0]: >>403 >>404 >>406
あ！まだやってるんですか…驚きました。
賢明なあなたのことですから全て理解して戴けたと思っていたのですが…
残念です、しかし、まだ間に合います、
過去の私の書込みを思い起こしてください。
気になる情報が有った時には下記スレッドへお願いします。
24時間注目してますから。
KBDqb5.2ch.net/test/read.cgi/operate/1165491164/
408 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/09(土) 05:20:01 ID:J16nIrh00]: >>406
無意味な文章を定期的に書き込むのは「迷惑」行為に当たるぞ。
良く考えて行動してくれ。
UWSCがとばっちりを受けて公開中止になったらどう責任取るんだ！
削除要請出しとけ！
409 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/09(土) 06:19:57 ID:CpeVJ4Nj0]: >>402
英語の kick から来てるんだからおかしくても問題無いだろ。
410 名前：名無しさん＠お腹いっぱい。 [2006/12/09(土) 06:23:07 ID:MrCYpI9z0]: どういたしまして
411 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/09(土) 17:54:50 ID:nWYe904v0]: ２チャンに自動書き込みするマクロの例プリーズ
412 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/09(土) 20:52:45 ID:8gCVgCO70]: sendstr(getid（"OpenJane 【ソフトウェア】 - 自動化ツール"）,"ウルセー馬鹿")
413 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/10(日) 04:08:19 ID:dN5jDykH0]: 某競馬ゲームに自己開催レースを開始する際に4数字を入力しなければならず
当然その文字はサイズ及び位置が微妙に変化しキャプチャしたファイルを用意するには
膨大な量になるのですが、、、こういった方法以外で4つの数字を判別して自動的に
入力する様なスクリプトを組むには何か方法はありますでしょうか？
414 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/10(日) 06:03:24 ID:D/A7riMi0]: ０－９９９９まで順番に入力。
415 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/10(日) 06:10:07 ID:K3uOep/x0]: その4つの数字ってテキストじゃなくて画像データなの？
416 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/10(日) 06:47:30 ID:0UNXTb3i0]: 最近いろんなフォームで、画像で数字を表示して「この数字を入力してください」って出るよな。
自動処理よけなんだろうな。
画像の領域さえ分かれば、それをBMPに保存して、OCRソフトに送り込んで…
スゲー面倒くさそう。

こういう不正処理の仕方ばっかり話し合って不正ユーザー御用達ソフトのイメージがついちゃうのもちょっとアレだなあ。
417 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/10(日) 13:32:45 ID:WZj2QqSU0]: 既存のOCRソフトは印刷物とかのフォントが整った文字しか読めないんだよね。
結局自分でプログラム書かないと無理だった。
大学の図書館で画像認識の教科書借りてきたよ。
418 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/10(日) 18:53:40 ID:7pZAjrPi0]: >>415
テキストのような綺麗な文字を大小の組み合わせ4文字にしている画像データですね。

>>416
不正というかこういったツールが無いお陰で過疎化が進んでいて金をがめたい企業が
課金アイテムを更に高額化させて（役所考え的）悪循環を生んでいる状態で
自主開催レースを行うと微々たるアイテムですが手に入るという条件から
一つの防衛手段であり、ハッキングを促すツールではないですしGAMEデータを直接改変
するものでは無いのでユーザーの同士の為なら企業の意思に反しても咎めません特には・・ね。

OCRか・・・
419 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/10(日) 19:26:30 ID:D/A7riMi0]: ていーうかーそれくらい手入力しろよ。
420 名前：ｷﾀ━━━━━━m9( ﾟ∀ﾟ)━━━━━━!! [2006/12/10(日) 19:50:22 ID:kdkSxCJw0]: ＵＷＳＣ　自動化ソフト
　Ver 4.1c 　2006/12/10版　　フリーソフト
[Ver4.1c]
　例外処理構文 Try-Finally, Try-Except を付けた
　SENDSTR関数にてフォーカスが移動するようにした
　IESETDATA関数にて input type="file" タグに文字を送れるようにした
　MSGBOX, FUKIDASI, ログ等のフォントを変更可にした（INIファイルのDefaultFont）
　一部のドロップダウン式のコンボボックスにて内容が変更できなかったのを修正
　FGET, INPUT にて数字の時にゼロの小数点が消える、指数表記になるのを修正

RecIE 　ブラウザ(IE)上の操作を記録
　Ver 1.0a　2006/12/10版　　フリーソフト
[Ver1.0a]
　IELINKにて複数行表示に対応していなかったのを修正
421 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/11(月) 17:44:49 ID:JjGOR1vX0]: str = GetPnirText()
MSGBOX(str)

function GetPnirText()
// 選択文字列を取得（UWSC 4.1c, Sleipnir 1.67 で動作確認）
　　Dim doc, idx, pnir
　　try
　　　　pnir = CreateOLEObj("Sleipnir.API")
　　except
　　　　MSGBOX(TRY_ERRMSG + "<#CR><#CR>" +_
　　　　　　　"<#TAB><#TAB>Sleipnirを起動してから実行して下さい。")
　　　　Result = -1
　　　　Exit // ExitExit
　　endtry
　　idx = pnir.GetDocumentID(pnir.ActiveIndex)
　　doc = pnir.GetDocumentObject(idx)
　　try
　　　　while POS("FRAME",doc.activeElement.tagName)
　　　　　　//msgbox(POS("FRAME",doc.activeElement.tagName)) // デバッグ用
　　　　　　doc = doc.activeElement.contentWindow.document
　　　　wend
　　　　Result = doc.selection.createRange().text // 選択文字列
　　except
　　　　Result = ""
　　endtry
fend

===========================
>>376
//SCKEY(id, VK_ALT, T); SLEEP(0.1); SCKEY(id, W, VK_RETURN)　// *.mht で保存
CLKITEM(id, "Web アーカイブ、単一のファイル (*.mht)", CLK_LIST) //←何故か成功する 4.1c
CLKITEM(id, "保存")
422 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/12(火) 05:19:39 ID:xrHkevWY0]: トライって何?
423 名前：名無しさん＠お腹いっぱい。 [2006/12/12(火) 07:43:07 ID:hRXY00b50]: ＜＜
ありがとうございます。
424 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/12(火) 08:09:05 ID:xAxZUHOq0]: >>423
> ＜＜
?
425 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/12(火) 18:15:36 ID:LtBtwK3a0]: メモ帳が開いていれば以下の動作をする
と言う文を作る場合、式の部分はどの様に書けばいいのでしょうか
すみませんが教えてください。
426 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/12(火) 20:18:36 ID:xrHkevWY0]: while メモ帳が開いていれば()
以下の動作をする()
Wend

Function メモ帳が開いていれば()
Result= getid("メモ帳")>=0
Fend

Procedure 以下の動作をする()
:
Fend
427 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/12(火) 20:21:38 ID:vPJ35X2l0]: //ヤター、ホットキーランチャーもどき出来たよ【CTRL+L】

//ホットキーランチャーもどき.UWS
WHILE 1
　　SLEEP(0.02)
　　IFB GETKEYSTATE(VK_ESC)
　　　　MSGBOX("ホットキーランチャーもどきを終了します。")
　　　　EXIT
　　ENDIF
　　IF GETKEYSTATE(VK_CTRL) and !GETKEYSTATE(VK_ALT) and !GETKEYSTATE(VK_SHIFT) _
and GETKEYSTATE(VK_L) THEN CALL MENU
WEND

//MENU.UWS
DIM PP[]="0. メモ帳","1. 電卓","UWSC"
X=POPUPMENU(PP)
IFB X<0
　　EXIT
ELSEIF X=0
　　EXEC("NOTEPAD")
ELSEIF X=1
　　EXEC("CALC")
ELSEIF X=2
　　EXEC(GET_UWSC_DIR+"\UWSC")
ENDIF

>>425
ヘルプの例の一番あたまにあったと思います。
428 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/12(火) 20:34:05 ID:xrHkevWY0]: 誰かUWSCの基本関数(バージョン1.0からあったようなヤツ)を
VBS用にしたのを公開してくれないか?
対応リストがあるとどっちのユーザにも便利だと思うんだが?
429 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/12(火) 20:43:06 ID:FgZSUGnE0]: そんな便利なものがあったらUWSC必要なくなるな。
430 名前：名無しさん＠お腹いっぱい。 [2006/12/12(火) 21:08:13 ID:I4NEN3JE0]: 質問です。

FOpenで開いたファイルを別名で保存したいのですがFCloseすると上書きになってしまいます。
開いたファイル名+"処理済"として出力したいのですがこういった事は出来ないのでしょうか？
431 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/12(火) 21:09:51 ID:xrHkevWY0]: それでもやっぱりUCSWの法が便利だよ。
ただ、誰かに配る時はVBSにしておいた方が便利だから。
432 名前：名無しさん＠お腹いっぱい。 [2006/12/13(水) 00:29:48 ID:08giVOq70]: >>430
俺も知りたい。
現状doscmdで処理ファイルを別フォルダにコピーしてdoscmdでリネーム、その後処理を行っている。
この方法だとコピー＞読み込み＞処理＞書き出しになってしまう。
コピーする分時間的ロスになるので
読み込み＞処理＞書き出しで出来る方法があれば知りたい。
433 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/13(水) 00:51:10 ID:YBAilhCV0]: >>432
多分close時にﾌｧｲﾙを別名保存は無理なような気がス…
というか、ﾌｧｲﾙのOpen前に
doscmd("copy /y hoge.txt hoge,txt.bak") とかではダメなんか？
434 名前：名無しさん＠お腹いっぱい。 [2006/12/13(水) 01:52:17 ID:Ofnypsy40]: FID1 = FOPEN(ファイル名)
　　STR = FGET(FID1, F_ALLTEXT)
FCLOSE(FID1)

// 処理

FID2 = FOPEN(ファイル名+"処理済",F_WRITE)
　　FPUT(FID2,STR)
FCLOSE(FID2)
435 名前：425 mailto:sage [2006/12/13(水) 01:52:34 ID:XdCi3l4y0]: >>426
>>427
遅くなりましたが有難う御座います。
436 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/13(水) 03:13:53 ID:WrpxBZ3A0]: >>426　ID:xrHkevWY0
「Procedure 以下の動作をする()」でメモ帳を閉じないと悲惨なことになるが…
ケアレスだと信じたい。
なんで while なの？
437 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/13(水) 03:19:04 ID:FjqYCp2T0]: で？
438 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/13(水) 12:03:10 ID:e2lwdiCv0]: >>433
>>434
ありがとうございます。
ファイルサイズが大きい＆多いのでコピーはしたくなかったんです。
確かに>>434のやり方ならロス無いですね。
ありがとうございました。精進します。
439 名前：名無しさん＠お腹いっぱい。 [2006/12/14(木) 10:52:57 ID:b++jM5LY0]: 面白いプログラムだけどWinnyの作者が有罪判決されたしな
プログラムこれから
作りにくい、悪用したやつがわるいと思うが、作った者を悪いとした判決
440 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/14(木) 11:34:27 ID:+YYrk/aI0]: >>439
日本語でおk

あと、京都地裁は ny を作ったことが悪いとは言っていない。
判決ちゃんと読むべき。
441 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/14(木) 14:53:35 ID:4kasxE8b0]: UWSCだっていくらでも悪用できるし、たぶん作者だってそれを認識した上で公開してるでしょ？
他の様々なソフトとその作者もしかり・・・
半ケツをチラっと見たうえで、俺も439と同じように感じた。
442 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/14(木) 15:08:00 ID:F2PcCtXj0]: 良くは知らないけど、
あれの場合は2chで認識してる旨の発言をしてるのが決め手なんでしょ？
少なくともそれすらないのに>>441みたいに「たぶん」なんて理由では裁けないでしょ
443 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/14(木) 23:36:46 ID:mjghHbZ+0]: 使い方を紹介しまくった、某雑誌も有罪にして欲しいです
444 名前：名無しさん＠お腹いっぱい。 [2006/12/14(木) 23:56:24 ID:3Kt7T7f60]: Winnyのにたようなソフトが外国にあったと思うが、その場合どうなるんだろう．

外国人は罰せず日本人だけ罰したら日本のプログラム技術
がどんどん遅れるだろう、
445 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/15(金) 00:03:35 ID:k+l3BTdp0]: ツール自体は白って明言されてるだろ。
446 名前：名無しさん＠お腹いっぱい。 [2006/12/15(金) 08:59:40 ID:Ez6AWitt0]: ツール自体と、その開発行為が白でも、ツールが悪用されるのを認識したうえで、提供を続ければ、
幇助とみなされるってことじゃないの？判決の意味は。

色んなソフトの作者の掲示板に、

「このソフトは、悪用できる可能性がありますが、どうお考えですか？」

とか、

「このソフト悪用しようと思います」

みたいなことを書いてまわれば、次から次へと公開停止になるんじゃまいか？ｗ
447 名前：名無しさん＠お腹いっぱい。 mailto:sage NGWord KBD [2006/12/16(土) 01:29:55 ID:uS95ovKx0]: >>439,444,446
「UWSCの知名度を上げたい」という趣旨は充分承知してます。
しかし、既ユーザーのスレッドに幾ら数多く書き込んだとしても
「状況は何も変わらない」と思えるのは私だけでしょうか？
むしろ現状では逆効果のような気がして成りません。

やはり、ご自分でサイトを立ち上げてUWSCの優位性を
力説された方が最も効果的ではないかと考えています。
あなたはどのように思われますか？

ついでに、余り足跡を残し過ぎない方が安全です。
448 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/16(土) 03:22:04 ID:OQ3z3BDQ0]: ↑意味不明ｗ　誤爆？
449 名前：名無しさん＠お腹いっぱい。 mailto:sage NGWord KBD [2006/12/16(土) 04:45:48 ID:q5NvKemv0]: あ、バカには理解できないかもしれませんね。
450 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/16(土) 08:05:00 ID:bV4BfKKU0]: >>445
> ツール自体は白って明言されてるだろ。
だったら有罪はおかしいだろ。お前もこじつけで逮捕されやがってみやがっれ
451 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/16(土) 14:01:25 ID:3qaG3LqX0]: >>447
日本語でおk

>>450
だから判決文くらい読んでレスしろと。
452 名前：名無しさん＠お腹いっぱい。 [2006/12/16(土) 17:35:17 ID:Qs/JjjiN0]: さて、自作スクリプトを晒していきますよ。最近このツールに嵌ったからな
453 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/16(土) 17:38:45 ID:44Kiz7S30]: >>452
そういう需要はないのでお引取りください。
454 名前：名無しさん＠お腹いっぱい。 [2006/12/16(土) 18:01:52 ID:Qs/JjjiN0]: あーあ萎えたわ
455 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/16(土) 19:05:47 ID:3qaG3LqX0]: >>454
これは素晴らしいスクリプトですね。
目から鱗です。
456 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/17(日) 00:25:01 ID:2fiNqHEX0]: // URLdecoder.uws
URLdecoder = "?:\?????\URLdecoder\urldecoder.exe" //■urldecoder.exe のパス
//--------------------------------------------------------------------
str = PARAM_STR[0]
select str
// case "/s"; str = GetPnirText() // Sleipnir から取得　>>421を利用
// case "/c"; // クリップボードを使う（コマンドラインが不可の場合）
// 　　SLEEP(0.2)
// 　　id = GETID(GET_FROMPOINT_WIN) // タイトル, クラス名を指定した方が安定
// 　　SCKEY(id,VK_CTRL,C); SLEEP(0.1); str = GETSTR(0)
　　case ""; str = GETSTR(0) // パラメータが無ければクリップボードから取得
　　default; str = ""
　　　　for i=0 to RESIZE(PARAM_STR)-1 // スペースで分離した文字列を結合
　　　　　　str = str + PARAM_STR[i]; if PARAM_STR[i+1]<>"" then str = str + " "
　　　　next
selend

ifb POS("%u",str) then // Unicodeタイプならデコードする
　　sc = CreateOLEObj("ScriptControl"); sc.language = "JScript"
　　sc.AddCode("function decodeUni(s){return unescape(s)}")
　　str = sc.Run("decodeUni",str) // %u30E6%u30CB%u30B3%u30FC%u30C9 - テスト用
endif // %E8%87%AA%E5%8B%95%E5%8C%96%E3%83%84%E3%83%BC%E3%83%AB - テスト用

id = GETID("URLdecoder","TMainForm",0.1)
if id<0 then id = EXEC(URLdecoder)
ifb id>0 then
　　CTRLWIN(id,ACTIVATE)
　　ifb str<>"" then
　　　　SENDSTR(id,TRIM(str),1,True)
　　　　SCKEY(id,VK_CTRL,VK_RETURN)
　　endif
endif
457 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/17(日) 00:25:36 ID:2fiNqHEX0]: >>456 URLdecoder.uws
■Jane 派生から実行する時は
実行するコマンド：
"UWSC.exeのパス" "URLdecoder.uwsのパス" "$TEXT$LINK"
としてコマンド登録。

■IEの右クリックメニューから
以下を "URLdecoder.htm" として保存。 IE MenuExt 等でレジストリへ登録。

<html>
<script language="JScript">
// パスの \ は \\ と２個続けて記述（後端にスペース1個有）
var UWSC = '"?:\\?????\\UWSC\\UWSC.exe "'; //■UWSC.exe のパス
var uwsf = '"?:\\???\\???\\URLdecoder.uws "'; //■URLdecoder.uws のパス
//----------------------------------------------
var doc = external.menuArguments.document;
var elm = doc.activeElement;

var str = doc.selection.createRange().text; // 選択文字列
str = str.replace(/^[\s　]+|[\s　]+$/g,""); // 前後の空白を削除

if ((str == "") && (elm.tagName == "A")){ // 選択文字列が無く、リンク上ならURLリンクを取得
str = elm.href;
if (str.match("%") == null){ // UTF8 のリンクはアンエスケープされる
str = escape(str).replace("%3A",":")
}
}
var ws = new ActiveXObject("WScript.Shell");
ws.Run(UWSC + uwsf + str);

</script>
</html>
458 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/17(日) 01:24:09 ID:FBnR/vwV0]: decode(PARAM_STR[0], CODE_URL)
で終了　逝ってよし
459 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/17(日) 04:52:14 ID:E2cqNZWM0]: uwscからAPI利用でキー操作できないのか。。。。
460 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/17(日) 05:25:11 ID:FBnR/vwV0]: >>459
メッセージ送るウィンドウのハンドルさえ分かればできるはずだよ
461 名前：名無しさん＠お腹いっぱい。 mailto:sage NGWord KBD 無関係のレスが有ったら指摘乞 [2006/12/18(月) 00:40:14 ID:30950Apt0]: ttp://pc7.2ch.net/test/read.cgi/software/1156416884/67-69,71-73,77-79,82-84,86,101
ttp://pc7.2ch.net/test/read.cgi/software/1156416884/102,104,126,133-135,136,140,142
ttp://pc7.2ch.net/test/read.cgi/software/1156416884/146,156-157,160,165,169,173-175
ttp://pc7.2ch.net/test/read.cgi/software/1156416884/177,195-196,198,200,206,208,249
ttp://pc7.2ch.net/test/read.cgi/software/1156416884/264-265,275-276,278,282-292,294
ttp://pc7.2ch.net/test/read.cgi/software/1156416884/300,305-306,331,338,341,348-352
ttp://pc7.2ch.net/test/read.cgi/software/1156416884/359,362,366-369,377-378,395,410
ttp://pc7.2ch.net/test/read.cgi/software/1156416884/403-404,406,439,444,446,452,454

＞87,408
462 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/18(月) 01:55:59 ID:b3Wgu4wI0]: >求人
>　UWSCの会社ができました。
>　スクリプトを書く人を求めています（企業からの自動化の案件を受けプログラムを作成）
>　興味のある方、是非ご連絡下さい。

急にスレが伸びたのはこういうことだったのか
463 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/18(月) 02:18:02 ID:i8cgyTWR0]: >>458
残念ですが逝けませ～ん。
【URL】エンコードは、ほとんどが「EUC-JP」>>29 か「UTF8」。
decode()の変換指定が拡張されると良いですね。

s1="%8E%A9%93%AE%89%BB%83%63%81%5B%83%8BUWSC" // Shift_JIS
s2="%BC%AB%C6%B0%B2%BD%A5%C4%A1%BC%A5%EBUWSC" // EUC-JP
s3="%E8%87%AA%E5%8B%95%E5%8C%96%E3%83%84%E3%83%BC%E3%83%ABUWSC" // UTF8
d1=decode(s1, CODE_URL)
d2=decode(s2, CODE_URL)
d3=decode(s3, CODE_URL)
d4=decode(s3, CODE_UTF8)
msgbox("SJIS="+ d1 +"<#CR>EUC="+ d2 + "<#CR>UTF8="+ d3 +"<#CR>UTF8="+ d4)
464 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/18(月) 06:15:12 ID:njPYSj3q0]: >>462
いつの話だよ
465 名前：名無しさん＠お腹いっぱい。 [2006/12/18(月) 10:05:51 ID:oWhwdrgm0]: >>447
www3.bigcosmic.com/board/s/board.cgi?id=umiumi

ここの人？
UWSCが広まらずウィニーの作者が捕まるのは仕方ないのかな

ｳｨﾝﾄﾞｳｽﾞの
ﾋﾞﾙｹﾞｲﾂはエイズの研究費に金を出したりして悪人でないのだろうけど社員がみな善人と言う保証はないもんな、
466 名前：名無しさん＠お腹いっぱい。 [2006/12/18(月) 10:14:10 ID:oWhwdrgm0]: 439と444が同一人物ということがわかるということはUWSCがパソコンの個人情報をぬけるｿﾌﾄということ?
467 名前：名無しさん＠お腹いっぱい。 [2006/12/18(月) 10:25:15 ID:oWhwdrgm0]: umiumiさんが善人なのか悪人なのかがわからんので広めるべきかどうかわからん､
ヨーロッパはLinuxをひろめようとしているし.中国もIBM買収したり
しているからWindowsに
不信感あるんだろうな､民信無くばたたず.
468 名前：名無しさん＠お腹いっぱい。 [2006/12/18(月) 10:33:16 ID:oWhwdrgm0]: 汎く衆を愛して仁に親しむ（多くの人々の幸せを願い思いやる)
が目的ならWindowsが広まることは止めないが､
そうでないなら交通費かけてまで使うもんじゃないね
469 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/18(月) 10:38:18 ID:mfmoIXFm0]: 何この電波レスの嵐
470 名前：名無しさん＠お腹いっぱい。 [2006/12/18(月) 10:53:04 ID:oWhwdrgm0]: マイクロソフトのｰ社独占体制というのがいかんよな.ｿﾌﾄに不正
があってもわかりにくいから､どうも信用されない､平家が横暴なら対抗して源氏がでて､譜代に対抗して外様大名､自民党に対抗して民主党､イスラム教ならスンニ派に対抗してｼｰｱ派
キリスト教ならカトリックに対抗してプロテスタントというのが0Sにも欲しい､マイクロソフト独占体制だもんな､
471 名前：名無しさん＠お腹いっぱい。 [2006/12/18(月) 16:11:44 ID:OQogrX0O0]: 日本のことわざにただより高いもの無し,
472 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/18(月) 18:08:47 ID:0DrUvuEP0]: 俺もこの流れに異様なものを感じた。
473 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/18(月) 20:28:35 ID:G41PQh210]: >>459
できるの！？
474 名前：名無しさん＠お腹いっぱい。 [2006/12/19(火) 12:45:13 ID:KjI/0F620]: マイクロソフト1社独占体制だと

不正があってもチェックが客はしにくい、
自動車会社が
フォード１社だとブレーキが故障
する車を売って客に被害を与えても比較する別の自動車会社
がないため不正をチェックしずらいのと同じ
475 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/19(火) 13:10:32 ID:+uay/HBu0]: クンニ派？
476 名前：名無しさん＠お腹いっぱい。 mailto:sage NGWord KBD が効かないので… [2006/12/19(火) 17:22:02 ID:MKmgxx7j0]: NGEx
タイプ：
NG Addr　正規（含まない）
キーワード：
.←ピリオド１個だけ
ぽっぷあっぷ推奨

とりあえず緊急避難的abn。
477 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/20(水) 22:05:07 ID:QZ1hyQmB0]: //ストップウォッチ(最初の0秒～1秒の長さがランダムなのが課題)
X = GETTIME()
REPEAT
Y = GETTIME()-X
S = Y MOD 60
N = INT(Y/60)
H = INT(Y/3600)
IF S<10 THEN S = "0"+S
IF N<10 THEN N = "0"+N
IF N>59 THEN N = N MOD 60
FUKIDASI(H+":"+N+":"+S,0,0,0,12,"",$00F800,$000001)
SLEEP(0.2)
UNTIL GETKEYSTATE(VK_ESC)
REPEAT
FUKIDASI(H+":"+N+":"+S,0,0,0,12,"",$0FC80F,$000001)
SLEEP(0.2)
UNTIL GETKEYSTATE(VK_ESC)
478 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/21(木) 02:33:27 ID:ZpmcWbzF0]: >>477
分解能が秒単位だからどうしようもないでしょ。
0～1秒をスキップさせたらストップウォッチにはならないし…

X = GETTIME()
while GETTIME()-X <> 1
　　SLEEP(0.1)
wend
X = X+1
479 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/21(木) 05:21:46 ID:MGH4sRj90]: >>463
一部訂正です。
UTF8のところをミスった。
UWSCでのURLデコードは、Shift_JISとUTF8が可能。

s1="%8E%A9%93%AE%89%BB%83%63%81%5B%83%8BUWSC" // Shift_JIS
s2="%BC%AB%C6%B0%B2%BD%A5%C4%A1%BC%A5%EBUWSC" // EUC-JP
s3="%E8%87%AA%E5%8B%95%E5%8C%96%E3%83%84%E3%83%BC%E3%83%ABUWSC" // UTF8
d1=decode(s1, CODE_URL)
d2=decode(s2, CODE_URL)
d3=decode(decode(s3, CODE_URL), CODE_UTF8) // * 修正 *
//d4=decode(s3, CODE_UTF8) // 全く意味がないので削除
msgbox("SJIS="+ d1 +"<#CR>EUC="+ d2 + "<#CR>UTF8="+ d3)
480 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/21(木) 19:53:30 ID:uRAZ97BC0]: >>478
どうも。
なるほど…今度はふきだしの出現タイミングがランダムになるだけで
確かにストップウォッチにはなりませんね。
まあ自分が使う分にはそれでも良いのですけど。
481 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/22(金) 06:41:58 ID:/gikv5V/0]: 自作スクリプト晒す奴ってなにがしたいんだ？
糞ほどにも役に立たないっていうのによ
482 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/22(金) 06:52:14 ID:yJ1KS64a0]: 俺には役立ってるよ。
うｐされるたび毎日使ってる。
483 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/22(金) 06:58:39 ID:Kcn8Xv4o0]: >>1を見れ。ここが何のスレか。
たしかに他人が自分の必要に応じて作ったスクリプトが、そのまま自分の役に立つことは殆どない。
大勢の人間に需要がある機能なら、たいがいフリーの単機能ソフトを誰かが先に作っていて、ベクターなり窓の杜なりを探した方が早い。
欲しいけど自分にしか需要がないような特殊な用途を満たすためにUWSCはあるわけで。
他人のスクリプトが役立つ場合があるとすれば、そこに使われてる技術を理解して、自分がスクリプトを書くとき使う、という場合だけだろう。
そのスクリプト製作技術を学ぶ、という目的のためには、ここよりも、本家掲示板やそこに出入りしている常連の掲示板の方がはるかに役立つのは事実だがね。
484 名前：まとめ [2006/12/22(金) 08:34:27 ID:Xwk1xWxI0]: uwscがパソコンの個人情報を手に入れるソフトなんだから気味悪がって誰も使わないんではないかな
問題なのはＯＳがマイクロソフト1社しかいない独占体制のところ、
ビルゲイツが悪人でなくても、株主や社員に悪人がいない保証はない。

自動車産業にたとえてみれば、フォード1社しかいないと客に危害を加える
自動車を作っても知識の少ない、客は泣き寝入りする。

ここへパリダカールラリーで優勝したトヨタがいれば、欠陥を見抜ける、
ブレーキホースにゴムホースを使って経費削減していたと見抜ければ、
そういう欠陥商品を作ったフォードの責任を客は追及できる。
485 名前：まとめ [2006/12/22(金) 08:38:36 ID:Xwk1xWxI0]: RE:完全に処理が終わったかどうか判定するには？　いりや

これは Downstair を前提にした話 (つまり status(ID,ST_BUSY) の ID は downstair のウインドウ) でしょうか??

DATE：2006/12/21(Thu) 21:41

--------------------------------------------------------------------------------

はい。downstairのIDです。　mikeneco

はい。その通りです。でもなぜソフトがdownstairと分ったんですか？
ダウンローダーは色々あるのに。

DATE：2006/12/21(Thu) 23:44
486 名前：まとめ [2006/12/22(金) 08:42:13 ID:Xwk1xWxI0]: やはりＵＷＳＣは使用者のパソコンの情報が抜き取れるのかあ。
リモートコントロールかprintsc＋Ｆｎかな、隠しファイル機能使ってる？
487 名前：まとめ [2006/12/22(金) 08:49:25 ID:Xwk1xWxI0]: IGなんとかという相手のパソコンを操作できるソフトあったような、
それと関係者かな、

とにかくマイクロソフトの独占体制だと、広まるのに限界あるような気がする
、客は不良品を見抜く知識がない。
パソコンはIBM。シャープ、富士通といろいろあるんだけどOSは1社独占だからなあ
488 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/22(金) 09:24:13 ID:OjPRjtZl0]: >>487
あなたノートPC使ってるね
ちょっと覗かせてもらいました
489 名前：まとめ [2006/12/22(金) 09:45:09 ID:ZpaxbskV0]: やはりウィニーの作者が有罪なのは仕方がないよ。
マイクロソフト独占体制では、利用する客がソフトの不正をわかりにくい
490 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/22(金) 10:00:10 ID:0FrAMZe70]: このスレも末期だな
491 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/22(金) 11:40:46 ID:gV4mdUld0]: 久々に強い電波が
492 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/22(金) 12:53:01 ID:2R60IAFo0]: 等質患者はメンヘル板へ逝け
493 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/22(金) 12:57:19 ID:2R60IAFo0]: >はい。その通りです。でもなぜソフトがdownstairと分ったんですか？
>ダウンローダーは色々あるのに。

直前のスレで自分自身で書いてる。

>DLは「Downstair」というダウンローダーを使うことにしました。（以下略）
494 名前：名無しさん＠お腹いっぱい。 [2006/12/22(金) 14:03:04 ID:1GofhoYH0]: ソフト　の制作会社は．社長が誰だかはっきりしないとトラブルのときのこと考えて
使いにくい、
ｙａｈｏｏは孫社長だったか、２ちゃんねるは、ひろゆき氏、マイクロソフトはビルゲイツ会長とはっきりしている．
495 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/22(金) 15:46:16 ID:9M14q4t50]: >>484 >>486は、uwscがスパイウェア／トロイだという意味ですか？
>>489に、なんでいきなりnyの話がでてくるの？　日本語変だし、意味がいまいち理解できないし・・・

HNに「まとめ」を使うんだから、責任もってまとめてください。
出来れば、Q&A形式で、誰が読んでも理解できるようなのたのんます。
496 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/22(金) 16:01:18 ID:qZX/YtVr0]: >>495
ほっとけ
でも狂おしいほど同意
497 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/23(土) 11:56:02 ID:SqdwFAqA0]: 初心者ですが
ウインドウを端に押し込んだ状態であっても
見えない部分でもいつもどうり処理させる方法ってありませんか？

MouseOrgでも見える部分しかやってくれないみたいなので…
498 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/23(土) 13:51:44 ID:cqwLIQCX0]: >>497
APIでメッセージ送る
499 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/23(土) 15:54:44 ID:SqdwFAqA0]: >>498
メッセージを送るってのを詳しく教えてください＞＜
500 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/23(土) 16:11:46 ID:grXAJPzT0]: >>497
初心者ならsckeyの方が馴染みやすくないか？
501 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/23(土) 16:37:19 ID:SqdwFAqA0]: 画面の色を判別してるんですが
画面に写ってる部分でしか判別してくれなくて…
画面を端っこに追いやっても通常どおり動くようにしたいんです。

あとクリックもするんですけどそのたびにマウスが勝手に動くから
マウスポインタを増やして裏でコンピュータが勝手にやってくれるとかはできないでしょうか？
502 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/23(土) 20:07:03 ID:grXAJPzT0]: >>501
俺はVirtualPC使ってる。
スペックがあるなら試してみては？
ホスト<->ゲスト間で全く干渉無く自動化できるし複数のマシンで同一環境を用意するのも簡単。
503 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/23(土) 20:20:57 ID:grXAJPzT0]: >>501
試してないけど
www.forest.impress.co.jp/lib/dktp/desktop/dsktpextn/vsmanager.html
www.forest.impress.co.jp/lib/dktp/desktop/dsktpextn/windeskwide.html
この手のソフトでデスクトップを仮想的に作ってみるとか。。
それでもマウスポインタは移動してしまう気がするけど。
504 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/23(土) 22:23:56 ID:ztPkPf5i0]: ブラウザに画面が表示されたのを知る方法はあるでしょうか？
（UWSCでキーボード操作させて）自動巡回させてスクリーンショットを取りたいのですが…
505 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/23(土) 23:29:24 ID:vf+OctvP0]: それならスクショをとるソフトをスクリプトで動かした方がいくね？
CrenaHtml2jpg
ttp://dip.picolix.jp/page3.html
Url2bmp
ttp://www.pixel-technology.com/freeware/url2bmp/english/index.html
とか
あとWEBでAPIで提供されてんのもあったような
506 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/24(日) 03:43:27 ID:+S7MD9u60]: >>501
マウスポインタの問題は↓で…
mx = G_MOUSE_X // 移動前のマウスポジションを取得
my = G_MOUSE_Y
MOUSEORG(ID)
　// どこかをクリックしてマウスポインタ移動
MOUSEORG(0)
MMV(mx,my,0)　 // マウスポジションを元へ戻す

>>504
ブラウザ名が不明だけど、ヘルプで
GETID, STATUS, GETITEM 辺りを調べたらどうかな。

書いたスクリプトを晒してくれたほうが話は早いと思うが、
BTN,KBD,MMVの羅列はゴメンだよ！
>>505の方法が適当かもね。
507 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/24(日) 08:34:27 ID:eHbJ4LjT0]: BTN(うるせー)
KBD(タコ)
MMV(うんこ)
BTN(うるせー)
KBD(タコ)
MMV(うんこ)
BTN(うるせー)
KBD(タコ)
MMV(うんこ)
BTN(うるせー)
KBD(タコ)
MMV(うんこ)
BTN(うるせー)
KBD(タコ)
MMV(うんこ)
BTN(うるせー)
KBD(タコ)
MMV(うんこ)
BTN(うるせー)
KBD(タコ)
MMV(うんこ)
BTN(うるせー)
KBD(タコ)
MMV(うんこ)
BTN(うるせー)
KBD(タコ)
MMV(うんこ)
BTN(うるせー)
KBD(タコ)
MMV(うんこ)
508 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/24(日) 13:47:50 ID:85Pm+X4p0]: >507
Syntax Error
509 名前：名無しさん＠お腹いっぱい。 [2006/12/29(金) 22:04:59 ID:3U4V39yi0]: 独自のスクリプトってのが面倒だよねぇ～。
インタプリタ作っちゃう技術力はすごいと思うけどさ。

もっと一般的なスクリプト言語とか、API形式ならいいのに。
510 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/30(土) 11:27:00 ID:/Z9WeWQd0]: インタプリタはそれほど難しくない。
一般的なスクリプト言語とか別に無い。
このスレの最近の状況からするとUWSCはやや一般的になってきてる。
API形式とは何? 意味不明。
511 名前：名無しさん＠お腹いっぱい。 [2006/12/30(土) 12:34:47 ID:ANEL7PPk0]: 覚えちゃえば簡単でも最初の一歩が面倒だなぁ～と。
PythonとかRubyとかWSHとか一般的なスクリプト言語なら、
元々使える人も多いだろうし覚えれば他でも役に立つから、
いっちょ勉強してみようかという気分になるんだけど、
UWSC専用のスクリプト言語だと勉強する気になれなかった。。
俺がヘタレなだけですね・・・すみません。

API形式って書いたのは、VBとかで作った他のアプリから、
UWSCの機能を直接利用できれば便利かなぁ～と思いますた。
512 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/30(土) 13:48:27 ID:/Z9WeWQd0]: >>511
> PythonとかRubyとかWSHとか一般的なスクリプト言語なら、
> 元々使える人も多いだろうし覚えれば他でも役に立つから、

ならそれ使えよ。Win32API用のDLL使えば同じような事が出来る。
そんでもってスレ違いになるだけ。
そもそもUWSCのが簡単だからUWSCなんだろ。
駄目なところは一杯あるがご指摘の点は的外れだと思うね。
513 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/30(土) 13:58:02 ID:SutnxafG0]: 結局一般的なスクリプト言語で～云々言ってる奴は、
一般的なスクリプト言語とやらで同じ物を実装できないから
こんな事言ってるんだろうね。

まぁ、hook dll 書くのは面倒くさいが。
514 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/30(土) 14:35:28 ID:vjHGIByN0]: もしも、UWSCが、独自スクリプトだけでなくVBSにも対応したら、俺は迷うことなくVBSを選ぶけどなｗ
515 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/30(土) 16:18:39 ID:ChwbhOea0]: UWSCは独自スクリプトだからこそ、学習が早いと思うけどな。
Helpの量も少ないし分かり易いし。
516 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/30(土) 16:26:37 ID:63TfBtzq0]: ちゃんとしたリファレンスが整備されないと使う気になれん

あとデバッカがほしい
517 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/30(土) 18:06:19 ID:vJlv9HOx0]: >>511
探したらこんなソフトがあった
DLLとしてC#から利用できるみたいだから、VBからも使えるかも
でも .NET必須ってのが微妙…

WindowController
ttp://www.vector.co.jp/soft/winnt/util/se418029.html

最終的にUWSCを使うにしても、制御対象の解析に便利っぽい
てか、これの操作記録機能すごくね？
518 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/30(土) 18:27:29 ID:/Z9WeWQd0]: >>514
VBSに対応って何?
VBSを迷わず使うって事はUWSCをWSHに対応って意味じゃないよな?
正直ぜんぜんスレ違い。WSHでWin32API呼び出すDLL使えよ。
最近のUWSCが妙に凝ってきてるからこういう考えが出て来るんだよな。
COM対応辺りからおかしくなってきた。
519 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/30(土) 18:56:48 ID:vJlv9HOx0]: UWSCに対する意見や期待は、スレ違いなんかじゃないのでは？
君がプチキレて的外れな揚げ足取りしてる理由がわからない。
520 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/30(土) 19:02:33 ID:vJlv9HOx0]: ごめん。俺もちょっと喧嘩腰だね。いろんな意見があってもいいんじゃないかなと言いたいだけ。年末に喧嘩（・A・）ｲｸﾅｲ
521 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/30(土) 19:43:40 ID:xZEP9LDN0]: こちらも言い過ぎた、すまない。
522 名前：名無しさん＠お腹いっぱい。 mailto:sage [2006/12/31(日) 00:05:12 ID:GUv77j/A0]: 年末も年始関係無い。
いろんな意見があっていいのは当然だが
それが的外れかどうかはそれとはまた別。
523 名前：名無しさん＠お腹いっぱい。 mailto:sage んじゃここらで気分転換 [2006/12/31(日) 00:51:34 ID:bUzWRwUR0]: s1 = "<#CR>　<#CR> <#TAB> UWSC Ｕスクリプト　<#CR><#TAB>　 <#CR>"
s2 = TrimJS(s1); msgbox("使用前=("+ s1 +")<#CR><#CR>使用後=("+ s2 +")")

function TrimJS(str) // 全角スペース対応TRIM (JScript)
　　sc = CreateOLEObj("ScriptControl")
　　sc.language = "JScript"
　　sc.AddCode("function t(s){return s.replace(/^[\s　]+|[\s　]+$/g,'')}")
　　Result = sc.Run("t", str)
fend
-----------------------------------------------------------------
// Ｕスクリプトだけの時は…
function TrimU(str) // 全角スペース対応TRIM (UWSC 4.0～)
　　str = TRIM(str)
　　while str<>""
　　　　ifb POS("　",str)=1 then
　　　　　　str = TRIM(COPY(str,2,LENGTH(str)-1))
　　　　elseif POS("　",str,-1)=LENGTH(str) then
　　　　　　str = TRIM(COPY(str,1,LENGTH(str)-1))
　　　　else
　　　　　　Break
　　　　endif
　　wend
　　Result = str
fend
-----------------------------------------------------------------
// …んで、いろいろ弄っているうちに、こんな事に…
// CHGMOJ がグローバルな置換をするとは今の今まで全く気付かなかったorz
// 文字列中の全角スペースを半角にしてしまうのでTRIM互換とは言えないけど。

s1 = "<#CR>　<#CR> <#TAB> UWSC Ｕ　スクリプト　<#CR><#TAB>　 <#CR>"
s2 = TRIM(CHGMOJ(s1,"　"," ")) //■全角スペース対応TRIM擬
msgbox("使用前=("+ s1 +")<#CR><#CR>使用後=("+ s2 +")")
524 名前：名無しさん＠お腹いっぱい。 [2006/12/31(日) 00:53:47 ID:JE6fLdkp0]: 喧嘩すんなよ。
525 名前：名無しさん＠お腹いっぱい。 [2006/12/31(日) 10:50:35 ID:QsbDX1sl0]: >>517
これいいね。開発の助けになる。
あとはウインドウメッセージをモニターできれば最高なんだが。

みなさんは、UWSCでの開発の補助にどんなソフト使ってますか？
自分はWinspector使ってます。spy++みたいにウィンドウの構造を見たりメッセージをモニタできます。
ttp://www.windows-spy.com
526 名前：【中吉】【1049円】 mailto:sage [2007/01/01(月) 00:15:35 ID:4F92swbf0]: 今年もUWSCにはお世話んなりますわ。
527 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/01(月) 04:14:01 ID:Yovlgfkv0]: // madocon.uws
if GETID("窓コン","#32770",0.1)>0 then ExitExit
MadoCon = "MadoCon.exe" //■MadoCon.exe のパス
x = 365; y = 461 //■表示位置
idm = EXEC(MadoCon,False,x,y)
CLKITEM(idm,"作成",CLK_BTN)

idn = GETID("新規作成","#32770")
CLKITEM(idn,"コマンド",CLK_LIST)
CLKITEM(idn,"取込み",CLK_BTN)

while GETID("取り込み","#32770",0.1)>0; SLEEP(0.1); wend
while GETID("新規作成","#32770",0.1)>0
// wtitle = GETSTR(idn,1) // タイトル
// wclass = GETSTR(idn,2) // クラス
　　wparam = GETSTR(idn,3) // パラメータ (コマンドID)
　　if wparam="" then Break
　　SLEEP(0.1)
wend
if wparam<>"" and GETKEYSTATE(VK_CTRL) then SENDSTR(0,wparam) // クリップボード
CTRLWIN(idm,CLOSE2) // ダイアログが出ていてもメインウインドウを閉じる
528 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/01(月) 05:41:16 ID:HgQCbgDB0]: ウィンドウの情報はWinmapでメッセージはSPY++かな?
あと窓コンも。
WinspectorとかSystree++とかも試した痕跡があるけど使って無いな。
たぶんなんか不都合があったのかSpy++があるからかだと思うが。
spy++ to MsgIDってのもあるけどこれ何だっけ?

※UWSCはやたら拡張するよりこの手のツールと統合化した方がいいと思うよ。
529 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/01(月) 10:28:17 ID:Y8saALnE0]: 文字の数、色、太さで識別して指定した場所をクリックさせることは可能？
530 名前：名無しさん＠お腹いっぱい。 [2007/01/01(月) 10:59:06 ID:4ne/Fmdr0]: これは、エスパー待ちだな。
531 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/01(月) 20:00:27 ID:HgQCbgDB0]: >>529
その前にそれをやるとどこがどう気持良いのか書けよ。
532 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/02(火) 00:51:03 ID:bFlzVkGw0]: >>529
俺なりにエスパーした結果、やって出来ないことはないかもしれないけど
自前でソフト作ったほうが早いという結論が出たぞ。
533 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/02(火) 03:28:00 ID:SqVYKNkF0]: プロセスのメモリを簡単に操作できるというMemory.dllをUWSCで使おうとしたのですが、
戻値が正しく出力されません。

def_dll ReadMemory(string,int,int,int):Memory.dll
pname="UsaTest2.EXE"
adr=00402148
rdata=0
ReadMemory(pname,adr,rdata,2)
msgbox(rdata)

どうやったらrdataに戻値を入れることが出来るでしょうか？

Memory.dll
www.vector.co.jp/soft/win95/prog/se358509.html
UsaTest2.EXE
www.vector.co.jp/soft/win95/prog/se375830.html

よろしくお願いします。
534 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/02(火) 06:28:18 ID:v+0SAelo0]: >>533
これは勘だが、第三引数は参照渡しするべきじゃないか?
535 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/02(火) 13:32:23 ID:f/EOdE580]: id= getid("●×","▽□")
Ver1.xの頃から思っていたがこれはやめたほうがいいよな?
見つけたウィンドウの寿命なんて保証が無いんだし。
俺は殆どのスクリプトでターゲットウィンドウに何かする時に
いちいちgetidでさがしなおしている。つまりsenstr(id,xxx)とか
idを引数に取っている関数は全てラッパをかけている。
autoitなんかもいちいち検索するようになってるみたいだが
uwscのこの点は根本を直して欲しい。
例えばターゲットディスクリプタみたいのを用意して
target= maketarget( ウィンドウタイトル、クラス名、その他もろもろ）
とかでターゲットハンドルをつくってあとはそれでコントロールするとか
そんな感じにすべき。
536 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/02(火) 14:04:08 ID:sr7fsaDq0]: >idを引数に取っている関数は全てラッパをかけている。

すまんラッパーの意味が分からんので教えて頂けますか？
537 名前：533 mailto:sage [2007/01/02(火) 14:13:57 ID:SqVYKNkF0]: >>534
回答ありがとうございます。
解説サイト読んでみて一行目を
def_dll ReadMemory(string,int,var int,int):Memory.dll
この様に書き換えたのですが、やはり値が反映されません。
どこか間違えているのでしょうか？
538 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/02(火) 14:34:07 ID:f/EOdE580]: >>536
ラップ流行ってるから知ってるだろ?
それともオッサンか?
539 名前：533 mailto:sage [2007/01/02(火) 14:34:30 ID:SqVYKNkF0]: すみません試行錯誤した結果、自己解決してしまいました。
三行目の
adr=
の後に$をつけるのを忘れていました。
540 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/04(木) 12:07:57 ID:CRC0/rhe0]: x+y (x,yは任意の自然数)
このような形で書かれた文字列があるとします
この時、xだけを数値として取り出したいのですが、どうしたらよいのでしょうか？
C言語で書くとするとこんな感じのことをやりたいのですが

while(str[++i]!='+');
str[i]='\0';
atoi(str);
541 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/04(木) 13:37:24 ID:CDtr7kFp0]: >>540
//　文字列に指定文字列があるか探す
戻値　=　POS( 探す文字,　探される文字列,　[n個目] )

//　文字列コピー
戻値　=　COPY( 文字列,　開始位置,　コピー文字数 )

//　文字型を数値に変える
戻値　=　VAL( 文字列 )

これで適当にやってちょ
542 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/04(木) 13:43:59 ID:CRC0/rhe0]: ありがとうございます
543 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/04(木) 14:12:24 ID:NfNDeecx0]: >>540
'+'が固定ならTOKENで良いのでは？
544 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/04(木) 15:45:22 ID:CDtr7kFp0]: //　トークンの切り出し（指定文字で区切ったものを返す）
戻値　=　TOKEN( 区切文字,　var 文字列,　[ 区切方法,　ダブルコーテイションフラグ ] )

で一発だったね
545 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/05(金) 10:42:25 ID:VyUiwUts0]: 数字をJISとかのの数字の文字に直すにはどうしたらいいですか？
１０だと31　30のようにしたいのですけれども
546 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/06(土) 00:24:00 ID:A77H/DD/0]: >>545
a = "１０"
c = ""
for i=1 to length(a)
　　c = c + format(asc(strconv(copy(a,i,1),sc_halfwidth)),1,-1)
　　if i<length(a) then c = c + " "
next
msgbox(c)
547 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/06(土) 13:55:55 ID:/QWIOIEx0]: リストボックスの値をCLKITEMを使って変更しようとしても変更されないことがあります
というより「見かけ上は変化しているが、実際は変化していない」といった感じです
例えば下のようなリストボックス・ボタンがあったときに左を選択しようとすると、
見た目は左に変わるのですが、実行ボタンをクリックした時の動作は上のままなんです
そのリストボックスはCLK_ACCを使わないと動かない、マウスを上に乗せないと見た目すら変わらない、
というようにいくらか不可解な動作をしています
関係ないのかもしれませんが、何かの参考になれば

上▼ ｜　　[実行]
上　　｜
下　　｜
左　　｜
右　　｜
――┘
548 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/06(土) 18:37:25 ID:Cxfu2A0o0]: >>546
サンクス天才！
549 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/08(月) 11:33:30 ID:4gmlHrqp0]: 全画面表示してるときに、スクリプトによっては必ず画面が切り分かるのとそうでないのがあるんですけど
なぜですかね？？
550 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/09(火) 00:27:13 ID:gU8Ryzlh0]: エスパー待ちだな
551 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/10(水) 00:05:07 ID:ua/+mf/b0]: >>549
全画面表示してるときに、スクリプトによっては必ず
画面が切り分かるのとそうでないのがあるからだろ。
？？
552 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/11(木) 15:46:47 ID:3AaqofY20]: ローカルのIPをuwscで取得するにはどうすればいいですか？
553 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/11(木) 23:52:48 ID:WqkycWkF0]: ipconfig
554 名前：sage [2007/01/12(金) 01:23:04 ID:ThZzr6Oc0]: UWSC使ってみようと思いましたが

エクセルで　c:\tes.xls　を開き方がわかりません
どうやるの？
555 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/12(金) 14:20:29 ID:yd7QDL2U0]: doscmd("c:\tes.xls")
556 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/14(日) 01:34:27 ID:beBI/GOV0]: >>555
どうもありがとうございました。
557 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/14(日) 04:11:13 ID:x3aoKvoK0]: https://ssl.gcrest.com/k-den/free_regist.htm
こちらのソフトウエアなんですが、定時に異なるIDで多重起動させ
既存のUWSファイルで馬券購入を自動で行わせる方法など
「私なら出来ますよ」という方、「アイデアなら思いつきます」という方
いらっしゃいませんか？
558 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/14(日) 09:54:17 ID:im1/hPU60]: >>557
> 「私なら出来ますよ」
で、いくらくれるの?
559 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/14(日) 12:25:50 ID:TMgxZHyJ0]: ＵＷＳＣの会社が出来てます。
560 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/14(日) 14:38:31 ID:vP4ye07F0]: マウス左を下ろしているときに連打するってスクリプトを作りたいのですがうまくいきません。
while true
ifb BTN(LEFT) = 1 then
BTN(LEFT,click,1)
BTN(LEFT,click,1)
BTN(LEFT,click,1)
BTN(LEFT,click,1)
BTN(LEFT,click,1)
BTN(LEFT,click,1)
Exit
endif
wend
これでやるとずっとクリックし続けます（左クリックしてなくても）

アドバイスお願いします。
561 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/14(日) 15:55:55 ID:ZUVXcmxo0]: >>560
BTN(LEFT)の比較の際にクリックされてる
while true
BTN(LEFT)
wend
これを実行してみろ
で、そもそもBTN()はボタンを押す関数であって、ボタンの状態を知るための関数じゃない。
そのための関数はGetKeyState()、これを使えばうまくいく。
562 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/14(日) 17:09:44 ID:vP4ye07F0]: ifb GETKEYSTATE(BTN(LEFT,down))
構文がミス・・・これでもダメなようです・・・

勉強してきます；；
563 名前：名無しさん＠お腹いっぱい。 [2007/01/14(日) 18:15:09 ID:uoqeTuE50]: >>562
ifb 使ってるんだから条件を書かなければいけないでしょ。
ifb GETKEYSTATE(BTN(LEFT,down))=1
とか。
564 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/14(日) 18:28:32 ID:gkw6cH5c0]: >>560-563
レベル低すぎ
565 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/14(日) 18:29:50 ID:mLbNjCsz0]: getkeystateにはvk_で始まる仮想キーしか渡せないんじゃなかったっけ？
左クリックの仮想キーはヘルプの一覧には見当たらなかった。
諦めて
if getkeystate(vk_alt) and getkeystate(vk_c) then btn(left,click,1)
とかにするしかないかもしれない。
566 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/14(日) 19:48:15 ID:l0qXvX3Z0]: 仮想キーって名前判ってるならググればすぐ判りそうなもんだけど…
VK_LBUTTON ($1)
567 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/14(日) 22:24:57 ID:TMgxZHyJ0]: ゲームでイライラしている子供に熱心に教えるなんてエエハナシヤ（ ´Д⊂
568 名前：名無しさん＠お腹いっぱい。 [2007/01/15(月) 02:43:47 ID:xk6goVHU0]: [1]キーを１.0～2.0秒(0.1秒単位のランダム)で押すのを繰り返す
を作ってくれん？
569 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/16(火) 01:38:38 ID:47Ugvl4S0]: このソフトはフルスクリーンのゲームも操作できるんでしょうか？
570 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/16(火) 02:00:34 ID:47Ugvl4S0]: 止め方教えてｋづあさい
571 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/16(火) 02:45:07 ID:aGcj4GdP0]: Alt + F2
572 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/16(火) 23:37:14 ID:XqBFUv3j0]: >>568
レベル低すぎ
573 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/16(火) 23:37:44 ID:XqBFUv3j0]: >>569
できるよ。相対座標使えばどうとでも
574 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/20(土) 01:24:34 ID:zDsd7Kso0]: ヘルプ見たけど
スクランブルのかけ方がわかりませんでした
よかったら教えてください
575 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/20(土) 06:15:44 ID:EgRjIOdf0]: 俺はスクランブルというコピーに引かれ
スクランブルになるためにはどうすればよいのか考えた
スクランブルなのだからどんなこともできる
手始めに全裸で姉の部屋にアンゲロ、アンゲロとつぶやきながら飛び込む
タンスをこじ開けブラジャーを腰に巻きパンティーを頭にかぶる
姉が呆然としながら見てくるがスクランブルなので気にしない
姉のベッドに潜りこみ「幸せだから！幸せだから！」と絶叫
姉は無言で部屋から立ち去る
だがまだ最強には不十分
次は妹の部屋にムッシュムッシュと叫びながら飛び込む
妹は着がえをしている最中だったがスクランブルなので無視
半裸で逆立ちをしながら
「俺に充電しろ！！俺に充電しろ！！」と絶叫
妹は大泣きで退散
確実にスクランブルに近づく
開脚後転でトイレに飛び込み便座を外し首に掛ける
ゾンビの真似をしながら母の部屋に突撃
タンスを開けると一枚の写真発見
死んだ親父が俺を抱いている写真発見
俺は泣いた
576 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/20(土) 13:23:40 ID:rqmoT2lU0]: ヒント・・コマンドプロンプトでパス指定　　/a
でスクランブルかけれる
577 名前：名無しさん＠お腹いっぱい。 [2007/01/20(土) 19:05:25 ID:uRMPRV7/0]: ぜんぜんわからないんだけど、vbスクリプト（wsh？）とどっちがいいのかな。
どっちか勉強しようかとおもってるんだけど、、、
エクセルとIEを連携させていろいろしたいんだ。
578 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/20(土) 20:24:51 ID:RFPdD2MV0]: >>577
VBAでいいじゃん
579 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/21(日) 05:22:39 ID:Q4nEdwmO0]: >>577
初めて勉強するならWSHがおすすめ。何よりも資料が豊富。
UWSCの書式は(VBS+JS)/2+αって感じだから… >>376

エクセル使いなら>>578が適当かも。
580 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/21(日) 22:12:07 ID:YnB2PVtI0]: IE_SelectItem(1, "Tag='A',LinkText='文字列'")
IE_ItemProc(1, "CLICK", "")

IEとあるページで
<td width="30%"><a href="URL">文字列</a></td>
の「文字列」のところをクリックしたいんだけど
どうしてもできないので手助けお願いします。

エラー内容
IE_SelectItem の引数の形式が不適切です。
「'」が多すぎるか「,」が少なすぎます。
該当箇所： Tag='A',LinkText='現物買'

www.icnet.ne.jp/~supreme/IE_HowToUse.html
ここの例が間違ってるの？
581 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/21(日) 22:33:46 ID:YnB2PVtI0]: ついでにこのエラー
//
でコメントにしても
同じエラーになる
582 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/22(月) 01:27:03 ID:iOAPnPki0]: >>580
UWSC Ver4～には対応してないらしい。
そのサブルーチンを使わなくても標準でできる。
ヘルプを見よう。

IE = CreateOLEObj("InternetExplorer.Application")
IE.Visible = True
IE.Navigate("????/????/") // ←アドレス
while IE.Busy or IE.ReadyState<>4; SLEEP(0.1); wend
IELink(IE,"現物買") // ←クリックするリンクの表示文字
583 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/22(月) 01:34:13 ID:pabBt9LS0]: ielink(IE,"文字列")
じゃダメなの？
584 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/22(月) 03:05:22 ID:a8PeaC4D0]: >>582 >>583
ありがとうございます
再度書き直してみます。
585 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/22(月) 05:37:39 ID:a8PeaC4D0]: また行き詰ったorz
超速マクロテクの例ではフォーム要素名指定での入力は
うまく入力できるんだけど
Eトレサイトではなぜか
フォームへの入力ができない
IE.document.trg.price.value = "100"
エラー
Uスクリプト com_error
IE.document.trg.price.value = "100"

ここでは要素名では使えないってことなのかな？
586 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/24(水) 16:28:19 ID:UY8qL/2O0]: 特定ウインドウの文字列を取得したい場合、OCR機能を外部から取り入れて
入力欄にその取得文字列をインプットする様なコマンドってわかります？
587 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/24(水) 16:41:18 ID:oOdl/NuF0]: 日本語でおｋ
588 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/24(水) 16:55:36 ID:Tu3OEDDA0]: >>586
INPUT( 表示メッセージ,　[デフォルト値])
デフォルト値に取得した文字列（もしくはその変数）
589 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/24(水) 19:43:58 ID:QNCrSZg7O]: リストビューの項目を選択するのを自動化したいんですが
ClkItem(id,"リストビュー項目",CLK_LSTVEW)
で、できないんですけど間違ってるんですか？選択したいのはインターネットブラウザの項目なんですが、
ClkItem(id,"リストビュー項目",CLK_ACC)だとできるんです。
ただこの場合リストビュー上にマウスを持っていかないと変わらないんです。
インターネットブラウザのリストビュー項目を自動選択するにはどうしたら良いですか？
590 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/25(木) 17:58:40 ID:r0DwPlYF0]: www.k-den.jp/
このネットゲームのフリレ自動化のプログラムが組める方がいらっしゃれば、お願いしたいのですが？
登録などは無料となっております。
591 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/25(木) 23:41:51 ID:XH7KwjZi0]: ＞お願いしたいのですが
いくらぐらいで？
592 名前：名無しさん＠お腹いっぱい。 [2007/01/26(金) 13:41:53 ID:Pav5kCE90]: c=peekColor(55,28)
ifb G_赤(c)<127
print "OK"
Else
endif

function　G_赤(c)
　　Result　=　c　and　$FF
fend

これのG_赤(c)<127 の部分が良く分からないのですが
何方か解説してくれませんか？
593 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/26(金) 15:26:52 ID:L9rKW3Kv0]: あまり赤くなければ
ってこと
594 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/26(金) 17:08:03 ID:gpe3xmDS0]: 横からで申し訳ない。
Result　=　c　and　$FF　の 'and'　ってどういう計算だろ？
考えてたら訳わかんなくなった…
595 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/26(金) 17:30:52 ID:L9rKW3Kv0]: >594
ビット積やね。
論理積のandとは意味が違うので注意
596 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/26(金) 17:35:37 ID:L9rKW3Kv0]: 本家ＢＢＳ過去ログより
www3.bigcosmic.com/board/s/board.cgi?id=umiumi&mode=all&no=26&log=ON&cnt=1
597 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/26(金) 17:36:10 ID:P2hWYSFw0]: peekcolorの返り値は、ＲＧＢ、16進数でＢＢＧＧＲＲで入ってるから、c and $ff0000 で　青、　c and $00ff00 で緑、　c and $0000ffで赤の値が取り出せる
ヘルプに書いてあるがな
598 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/26(金) 17:37:01 ID:gpe3xmDS0]: >>595
おぉ　即レスさんくすです。　ひとつ賢くなった…
599 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/26(金) 18:39:02 ID:76a1bqKG0]: BGRなんだ。。なんで青とってるのに関数名が赤なのかと悩んだｗ
600 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/26(金) 21:50:39 ID:IQwz3Hx50]: >>591
ただでお願いします。
無理言ってすいません。
601 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/27(土) 11:43:07 ID:G4PUCkhd0]: いや、言うのは自由だから。
602 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/27(土) 14:41:39 ID:doRzyfmA0]: //基本的なことをやってみました
id = status(getid("Microsoft Internet Explorer","IEFrame",0.02),st_title)
ifb id = "";fukidasi("ページがありません");for x=1 to 5;sleep(0.2);next;exit;endif
IE = GETACTIVEOLEOBJ("InternetExplorer.Application",id)
Name = IE.LocationName
URL = IE.LocationURL
//IE.Quit
WSH = CREATEOLEOBJ("Wscript.Shell")
Path = WSH.SpecialFolders("Desktop")
Link = WSH.CreateShortcut(Path+"\"+Name+".url")
Link.TargetPath = URL
Link.Save
//fid=fopen(Link.FullName,f_read or f_write);fdelline(fid,3);fclose(fid)
603 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/29(月) 22:05:37 ID:fcyz6KYn0]: ヘルプを参考に「最小化」ボタンをグレーにしてみようとしたのですが、上手くいきません。

DEF_DLL ModifyMenuA(HWND,Long,Long,Long,Long):Long:user32.DLL

MF_GRAYED = $1
SC_MINISIZE = $F020

id = exec("notepad")
hwnd = GetCtlHnd(id,GET_SYSMENU_HND)
ModifyMenuA(hwnd,SC_MINISIZE,MF_GRAYED,0,0)

どこがおかしいのでしょうか。。。
604 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/30(火) 19:14:54 ID:C9/gwCO90]: すみません、教えてほしいのですが

MojiRetsu = "abcdefg"

を一文字づつ取り出して、文字の処理をしたいのですがUWSCではどのようにすればいいのでしょうか？

VBの場合

for i = 1 to Length(MojiRetsu)
　　txt = mid(MojiRetsu, i, 1)
もしくは
　　txt = Right(Left(MojiRetsu, i),1)
　　.... 処理....
Next

でとりだせるはずですが、UWSCの場合の処理を教えていただけませんか？

よろしくお願いします。
605 名前：604 mailto:sage [2007/01/30(火) 19:28:38 ID:C9/gwCO90]: すみません、自己解決です。
ヘルプをよく読んでませんでした。

COPY関数がMIDに相当するものだったんですね。
COPYですから、文字列の単純コピーだと思い込んでました。

すみません。
606 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/01/30(火) 22:14:21 ID:IHRQvlYn0]: >>603
グレーにはならないけど、無効状態にはなってるね。
「SC_MAXIMIZE = $F030」も試してみたが同じだった。

「MF_DISABLED = $2」の挙動みたいだが？
API使いの光臨を待とう…
607 名前：603 mailto:sage [2007/01/31(水) 00:09:22 ID:ylP9utd10]: >>606
返答ありがとうございます。

そのような場合には最後に
acw(id,status(id,st_x),status(id,st_y))
を書き足してウィンドウの再描写をすれば解決しそうですが、
自分の環境では最小化ボタンの無効化が行われません。
左上のプログラムのアイコンをクリックする事によって出てくる
ポップアップメニューからは「最小化」が削除されているし、
ModifyMenuの戻値は1なのですが。。。
自分はXPなのですが、環境によって違うのでしょうか。
608 名前：名無しさん＠お腹いっぱい。 [2007/02/01(木) 04:05:02 ID:C4wyYcBXO]: 天才にご指導願いたい。

指定したウィンドウに画像で４桁の数字がランダムに何種類か表示される。
このウインドウの数字を解析し、テキストボックスにその答えを打ち込みたい。

こんなものはマクロで出来ますか？

できるなら式を教えてください。
609 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/02/01(木) 08:50:32 ID:cGUezFrd0]: OCRでぐぐって少し考えてみろ
610 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/02/01(木) 21:02:52 ID:S0Ax5EkM0]: 特定のフォントでいいならAUTOITのOCRスクリプトが公開されている。
特定フォントの数字だけならUWSCでも簡単だろ。
611 名前：名無しさん＠お腹いっぱい。 [2007/02/02(金) 02:12:12 ID:jlqlXg/70]: UWSCでは指定ウィンドウに表示されている画像を解析し、その画像に表示されている数字を解析後にテキストボックスに打ち込むなんて事は可能でしょうか？
612 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/02/02(金) 02:20:36 ID:zIadodU90]: >>611
どこのサイトのどんな画像？
613 名前：名無しさん＠お腹いっぱい。 [2007/02/02(金) 02:35:07 ID:jlqlXg/70]: >>590であがっている
ネットゲームのレースキー入力ウィンドウなんです。
ウィンドウ内に画像が表示され、その表示されている数字を打ち込まないとレースが開始されない。
この面倒な作業を無人で行えないものかと思いまして。

以前はUWSCでマクロのみでレースが発走できたのですが、今はキーを打ち込むという作業が追加されてしまいまして、
その作業がみな面倒だというのでなんとか作れないものかと思い。
このようなスレを見つけ、詳しい皆様に教えを乞いたいです。
614 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/02/02(金) 16:40:42 ID:qRWklRGG0]: なんのためにそういう面倒な処理が追加されたと思う？
マクロ蔓延への対策だよ
このスレ読んでできないようならあきらめたほうがいい
615 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/02/02(金) 17:17:28 ID:O3A6Wfi+0]: つまり作る技術も知識も無い奴しかここには居ないってことさ
616 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/02/02(金) 17:39:12 ID:K3C4+/Yt0]: どこもタチの悪い質問が増えてるな
617 名前：名無しさん＠お腹いっぱい。 [2007/02/02(金) 22:03:28 ID:NWOMEjb/0]: IE.Navigate("ameblo.jp/ore-dayo/", 0, null, 1, "Referer: ameblo.jp/ka-chan/\r\n");
こういう感じで実行しても、表示はするけどリファラが残りません＞＜
誰かリファラの残し方教えてください
618 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/02/03(土) 00:44:28 ID:rAFsDkfj0]: 本日、ｸｿｯﾀﾚなWORDファイルの整形に大活躍しました。

特定の文字列を検索
→インデント指定

コレをループさせてずいぶん楽できた。
手の操作をエミュレートしてるだけだから、失敗してもCtrl+Zで気楽に戻せるのがいいな。
619 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/02/03(土) 01:39:52 ID:jgpOFn4V0]: >>617
"\r\n" → "<#CR>"
620 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/02/04(日) 16:33:00 ID:wsNHttRV0]: 赤に近い色がある場所を取得したいのですが、どうやったら出来ますか？
chkimgだと～に近い色という設定が出来ず、peekcolorで1ドットずつ調べるのは重いので。。。

while true
for i=0 to g_screen_w
for j=0 to g_screen_h
c=peekcolor(i,j)
red=c and $FF
green=(c and $FF00)/$100
blue=(c and $FF0000)/$10000
if red>$F0 and green<$10 and blue<$10 then print i+","+j
next
next
sleep(0.1)
wend

peekcolorを使うとこんな感じですが、重すぎてまともに動きません。
621 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/02/04(日) 23:29:19 ID:AZ3768rq0]: 対象物がどういう画像かにもよるけど
まずはchkimgで色無視で探して
見つかったらその部分だけに範囲を絞ってpeekcolorで色判定するとか。
あと赤に近い色ならR成分だけの比較でよくね？
速度的には改善されると思う。

peekcolorでやるなら走査を1ドットずつじゃなくて例えば10ドット間隔にするとか。
美術品とかの防犯用赤外線センサーみたいなイメージ。
ただ対象物があまりに小さいと見逃すかも。
622 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/02/04(日) 23:38:08 ID:acEjdmZB0]: R成分だけだと白とかもヒットしてしまうから無理でしょう
>>620
速度求めるならCなりでDLL作って、画面キャプチャ→クリップボード内の画像を走査　が速そう。
623 名前：620 mailto:sage [2007/02/05(月) 00:27:24 ID:R6II9j8F0]: >>621,622
レスありがとうございます！

>>621
赤っぽい物体がランダムな形で表示されているので、色無視は無理です・・・
調べる間隔を離すのは試してみます！

>>622
やはりUWSCだけでは難しいですか・・・
コンパイラ形式の言語はまだよく分からないのですが、これから勉強してみます！
624 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/02/05(月) 00:42:36 ID:2cLewcZO0]: >622
おっと、確かにそうでした…<白とかもヒット

とりあえずpeekcolorでやってみたけど
うちの環境(1280*768)でループ一回まわすのにかかったのが「3分19秒78」
こりゃ確かに使い物にならん…

色判定部分を工夫して
if (c and $f0f0f0) = $f0 then print i+","+j

これで速度５０％ほどアップして「2分2秒422」

あとは走査をxy両方10ドット間隔にして「1秒297」
これならまあなんとか使い物になるかも？
625 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/02/05(月) 01:02:44 ID:2cLewcZO0]: 追記

c=peekcolor(i,j)

//↓削除ここから
//red=c and $FF
//green=(c and $FF00)/$100
//blue=(c and $FF0000)/$10000
//if red>$F0 and green<$10 and blue<$10 then print i+","+j//→3分19秒78
//↑削除ここまで

if (c and $f0f0f0) = $f0 then print i+","+j//→2分2秒422
626 名前：620 mailto:sage [2007/02/05(月) 01:25:03 ID:R6II9j8F0]: >>624
そういうやり方もありましたか。
参考になります。

このスレにはやさしい人が沢山いて助かります。
ありがとうございました。
627 名前：('A`)ﾏﾝﾄﾞｸｾ ◆2zoWxZ0KXY mailto:sage [2007/02/06(火) 10:14:23 ID:N8aNtigh0]: 口癖とかｗｗｗｗｗｗｗｗｗｗｗｗ
628 名前：名無しさん＠お腹いっぱい。 [2007/02/07(水) 23:40:57 ID:NIA0HC/g0]: すみません、初心者なのですが、
ゲーム上で使う時は

While True
KBD(VK_XXX,DOWN,0)
KBD(VK_XXX,UP,0)
KBD(VK_YYY,DOWN,0)
KBD(VK_YYY,UP,0)
SLEEP(12)
Wend
(VK_XXX、VK_YYYは何かしらのボタンです)

を記述したものを再生するのみでは繰り返さないのでしょうか？
試してみたところ、1回行った後ゲーム上では繰り返しませんでした。
ゲーム上でなければ問題なく繰り返しの動作を行っています。
629 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/02/08(木) 00:33:21 ID:IHNssdF00]: ヒント:DirectInput
630 名前：名無しさん＠お腹いっぱい。 [2007/02/08(木) 07:42:37 ID:j0ePCC9y0]: 　//　While　Wend 文
　WHILE　式　　　　　　　　　　　//　式が　True　の間実行
　　　　　処理
　WEND

WHILE　式　　　　　　　　　　　//　式が　True　の間実行
WHILE　式　　　　　　　　　　　//　式が　True　の間実行
WHILE　式　　　　　　　　　　　//　式が　True　の間実行
631 名前：名無しさん＠お腹いっぱい。 [2007/02/08(木) 10:08:02 ID:kgzJBX1p0]: メッセージ投げてるわけでもないからDirectInputも関係ないし
構文もあってる

ゲーム上の動作確認がおかしいだけじゃねーの
632 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/02/08(木) 11:25:00 ID:FKJuKnE50]: >>628の
While True
ってのは「何が」Trueの間繰り返すという意味なんですか？
633 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/02/08(木) 12:44:40 ID:ZEUQBsQ/0]: >>632
While True = True
634 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/02/08(木) 14:23:56 ID:wOF5n7Uf0]: フォーカスがあってないんじゃ？
635 名前：名無しさん＠お腹いっぱい。 [2007/02/08(木) 22:25:03 ID:8w4lo9zN0]: フォーカスを合わせる必要があるのですね…
もしよろしければ、その記述についても教えていただけますか？
636 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/02/09(金) 00:14:51 ID:CVVEcBKi0]: つヘルプファイル
637 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/02/09(金) 00:37:33 ID:xRDFOrHc0]: ネトゲなんかでさ、GETIDはできるのは想像つくんだけど、
中のウインドウはGETITEMで操作できんの？
試せよって話なんだが、もう寝る時間なんだ
638 名前：名無しさん＠お腹いっぱい。 [2007/02/09(金) 04:15:57 ID:R85AHkSa0]: バックグラウンドで使うのは難しいのでしょうか？
他の作業をしながら
特定のウインドウで単純にF1キーを押し続ける作業をさせたいのですが、
言語も何もわからないので困っています。
639 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/02/09(金) 05:34:00 ID:RTUEj3qb0]: >>638
APIを使う。
Windowsアプリの仕組みを知らないのであれば難しい。
640 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/02/09(金) 07:53:31 ID:mxygUe7L0]: TeamSpeak2( ttp://www.goteamspeak.com/ )というボイスチャットのスクリプトを作ろうと思ったのですが
GETITEMでアイテム情報を取得できませんでした。

このような場合はどう対応したらよいのでしょうか？
641 名前：名無しさん＠お腹いっぱい。 [2007/02/09(金) 10:42:08 ID:U7MLjCC+0]: おねがいします。

UWSC.exe名を変更するにはどうしたら良いのでしょうか？
エロイ人教えてください
642 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/02/09(金) 10:45:58 ID:9N5pvLBZ0]: >>641
スレ違いだカス
643 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/02/09(金) 12:12:03 ID:Eho8eh0PO]: >>641
低レベルな質問をする前に少しは勉強しなさい
644 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/02/10(土) 16:00:56 ID:DagaOjlC0]: >>641
exec("cmd /c ren uwsc.exe cswu.exe")
645 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/02/12(月) 23:11:21 ID:GqqG+y+o0]: >>641
UWSC.exeをエロ胃人にに帰るには制てゃpぎおｗｎ
646 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/02/13(火) 00:36:42 ID:FAav4dLC0]: //　時報
While !GetKeyState(vk_esc)
　　　　　　sleep(0.2)
　　　　　　GetTime()
　　　　　　T = g_time_ww+":"+g_time_hh+":"+g_time_nn+":"+g_time_ss
　　　　　　ifb g_time_nn = 0 and g_time_ss = 0
　　　　　　　　　Fukidasi(g_time_hh+":"+g_time_nn2,0,0,0,72,"Arial","$ffff","",-2)
　　　　　　　　　for i = 1 to 25; sleep(0.2); next
　　　　　　　　　Fukidasi()
　　　　　　endif
　　　　　　//Timer(T = "0:12:34:56","メッセージ")
Wend
Fukidasi("時報を終了します。"); for i = 1 to 5; sleep(0.2); next
//
Procedure Timer(T,str)
　　　　　　ifb T
　　　　　　　　　Fukidasi(str); for i = 1 to 25; sleep(0.2); next; Fukidasi()
　　　　　　endif
Fend
647 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/02/13(火) 13:56:17 ID:vkIAvlxP0]: >>640
muri
648 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/02/13(火) 20:08:16 ID:pgEpS4cV0]: >646
なんだ？添削希望か？
649 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/02/13(火) 21:59:53 ID:FAav4dLC0]: おながいします。
650 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/02/13(火) 22:49:24 ID:pgEpS4cV0]: とりあえず
for i = 1 to 25; sleep(0.2); next
は
sleep(5)
でいいかと

あと、
Timerは何がしたいの？
651 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/02/13(火) 23:44:52 ID:FAav4dLC0]: ＞>sleep(5)
＞でいいかと
ホントだ…。前に>>115を読んだときに
＞0.5sec待機するより0.01secを5回程度回した方が～
ってところを何を勘違いしたのか間違って解釈しちゃったようですorz

Timerは指定の時間にメッセージを出すだけです。
別に何でも、アプリ起動とかでも良かったんですけど…
指定の時間になったら何かするっていう、つまりタイマー
どっちにしろ一行で済むしそれだけなら別にわざわざサブルーチンにしなくても良かったようですがorz
652 名前：名無しさん＠お腹いっぱい。 [2007/02/14(水) 10:34:58 ID:g3LUNaLB0]: 現在のディレクトリを得る方法ってない？
UWSCから、WSH利用するしかないのかな？
653 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/02/14(水) 13:42:26 ID:x+7ZQl1v0]: GET_CUR_DIR　　　//　現在のカレントディレクトリ
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]: ｐｓのアクション＋パッチで十分な話だと思う
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]: こんなのはられてたｗ

game11.2ch.net/test/read.cgi/mmosaloon/1168954481/644-646
671 名前：名無しさん＠お腹いっぱい。 [2007/02/16(金) 08:18:53 ID:CMWBeYzi0]: >>670
ﾊﾞﾛｽ
もっと見破られないようにしないとｗ
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]: うあ、、、、これ便利すぎるｗ
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]: キーボードのあるキーを押すと
マウスの左クリックを０．５秒後に押すマクロってどうやってつくるんでしょうか？

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]: ｃｈkimgは画面表示をチェックするんだろ?
最小化していて表示されるところだけちぇっくすればOK。
それが嫌ならｃｈkimgなんか使うな。
ちなみに俺は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]: すっげー久しぶりに来た。３ヶ月は見てないかな。ここ。

>>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="ｈttp://......">リンク名</a>

上記のような場合

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

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

<a href="ｈttp://......">リンク名
</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ってのをたくさん使ってたのでｖｂでもできないかなあといろいろググってます。
でもないんですねえ。素人にはむつかしい。
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データがある
②WIKIに移行する自動化プログラムを作りたい
③どんなプログラムを組めばいいか？という質問

答え：自動化プログラムを組めばいい
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を押したら処理１が開始されるようなマクロを組みたいのですが
　　　　　　start
　 __________|________
　　| |
aが押される bが押される　（キーボード
　　| |
処理1 処理2
|__________________|
|
~
このようなスクリプトはUWSCにはないのでしょうか
INPUTでは新たにウィンドウが出てしまいますし、エンターを押さなければ処理１には進みません

なにか知恵をお貸しいただければ幸いです
754 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/04(日) 17:53:38 ID:QvCR5Gc90]: ifb GETKEYSTATE(VK_A) then
　　//a key を押した時の処理
endif

当然 while ～ wend　に入れるべし

ていうか752にもあるように、UWSCでつくるべきプログラムじゃないよ
755 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/04(日) 18:05:33 ID:aLBEPeVF0]: >>754
即レスありがとうございます
それでうまくできなければ他のマクロを探してみます

ありがとうございました
756 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/04(日) 23:26:57 ID:a4NBNM9n0]: >>752
テキストでやるのはいいけど
ファイル名のつけ方がわからん
757 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/05(月) 10:59:05 ID:kPPaI09y0]: >749
csvを読み込み処理する部分は
FOPEN
758 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/05(月) 11:02:26 ID:kPPaI09y0]: おっと途中で書き込んでしまった。
csvを読み込み処理する部分は
FOPENして
FGETして
ごにょごにょしたらおｋ

wikiに書き込むのは
IESETDATA使うなり
直接COMでDHTMLたたくなり
好みとスキルに応じてどうぞ
759 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/07(水) 12:24:23 ID:2NSKScfX0]: UWSCスクリプトを実行ファイルに変換するスクリプト
欠点: ファイルがでかすぎる。
760 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/08(木) 12:11:00 ID:BBPkbtD90]: コンピュータ名が欲しくて、次のように書いてみたのだけど、
UWSCがアクセス違反エラーだと言ってきます。
書き方悪いですかね？

DEF_DLL GetComputerNameA(var string, int):int:kernel32.dll
buf = FORMAT(" ", 32)
res = GetComputerNameA(buf, LENGTHB(buf))
print buf

別のAPIならOKなんですが・・・

DEF_DLL GetPrivateProfileStringA(string, string, string, var string, int, string):int:kernel32.dll
buf = FORMAT(" ", 255)
res = GetPrivateProfileStringA("section", "param", "default", buf, LENGTHB(buf), "test.ini")
if ( res > 0 ) then print buf
761 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/08(木) 14:44:22 ID:Q+kjASni0]: >>760
DIM WshNetwork = CREATEOLEOBJ("WScript.Network")

PRINT WshNetwork.ComputerName

じゃダメなのか?
762 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/08(木) 14:55:38 ID:7XN40pw00]: >760
DEF_DLL GetComputerNameA(string, var long):long:kernel32.dll

引数は前が値渡しで後ろが参照渡しみたいだね
763 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/08(木) 15:02:40 ID:7XN40pw00]: DEF_DLL GetComputerNameA(var string,var long):long:kernel32.dll

あれ？前もvarじゃないとだめみたい
764 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/08(木) 15:18:11 ID:O6XSymB40]: >>763
そりゃ、stringに結果が返るんだから参照渡しなんじゃないの
765 名前：760 mailto:sage [2007/03/08(木) 16:10:33 ID:PbsxIEko0]: ありがとうございます。うまくいきました。
よく見たら、第二引数がLPDWORDっすね・・・orz

>>761
そう言う方法もあるんですね。ﾒﾓﾒﾓ。
766 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/08(木) 16:33:01 ID:7XN40pw00]: >764
もちろんおれもそうとは思ったんだけど
VBの例見てみたらなぜか一つ目の引数はByValだったんだよね…

Declare Function GetComputerName Lib "kernel32" Alias "GetComputerNameA" (ByVal Buffer As String, Size As Long) As Long
767 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/08(木) 16:36:47 ID:7XN40pw00]: >760
ちなみにバッファは16バイトでいくない？
コンピュータ名ってANSI15文字までだった気がする。
768 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/08(木) 23:10:03 ID:3vwnAUEJ0]: CTRL+Rを押すとあらかじめ作っておいたAというスクリプトが
CTRL+Lを押すとあらかじめ作っておいたBというスクリプトが実行される
こういう感じで使うことってできますか？
769 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/08(木) 23:21:51 ID:QhMdkY5Q0]: uwsファイルをuwsc.exeに関連づけを行う
uwsファイルのショートカットをデスクトップに作成
そのショートカットのプロパティを開いて、ショートカットキーを割り当てる
770 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/08(木) 23:26:22 ID:3vwnAUEJ0]: >>769
ありがとうございます！
771 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/09(金) 02:16:24 ID:pF+OFex30]: >>767
ご指摘の通り、
MAX_COMPUTERNAME_LENGTH + 1 ということなので、１６で３２も必要ないですね。
772 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/10(土) 16:03:33 ID:EidvIQ3R0]: コンパクトなランタイム版欲しくないか?
コピー自由だからEXE化不要というのは概ね同意だったが
ここまでファイルがでかくなるとEXE化というのもアリかな?
773 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/11(日) 15:16:00 ID:FHiSloY00]: IEのイベント使おうと思っていろいろ調べてここまで来たんだけど
EVENT_PRM[4]でByref Dispatch型から OleStr 型へのバリアント型変換はできません
ってエラーになっちゃう。どうすればいいんでしょうか。
**&ppDispって形式は無理なのかな？

IE = GETACTIVEOLEOBJ("InternetExplorer.Application","honda")
OLEEVENT(IE,"DWebBrowserEvents2","NewWindow3","NewWindow")

SLEEP(100)

procedure NewWindow()

print EVENT_PRM[0] //www.honda.co.jp/WGP/
print EVENT_PRM[1] //www.honda.co.jp/
print EVENT_PRM[2] //131206
print EVENT_PRM[3] //0
print EVENT_PRM[4] //エラー
// 4 IDispatch **&ppDisp,
// 3 VARIANT_BOOL *&Cancel,
// 2 DWORD dwFlags,
// 1 BSTR bstrUrlContext,
// 0 BSTR bstrUrl

fend
774 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/11(日) 17:41:38 ID:gXtUVhMk0]: >>773

IDispatch型ってのはそもそもprintするようなものじゃないと思うんだ
775 名前：名無しさん＠お腹いっぱい。 [2007/03/11(日) 22:10:17 ID:FHiSloY00]: >>774
**&ppDispは入れ込むものだってのはわかった
www.melonpan.net/letter/backnumber_all.php?back_rid=283118
みたいなことをやりたいんだけど無理なんでしょうか

そもそも
IE = CREATEOLEOBJ("InternetExplorer.Application");
IE.navigate("www.honda.co.jp/");
IE.visible = true
OLEEVENT(IE,"DWebBrowserEvents2","NewWindow3","NewWindow")
sleep(100)
procedure NewWindow()
print "newWindow"
EVENT_PRM[3] = true
fend
でも新ウィンドウ起動しちゃう
776 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/12(月) 00:45:56 ID:JMJM6ows0]: >>775

ie = CREATEOLEOBJ("InternetExplorer.Application")
ie.Navigate("www.honda.co.jp/")
ie.Visible = True

public ie2 = CREATEOLEOBJ("InternetExplorer.Application")
ie2.Navigate("www.google.com")
ie2.Visible = True

OLEEVENT(ie,"DWebBrowserEvents2","NewWindow2","NewWindow2")

fukidasi("ESCで終了")
while !GetKeyState(VK_ESC)
sleep(0.1)
wend

procedure NewWindow2()
print "newWindow2"
EVENT_PRM[1] = ie2
fend

NewWindow2ならこんな感じであらかじめ準備しておいた
任意のieで開かせることができたけど
NewWindow3のほうはなぜかできないね。

>でも新ウィンドウ起動しちゃう
これはNewWindow2でも3でも再現した。
念のため「True」の代わりに-1入れてみたけどやっぱりだめだった。
777 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/12(月) 01:09:19 ID:A4ISQcDy0]: yahooのブリーフケースにいれてあるファイルを開きたいのですがなかなかうまくいきません。
良い知恵orミスの指摘をお願いします。

IELink(IE,"ブリーフケース")
BusyWait(IE)
IELink(IE,"****.xls")　　 //対象ファイル
BusyWait(IE)
ACW(GETID("ファイルのダウンロード"))
CLKITEM(GETID("ファイルのダウンロード"),"開く(O)",CLK_BTN)
778 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/12(月) 02:08:47 ID:JMJM6ows0]: おおっと、この場合VALIANT_BOOLだからTRUEは1でよかったね。
まあどちらにしても新しいウィンドウ開いちゃうんだけど。
779 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/12(月) 02:28:25 ID:JMJM6ows0]: やっぱVARIANT_TRUEは-1でよかった
ウソ言ってスマソ
780 名前：773 mailto:sage [2007/03/12(月) 09:03:24 ID:a3O+JiPS0]: うはNewWindow2でできました
すいません2で試してなかったようです
cancelが駄目だったからあきらめてしまった
ありがとうございました
781 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/12(月) 16:49:47 ID:n5L2tYqJ0]: Sleepで待ってるスレッドを中断するにはどうすればいい?
ウィンドウ持っていればCtlWinで中断できる?
それともSleepの代わりにWAIT・POSTみたいのはWin32APIでできる?
782 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/12(月) 17:13:41 ID:wxNktC0X0]: WHILE+GETKEYSTATE
783 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/12(月) 18:30:24 ID:lWuXjild0]: >>781

>>782さんのいうとおり、僕も使ってますよ
Dim WaitFLG = false

　　　　while WaitFLG = true
　　　　　　sleep(xx)
　　　　　　if GETKEYSTATE(VK_W) then WaitFLG = !WaitFLG
　　　　　　if GETKEYSTATE(VK_S) then exitexit
　　　　wEnd
784 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/12(月) 23:08:41 ID:n5L2tYqJ0]: それって単にフラグポーリングしてるだけやんか…。
785 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/13(火) 05:29:39 ID:cUL5v4BL0]: じゃあなにがしたいの？
786 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/13(火) 09:20:34 ID:cyFSWzt+0]: fukidasi("10秒後にこのメッセージを消すぞ!")
thread fukioff(10)
Sleep(20)
Msgbox("噴出し消えてるか?")
Exit

procedure fukioff(t)
sleep(t)
fukidasi()
fend

スレッドでfukidasiが消えてくれないのだが?
なぜ?
吹きだしウインドウを捜してCTRLWINで閉じなきゃ駄目なのか?
それともバグ?
787 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/13(火) 09:30:12 ID:cyFSWzt+0]: thread fukioff(10)
Msgbox("噴出し消えてるか?")
Exit

procedure fukioff(t)
fukidasi("10秒後にこのメッセージを消すぞ!")
sleep(t)
fukidasi()
fend

これなら消える。
fukidasi以外も全部そうか?
ああそうかい。
じゃ。
788 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/13(火) 12:15:17 ID:Jt3WP4T70]: メイン側とスレッド側のfukidasiは別物。
スレッド数と同じ数のfukidasiを表示できる。
789 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/13(火) 12:39:02 ID:vHwEZC+W0]: 質問です
テキストをコピー → エクセルへの貼り付け
テキストをコピー → エクセルへの貼り付け
・・・
・・・
を連続でしたいんですが、テキストに空白があればスキップさせたいです
さらにエクセルへのターゲットを A1,A2等ではなく選択しているセルへの
貼り付けを行いたいのです！

どなたかご教授願います。

ClkItem(memo_id,"1")　　　　　　　　　　　　　　　　　←ほにゃららｺﾝﾄﾛｰﾗの1番タブ　
BUN = GETSTR(GETID("ほにゃららｺﾝﾄﾛｰﾗ"))
SENDSTR(0, BUN)
ACW(GETID("MICROSOFT EXCEL"))
memo = GETID("MICROSOFT EXCEL")
EXCEL = GETACTIVEOLEOBJ("Excel.Application")
EXCEL.Range("A1").PasteSpecial

ClkItem(memo_id,"2")
BUN = GETSTR(GETID("ほにゃららｺﾝﾄﾛｰﾗ"))
SENDSTR(0, BUN)
memo = GETID("MICROSOFT EXCEL")
EXCEL = GETACTIVEOLEOBJ("Excel.Application")
EXCEL.Range("A2").PasteSpecial

ClkItem(memo_id,"3")
BUN = GETSTR(GETID("ほにゃららｺﾝﾄﾛｰﾗ"))
SENDSTR(0, BUN)
memo = GETID("MICROSOFT EXCEL")
EXCEL = GETACTIVEOLEOBJ("Excel.Application")
EXCEL.Range("A3").PasteSpecial
790 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/13(火) 13:29:22 ID:cyFSWzt+0]: >>788
> メイン側とスレッド側のfukidasiは別物。
スレッド毎に別になるのは上でもう試したので判ってるが。
例えばコンソールは同じもんなのか？
なーんでだ？ていうかあれは？これは？で全部試さなきゃ駄目そうだな。
UWSCはためしためし作るのがあたりまえなのでそれくらい全然平気だが。
791 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/13(火) 17:03:36 ID:Jt3WP4T70]: だったらぶつぶつ言わないでガンバレ。
792 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/13(火) 17:14:31 ID:z+6WW4kl0]: 複数ｔhread間で、printやbtn、mmvなんかを実行するとき
当然これらはシステムで１つしか存在しない共有資源なんだが
ロックとかどうなってんのかな？
793 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/14(水) 08:49:07 ID:aZuPqBx+0]: とにかく試すんだよ。
794 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/14(水) 16:51:21 ID:yQ01SVVO0]: 質問させていただきます。

以下のような処理を uwsc　で組むとどうなりますか。

1.現在、起動中のアプリから"プログラムＡ"　を探す
2.みつかったら、
　非アクティブのままで(バックグランドのアプリに)
　キーX　を送る。

恥ずかしい話ですが、いつもuwscに挑戦しょうとしますが挫折します。
テンプレにかいてあるいろんなサイトにいき、ヘルプなどみているうちに
わからなくなってしまいます。（どれを参考にしてよいかわかりません。）
なにか良い方法はないでしょうか。

上の1.2.を組むためにはどこを見て勉強すればよいのでしょう。
教えていただければ幸いです。
795 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/14(水) 20:35:06 ID:aZuPqBx+0]: >>794
Function SendMessage(id,cmd,p1,p2)
DEF_DLL PostMessageA(HWND, LONG, LONG, DWORD): Bool: user32.DLL
DEF_DLL SendMessageA(HWND, LONG, LONG, DWORD): LONG: user32.DLL
SendMessageA(IDtoHND(id),cmd,p1,p2)
Result=0
Fend

または、CTRLWINで非表示にしてからSCKEYしてやれば大抵問題ない。
しかしこれは絶対問題ないわけではない。そのAが何かに夜。
796 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/14(水) 23:09:31 ID:yQ01SVVO0]: >>795 回答、有難うございました。
コマンド1つづつ、調べてみます。
797 名前：名無しさん＠お腹いっぱい。 [2007/03/15(木) 20:50:07 ID:echeEF2V0]: 画面内に指定画像があるか無いかチェックし、あればクリックしたりするスクリプト文を作成したいのですが・・・、うまくいきません；
詳しい方、どうかご教授お願いしますm(_ _)m
798 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/15(木) 21:19:32 ID:gAtpnVa70]: >>797
CHKIMG使えばいいと思う。
それとどう上手く行かないのか書かないと分からない。

ご教授じゃなくてご教示、意味の分からないこと葉は使わないほうがいい。
799 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/15(木) 21:21:39 ID:yidvy73a0]: >>797

どううまくいかないのか書かないと
誰も答えられないよ。

ここままではヘルプぐらい嫁としか言えない。
800 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/15(木) 21:51:43 ID:RMTAm+Y00]: キャラだろ。
801 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/15(木) 21:52:09 ID:Bw9W6nzv0]: ま～たオンラインゲームかｗ
802 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/16(金) 00:22:58 ID:nhMfxJG20]: JOUTAI = SLCTBOX(SLCT_BTN,0,"状態","わからない","やっぱりわからない","それでもわからない")
ifb JOUTAI = 1
　　EXEC("hh "+GET_UWSC_DIR+"\uwsc.chm")
elseif JOUTAI = 2
　　SCKey(GetID("自動化ツールuwsc使いよ集まれ2"),vk_ctrl,f)
elseif JOUTAI = 4
　　MsgBox("つwww.google.co.jp/")
endif
803 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/16(金) 00:26:58 ID:mqTPjeha0]: repeat
until getkeystate(VK_LBUTTON)
x = G_MOUSE_X
y = G_MOUSE_Y
repeat
until getkeystate(VK_LBUTTON)
xx = G_MOUSE_X
yy = G_MOUSE_Y

と組んだ時に、ワンクリックで両方のrepeat判定を満たしてしまうのですが、
先のrepeat判定を抜けた時点でクリックしたフラグを消すにはどうすれば良いのでしょうか。

分かり難いと思うので簡潔に書くと、
前後のrepeat判定で、別々の場所を記憶させたいのです。
804 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/16(金) 00:35:15 ID:nhMfxJG20]: repeat
sleep(0.02)
until getkeystate(VK_LBUTTON)
MsgBox(G_MOUSE_X+" , "+G_MOUSE_Y)
getkeystate(VK_LBUTTON)
repeat
sleep(0.02)
until getkeystate(VK_LBUTTON)
MsgBox(G_MOUSE_X+" , "+G_MOUSE_Y)
805 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/16(金) 02:07:45 ID:qAGjSoPe0]: >>802
ちょとﾜﾛﾀ
わざわざスクリプトまで組んでくれるなんて
親切な人だね
806 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/16(金) 02:15:31 ID:31It80P50]: どういたしまして
807 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/16(金) 03:21:58 ID:nhMfxJG20]: >804を訂正

repeat
　　sleep(0.02)
until getkeystate(VK_LBUTTON)
x = G_MOUSE_X
y = G_MOUSE_Y
sleep(1)　// 長めのsleep
getkeystate(VK_LBUTTON)
repeat
　　sleep(0.02)
until getkeystate(VK_LBUTTON)
xx = G_MOUSE_X
yy = G_MOUSE_Y
MsgBox("x="+x+" , y="+y+"　xx="+xx+" , yy="+yy)
808 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/16(金) 04:01:48 ID:e+a/E5Ma0]: 質問です。
最小化しているウィンドウに対して命令を送ろうと

public 2ch
2ch = GETID("Jane","TApplication")
MOUSEORG(2ch,2)
以降、処理

というマクロを組んだのですが、うまくいきません。
処理自体は、キーボードのボタンを一定時間毎に入力する簡単なものなので
間違いは無いはずですし、上記の記述に不備があるのでしょうか？
クラスの取得には>>712のWinListerを使ったのですが
指定するID自体が間違っているのでしょうか？
皆さんのお力添えをいただきたいです。
809 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/16(金) 09:50:08 ID:7NEMi9s/0]: SendMessage
せめてsckey chkitem
janeに何させたいの？
810 名前：名無しさん＠お腹いっぱい。 [2007/03/16(金) 13:37:57 ID:WOCiyC/30]: IEコンポーネントブラウザを使っていて、タイトルに指定した文字列があれば
次の処理へ（無ければ1秒SLEEP）移行するという制御文で詰まりましたｗ
識者よどうか知恵を貸して下さい。

CLIP=文字列
GETID("WTL:Donut")
STATUS("WTL:Donut",ST_TITLE)
WHILE POS(CLIP,ST_TITLE) <> 0
SLEEP(1)
WEND
.
.
.
次の処理
811 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/16(金) 16:44:47 ID:qAGjSoPe0]: …
id = GETID("WTL:Donut")
title = STATUS(id,ST_TITLE)
WHILE POS(CLIP,title) <> 0
…

じゃね？
まずは戻り値や変数といった基礎を理解すべし
812 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/16(金) 16:47:23 ID:WOCiyC/30]: >>811
了解です。
もっとじっくりと勉強してみます。
813 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/16(金) 17:50:32 ID:qAGjSoPe0]: あと、
WHILE POS(CLIP,title) = 0
だな
814 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/16(金) 18:02:54 ID:7NEMi9s/0]: TOKENでデリミタ複数指定した時、どのデリミタで引っ掛ったのか判る方法無いの?
組み込み関数が今位置不便なのでどいつもこいつもCOM使うんだよな…。
815 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/16(金) 19:26:55 ID:mqTPjeha0]: >>804,807
遅れましたが、どうもありがとうございます。
sleep()
getkeystate(VK_LBUTTON)
を挟むことで、入力の機会を2回得ることが出来ました。
816 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/16(金) 21:27:28 ID:qAGjSoPe0]: >>814
そもそもデリミタ複数指定って、想定されてる使用法なの？
817 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/17(土) 04:30:41 ID:MCeA35RR0]: s= "abc,efg xyz/abc"
d=",/ "
t= token(d,s)
while s<>""
print t
t= token(d,s)
wend
exit

結果
abc
efg
xyz

要望だせばデリミッタ自体もトークンに含めるモードとか
つけてくれそうだけど、まぁtoken使わなくてもいいし何とかするべ。
abc
818 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/17(土) 04:31:28 ID:MCeA35RR0]: あ…
819 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/18(日) 09:45:56 ID:G1MEbanD0]: スピーカーから音が出ているかどうかをuwscスクリプトから確認する方法はないですか？
820 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/18(日) 10:51:08 ID:g9NJe7xK0]: >>819

//　サウンドが再生されたかをチェック
戻値　=　CHKSND( [サウンド名] )
821 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/18(日) 11:00:07 ID:N0d6UYUB0]: >>820
それだとスピーカーがつながっているかわからないし、
スピーカーの電源が入ってるかもわからないし、
スピーカーのボリュームが最小になっていて聞こえなくなってるかもわからない
822 名前：819 mailto:sage [2007/03/18(日) 11:08:31 ID:G1MEbanD0]: スミマセン、私の質問の仕方はよくなかったかも。

目的は複数の動画ファイルを順に５秒ほど再生して、
音が全然無かったものと、音があったものとを識別したいのです。
音は当然、動画ごとに違うので、ビープとか××.wavとかではないです。
823 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/18(日) 21:55:05 ID:qeai6ROm0]: 動画に音声ストリームがあるかどうかをチェックするのは可能かもしれんが
UWSCでやる必要は無い。

まず動画ファイルがどういうものか、音声ストリームとは何か
意味を知らないならググれ。
824 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/18(日) 22:00:49 ID:wpAgcroq0]: その辺がわからないからOSがハードウェアに指示出すところで
拾えないかなと思ったんじゃないかな
825 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/18(日) 22:03:46 ID:N0d6UYUB0]: UWSCで出来たとしてもどのみちDLL使用だろうし、
UWSCじゃないところで勉強してからきたほうがいいな。
826 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/18(日) 22:23:27 ID:g9NJe7xK0]: WMPとかで再生してスペアナの画面監視するってのはどうだ？
827 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/19(月) 23:12:54 ID:zKhTt2fP0]: SOREDA！
828 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/21(水) 23:34:53 ID:wOQv7e7l0]: 質問です。
改行を含む文字列をファイルから読み出して、別のファイルに改行抜いて書き込みたいのですが、
CHGMOJを使って<#CR>を検索してもヒットせず改行が削除できなくて困っています。。
何が原因なのでしょうか。
829 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/22(木) 00:19:06 ID:N4q8VkjG0]: USB-RS232Cのインターフェースを使っているのですが、
接続の度にCOM番号が移動してしまいます。
uwscで、現在有効なCOM番号を取得する事は出来ますか？
ヒントだけでもいいので、よろしくお願いします。
830 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/22(木) 02:22:37 ID:G1apsxhH0]: >>828

改行なし文字列 = chgmoj(改行入り文字列,"<#CR>","")

で普通にできたけど。

まさかファイル読み込み→置換→書き込みを一行づつ処理したりしてないよね？
831 名前：名無しさん＠お腹いっぱい。 [2007/03/22(木) 10:14:02 ID:qku/eKST0]: ifb elseif elseの使い方でつまづいています。

させたい事としては
A.bmp B.bmp C.bmpなどの複数画像の認識と、そうでなかった場合の認識で,
メモ帳にA.bmpなどの場合はAと打ち込み、B.bmp、C.bmpも同じようにB,Cと打ち込ませ
画像がみつけられなかった場合にはngと打ち込ませたいと思っています。

現在は

IFB CHKIMG("A.bmp")
KBD(VK_A,CLICK,30)

ELSEIF CHKIMG("B.bmp")
KBD(VK_B,CLICK,30)

ELSEIF CHKIMG("C.bmp")
KBD(VK_C,CLICK,30)
ELSE
KBD(VK_N,CLICK,30)
KBD(VK_G,CLICK,30)

この様にしてありますが、どうもELSE以下の、画像が見つけられなかった時のng入力がうまく
いきません。どのように対処したらいいでしょうか？
832 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/22(木) 10:40:14 ID:G1apsxhH0]: >>831

つENDIF

ヘルプぐらい読もうぜ
833 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/22(木) 10:55:55 ID:qku/eKST0]: >>832
レスありがとうございます。

上ではENDIF書き忘れました。すみません。
実際にはENDIF入ってます。

ELSEの時がうまく機能しないのです。
具体的に言うと何も画像が見つからなかった時はNGと打たずに
そのままスクリプトが終了してしまます。
834 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/22(木) 11:16:05 ID:TVb0c2890]: 俺の環境では再現しないな
以下試してみたコード
ChkImg()に問題があるのかな？

IFB FALSE
KBD(VK_A,CLICK,30)

ELSEIF FALSE
KBD(VK_B,CLICK,30)

ELSEIF FALSE
KBD(VK_C,CLICK,30)

ELSE
KBD(VK_N,CLICK,30)
KBD(VK_G,CLICK,30)

ENDIF
835 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/22(木) 12:29:32 ID:qku/eKST0]: >>834レスありがとうございます。

ほんとですね、そのスクリプトだと問題なくいけました。
ただ、今つかってるPCと、実行させたいPCが違うので、
後で>>834さんが書いてくれたスクリプトと自分のスクリプトを比べて、
実行させたいPCで試して検証してみます。

ありがとうございました。
836 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/22(木) 18:45:18 ID:2wM5CfJf0]: 指定画像をクリックさせたいんだが上手く動かん・・・
スクリプトは
　　　　　
Wend
while True
　　if GETKEYSTATE(VK_ESC) then exit　　　　　
　　ifb CHKIMG("a.bmp") 　　　　　　　　　　　
　　　　MMV(G_IMG_X,G_IMG_Y)
　　　　KBD(VK_CTRL,DOWN)
　　　　BTN(LEFT,DOWN,G_IMG_X,G_IMG_Y)
　　　　KBD(VK_CTRL,UP)
　　　　BTN(LEFT,UP,G_IMG_X,G_IMG_Y)
　　endif
wend

現在こうなってますマクロ自体は走らせることができるのだが
画像をクリックしにいかない状態。
アドバイスよろしくお願いします
837 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/22(木) 19:53:37 ID:G1apsxhH0]: >>836
FAQ中のFAQ

まずはifb～endifの間にprintでも入れて
画像をちゃんと見つけているか確認すれ
838 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/22(木) 22:43:14 ID:+Ql66cZK0]: >>836
俺ならば、
MMV(G_IMG_X + 50, G_IMG_Y + 50)
などとするな。（50はbmp中の中央付近の位置として）
それから各操作の間に10～100ミリ程度の時間を置いて。
しかも、

CTRLを離してから左クリックを離す？
それが仕様の動作なのか？
ここの部分は疑問点。
俺ならばCTRL押下でクリックを囲うな。
839 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/22(木) 22:46:31 ID:+Ql66cZK0]: それから良くある間違いが、マウスポインタが指定の画像の位置の上にあると当然検知されない。
そのためCHKIMGの前に、その画像が絶対ない箇所へのマウスポインタの移動は必須だ。
その後僅かに時間をとってからCHKIMG
840 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/22(木) 23:15:53 ID:R7pm3fb20]: >>829
レス付きそうに無いなぁ…。あれからあちこち見て回って、
なんとなく取っ掛かりになりそうな方法を見つけましたので、質問を取り下げます。
お目汚し失礼しました。
841 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/23(金) 01:20:18 ID:uBr/UHik0]: >>840
手動で確認する方法を知っていればその通りにやればいいと思う。
842 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/23(金) 02:09:21 ID:1q7aiu0K0]: >>840

未確認だけど
WMIでできないかな？
843 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/23(金) 10:24:54 ID:1q7aiu0K0]: 新バージョンがでましたよ

UWSC Ver4.2、 Pro版と Free版をリリースしました。
www.uwsc.jp/
844 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/23(金) 11:09:12 ID:P2WtzyeM0]: あーぁ
845 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/23(金) 12:04:19 ID:uBr/UHik0]: まじ?
846 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/23(金) 12:22:31 ID:uBr/UHik0]: 英語版はなくなったのか…。
847 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/23(金) 13:06:35 ID:cFrgCyQq0]: 昨日、初めて使ったんだけど、VBSに目覚めたYO
848 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/23(金) 13:39:02 ID:gCPoW1cE0]: EXE化できるとおもったら
6720円のシェア板・・・
849 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/23(金) 13:39:15 ID:1q7aiu0K0]: >>847
スレ違い

UWSCはVBSじゃないよ
850 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/23(金) 14:09:01 ID:cKmBDk7C0]: >>848
コンパイルしない配布用で、UPX使って1/3程らしい。400kb前後か？
851 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/23(金) 14:20:02 ID:cFrgCyQq0]: >>849
VBSに目覚めたYO
852 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/24(土) 00:41:07 ID:pN06s1ix0]: >>848
EXE化って必要かな？
起動が面倒だっていうなら起動バッチ作って一緒に配布すればいいし
複数ファイルになるのがいやならまとめて自己解凍ZIPにでもすればサイズも減ってウマー

>>851
違いが分からないようなら
半年ROMってたほうがいいYO
ここでVBScriptな質問して怒られないようにね
853 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/24(土) 02:45:42 ID:psPhH9ly0]: >>852
何も知らない初心者に渡すなら exe になってた方が楽かな。
まぁ、AHK があるから UWSC で exe 作れてもなぁ…
854 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/24(土) 04:11:24 ID:YI01TIfJ0]: 正直今回の変化にはかなり戸惑っている…。
855 名前：名無しさん＠お腹いっぱい。 [2007/03/24(土) 09:35:52 ID:hp8fITTl0]: あーあ、ついに金儲けにはしったか。
さよならUWSC
856 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/24(土) 09:37:53 ID:mi/yjfLL0]: ↑なんでﾀﾞｳｿ乞食ってすぐこういう反応するのか理解に苦しむな
857 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/24(土) 09:49:52 ID:5Xt+hBM90]: これでフリー版が消えたんならその意見も尤もだが、フリー版はちゃんと残っているし。
いままでのユーザーとしては何の問題もなし。
858 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/24(土) 10:07:29 ID:SaEHRzRt0]: フリー版とPro版を全く同じものにすればいいんだよ。
それで金払いたい人だけがPro版を買えばいい。
金を払うほどではないと判断した人はフリー版を使う。
これで万事解決。
金の亡者の作者以外はハッピーになれる。
859 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/24(土) 10:11:01 ID:5Xt+hBM90]: おまいさんの図々しさに脱帽で脱力で脱毛で脱腸で脱糞だよ
860 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/24(土) 11:22:17 ID:cpQZ5pcq0]: ガッカリ。非常に萎えた。
なんか他にいいのないかな？
861 名前：名無しさん＠お腹いっぱい。 mailto:はいはい、俺はumiumiですよ。 [2007/03/24(土) 11:37:38 ID:2igQbiJF0]: まぁ、この機会（Vista）を逃したら、有料化の機会は当分ないからな。
多少「UWSCよ、お前もか」って気持ちはあるけど、仕方ない。

俺は、UWSCのお陰で業務効率が劇的に改善された人なので、
有料化しても買うけどな。むしろ、突然開発中止とかになる
リスクが減ったという意味では良いのかもしれん。

オンラインゲーム厨とか、小遣い稼ぎクリック厨なんかは
文句垂れるだろうな。ｲｲﾊﾅｼﾀﾞﾅｰ。
862 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/24(土) 14:00:37 ID:pN06s1ix0]: Pro版のターゲット層がいまいち分からない…
パワーユーザならFree版でもPro版と同じ機能は簡単に実装できる。
現時点ではスクリプトは組めるがCOM使えない中級者ぐらいにしかPro版のメリットはない気が。
863 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/24(土) 14:04:52 ID:pN06s1ix0]: >>860
つAutoIt
864 名前：名無しさん＠お腹いっぱい。 [2007/03/24(土) 14:14:09 ID:BkqOk5US0]: AutoIt
www.autoitscript.com/autoit3/

・スクリプトをexeファイルにする事が出来る
　これによりテスト自動化機能を単体で利用できる小さなユーティリティの部品にすることができます。
そしてAutoitでGUI部分だけを別に作る事によりこれらの部品を組み合わせるだけでいろいろな事が簡単
にできるようになります。

・Basicとそっくりである
　これは多くの人にとってプラスになる事が多いはずです。Basicは初心者でも覚えやすくとっつきやす
い事は経験的に判っています。暫くAutoitプログラミングのブランクが有ったとしてもその書き方や感覚
を忘れてしまう事を心配する必要がありません。例えばPerlGUITestを学んで使い込むと、Perlのプラス
面が多い事は良く解りますが、それよりもとにかく直ぐにはじめやすい事が重要です。

・良く文書化されている
　Autoitは.chmファイルとオンラインの両方で詳しい資料を提供しています。また多くの利用例もあり、
これをコピーして実行する事は理解を助けます。またAutoItウェブサイトには親しみ易いフォーラムがあ
って第三者からの支援を容易に受ける事が出来ます。

・USBメモリに入れていつでもインストール無しで利用できる
　インストールする事でシステムを破壊する事は有りません。また、どこのPCにもオートメーション環境
を持ち歩く事が出来ます。

・標準的なエディタ・統合開発環境を持っている
　AutoitはSciTeエディタを使ってそれをAutoit用に設定します。AU3ファイルの編集や作成を簡単にする
完全なIDE環境を提供します。
865 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/24(土) 14:24:06 ID:C3AArdPx0]: >>860
つWindowController

要.NETだけど
866 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/24(土) 14:32:23 ID:BkqOk5US0]: WindowController
chi.usamimi.info
867 名前：861 mailto:はいはい、俺はumiumiですよ。 [2007/03/24(土) 14:36:32 ID:GhiwqB4f0]: >>862
>スクリプトは組めるがCOM使えない中級者ぐらいにしかPro版のメリットはない

がびーん。
ビンゴ過ぎて死語しか出ない。

でもシェア化前にRecIE落としてるから、
実際にPro版にお布施するのは相当先の話だな。
868 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/24(土) 16:44:13 ID:LGizvyWQ0]: >>867
RecIEうｐおねがい！
869 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/24(土) 16:47:57 ID:YI01TIfJ0]: デイトレで使うのもオンラインゲームで使うのも
テレクラでつかうのもかわらんと思う。
870 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/24(土) 16:50:08 ID:5fFnWtM30]: 日本人の金の払わなさは異常。
871 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/24(土) 16:54:12 ID:5fFnWtM30]: というか、値段や会社の業務を見ると、
企業相手に商売したいって事じゃないのか。

元から>>855 >>858 >>860みたいな貧乏人は相手にしていないだろうよ。
872 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/24(土) 20:53:05 ID:lOnStwBo0]: ソフト自体は無料で配布してサポートを有料にすりゃあいいのに。頭悪いな作者。
873 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/24(土) 21:12:19 ID:pN06s1ix0]: >>872
サポートって、掲示板やらメールやらで質問に答えること？
それじゃ労力のわりにぜんぜんお金にならないと思うけど
874 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/24(土) 21:14:02 ID:pE98QjQf0]: UWSC有料化を持ちかけた会社。
ttp://j-ken.co.jp/

やっちまったな・・・AHKに乗り換えだな
875 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/24(土) 21:20:15 ID:lOnStwBo0]: >>873
企業を相手に商売するんならそこがいちばん金になる
876 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/24(土) 21:50:27 ID:pN06s1ix0]: じゃあいっそのこと認定資格作って
それで儲けるってのはどうだ？w
877 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/24(土) 21:52:24 ID:3PcCL/oI0]: そうか春休みか
878 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/25(日) 16:50:59 ID:UZFeoDre0]: 有料化する事でドキュメントが充実するなら、願ったり叶ったりじゃないか。
HSPやなでしこを見習って欲しい。

そりゃ対象層が違うのは、分かっちゃ居るんですけどね。
879 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/25(日) 20:20:50 ID:81DYoDh90]: さよならＵＷＳＣ！いままでありがとうﾉｼ
880 名前：名無しさん＠お腹いっぱい。 [2007/03/25(日) 20:48:44 ID:NHgZXlqB0]: 最近、これ使い出したんですが、ＵＷＳＣを起動、実行させ
別ユーザーに切り替えて作業はできるんでしょうか？
一応やってみたんですがユーザー切り替えると、とまった状態になっている
みたいののですが・・・
できるのなら、お教えてほしいです；
881 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/25(日) 21:01:56 ID:BVjMWp1n0]: こっち使おうぜ

AutoIt
www.autoitscript.com/autoit3/

WindowController
chi.usamimi.info
882 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/25(日) 21:25:21 ID:50Ukn8d20]: 黙って乗り換えればいいから
883 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/25(日) 22:14:57 ID:/xeqLetr0]: >>880

たぶん無理。
やりたい内容にもよるけどユーザ切り替えじゃなく、
runasでしのげないかな？
884 名前：８８０ mailto:sage [2007/03/25(日) 23:45:51 ID:NHgZXlqB0]: >>881-883
レスありがとうです。
乗り換えも試みていますがWindowController をﾀﾞｳﾝﾛｰﾄﾞしても起動せず（どのＶｅｒも）
AutoIt は英語でちょっと理解するまで時間かかりそうだし・・
runasっていうやり方は知らないのでちょっと調べてみます。
多ユーザーでの操作は無理そうなのでちょっと思案してみます。
885 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/25(日) 23:57:57 ID:sqa1z0ug0]: > WindowController
> chi.usamimi.info
これUWSC使うのに便利そうなソフトだな。
その他にもその手のツールがあるし。
いただき。
886 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/26(月) 00:01:29 ID:sqa1z0ug0]: うさみみだって似すぎ。
887 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/26(月) 00:13:02 ID:HsV4RiOe0]: ドットネットフレームワークが初期化できません…。
.net 1.1じゃダメってか?
期待したのにこれはないだろう。ぺっ!
888 名前：８８０ mailto:sage [2007/03/26(月) 00:45:24 ID:TULfiqz50]: WindowController、これ使うのにインストール不足なのがあったので
入れたら起動できました。
多ユーザーでできればいいのだが・・・
889 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/26(月) 01:29:52 ID:sWHLiG1t0]: >>885

.NET framework必須てのが痛いなぁ
まっさらな環境でも動くものであって欲しい…
言語がC#なのは魅力的だけど
890 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/27(火) 02:52:37 ID:0WvhfyJS0]: Drop on Scriptをuwscで使ってる人いる？
説明どおり設定したけど動かない…
891 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/27(火) 18:10:05 ID:YP4KMB+w0]: ｸﾜｼく
892 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/27(火) 21:10:14 ID:YZCCCkq70]: AutoHotkeyでいいじゃん。COMも使えるようになったことだし。
893 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/27(火) 21:29:44 ID:SIZOJIiv0]: AutoHotkey
www.autohotkey.com
894 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/27(火) 22:26:34 ID:qOK6LF170]: 専用スレ
AutoHotkey 3
pc11.2ch.net/test/read.cgi/software/1157043396/
895 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/27(火) 23:44:26 ID:YP4KMB+w0]: 英語版ないの?
外人無視か?
896 名前：名無しさん＠お腹いっぱい。 [2007/03/30(金) 00:38:47 ID:FzIdn+cU0]: 質問ですが、このツールを起動して作業してる間、他の画面に切り替えて作業するってのは
てのは可能なんでしょうか？
できるならやり方、教えてほしいです・・
897 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/30(金) 01:38:57 ID:O/pRJDe20]: ウィンドウの状態等に影響されないように
動くようにスクリプトを組んでおけば可能

可能だが、スキルと手間次第
898 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/30(金) 14:24:36 ID:DhVxkDZk0]: きちがいどもRecIEうｐしろ
899 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/30(金) 16:20:39 ID:x9Te4/Wg0]: 　　　　へ　　　　　　　　　へ|＼へ　　　　　√￣|
　　　（　レ⌒）　　|＼　　（　|＼)|　|/~|　　ノ ,__√
|＼_／　　／へ＿＼)　　 |　| 　 |　|∠　　|　|＿＿　　　　　　　　　　　　　　　/￣`>　　　　 _, --､　　　　　　　＿
＼_.／|　|／　　　＼　　 .|　|(￣　　＿）　|　　　　）　　　/~￣~'i /~￣~'i/~￣　　　￣~7　　/　　　￣￣￣￣￣,／
　　／　　／￣~ヽ　ヽ.　　 |　| フ　　ヽ、　ﾉ　√|　|　　　./　　　././　　　/l,,,,,,,　　　,,,,,,,ノ､.＿.{＿＿＿＿　　　　./
　/　／|　|　　　｜　|　　　|　|（ノ|　|`､)　i　ﾉ　|　|　　　{　　　ノ/　　　./''~￣　　　￣7~　　　`ヽ　　　_／　　　/
　|　|　 |　|　　　/　/　　　|　| .　し'　　ノノ　 |　|　　　_,~二'-'~　　　/ヽ､,　　　　.,,ノ,ヽ-､　　 ./,_.l￣　　　　_ノ
　＼＼ﾉ　|　　/　/　　　 |　|＿＿＿∠-".　　 |　|　／~　　　　　　,／ ,,-'　　　　.//~￣￣　　~`>/　　 r-''~
　　＼＿ノ_／／　　　　（＿＿＿＿）　　　　　し',／_,,,,,,,,,､ ---ｰ'~''''~~~~~~~~~`''''ー-------'''''~　　 ./
　　　　　∠-''~　　　　　　　　　　　　　　　　　　　 ~／　　　 * O K O T O W A R Y　C U R E +_,,,／
　　　　　　　　　　　　　　　　　　　　　　　　　　　.／　　　 _,,,,､ -一一''''''''''''''''''''''ー--------一'''~
　　　　　　　　　　　　　　　　　　　　　　　　　.／_,, -ｰ''''~
　　　　　　　　　　　　　　　　　　　　　　　.／-~
900 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/31(土) 02:02:13 ID:lNlpDXMe0]: >>897
常時カーソルを動くようにしたかったので、ウィンドウに影響しそうな感じです。
レスありがとうでした。
901 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/31(土) 12:30:41 ID:ggPXtR/R0]: uwscの fukidasi()関数ってどうやって実現しているのでしょうか？
他の言語からOLEを使用して同じような関数を作成したいのです。

あとinputbox()についても分かる方がおりましたら、ぜひ宜しくお願いします。
902 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/31(土) 12:35:28 ID:hLF6DMUu0]: こっち使おうぜ

AutoIt
www.autoitscript.com/autoit3/

WindowController
chi.usamimi.info
903 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/31(土) 15:02:13 ID:8qH2AfkN0]: >>902
煽る訳ではないが、何故に乗り換える必要があるのか？
それほど使って欲しければ、それぞれの利点と欠点を簡潔に述べよ。
904 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/31(土) 18:07:25 ID:3WSOWTTg0]: タスクバーのuwscは消せないの?
StopForm(FALSE)でも駄目だった。
905 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/31(土) 21:28:39 ID:CLHmQ1tP0]: >>900
目的を達成する手段にもいろいろあるから
マウスを動かさずに同じ結果が得られる方法があるかもしれないよ
906 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/31(土) 21:34:07 ID:CLHmQ1tP0]: >>901
ウィンドウ作ってスタティックコントロール貼ってるだけじゃないかなぁ？

InputBoxはWSHのやつが使えるんじゃない？
907 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/31(土) 21:38:25 ID:CLHmQ1tP0]: >>903
AutoItは一通りドキュメント見てみたけど機能にはUWSCに決して引けは取らない
むしろGUIも作れるし、ライブラリ、開発環境(SciTEはいいね)の充実度、
文法の一貫性等、勝ってる気がする
最大の難点はコミュニティもドキュメントもすべて英語だということ
素人にはおすすめできない
あとchkimg大好き人間にも
908 名前：901 mailto:sage [2007/03/31(土) 23:18:40 ID:5Yb1Nwwp0]: >>906
レスサンクスです。
そのあたりの言葉をぐぐってみます。
UWSCの、fukidasi（） input() sendstr()
を使うためだけにUWSCを選択していたので実現法をしりたかったんです。

それにしてもPro版（新バージョン）はやけに重い。
4.1で安定して連続稼動してたスクリプトがすぐに仮想メモリいっぱいになる。
909 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/03/31(土) 23:27:31 ID:YPn25uej0]: ネットの外人が英語版希望してるんだがもう辞めたのか?
めんどくさいので英語版の4.1dのアドレスおしえて
これが最新と伝えたがたぶんばれるだろうな。

ついでに質問ひとつ
fukidasiの文字列はGetStrじゃ読めないみたいだがなんかの
Win32API使えば読める?
910 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/01(日) 08:58:02 ID:adG0ejDi0]: 金儲けにはしったUWSCは見限って
こっち使おうぜ

AutoIt
www.autoitscript.com/autoit3/

WindowController
chi.usamimi.info
911 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/01(日) 12:11:13 ID:fo4Xkd3C0]: タイトルの文字列による判定の他に、InnerTextによる判定でも試そうかと思って試したら
以下のスクリプト（一部抜粋）の箇所でかなりの確率でエラーが発生。
0.5秒が早すぎるのかな？
うまくいく場合もあり。。。いきなり最初にエラーの時もあり。。。

//
REPEAT
SLEEP(0.5)
UNTIL POS("文字列",IE.DOCUMENT.BODY.INNERTEXT)
//

「Uスクリプト: COM_Error:モジュール 'UWSC.exe' のアドレス 00521550 でアドレス 00000000 に対する読み込み違反がおきました。」
912 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/01(日) 12:41:51 ID:SLYcsGb70]: これ、確かVer3.1の時は動くと思う。
この前Ver.4.2で動かしたらこのエラーが出た様な気がする。
それでまた3.1に戻ったけどw
913 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/01(日) 13:20:28 ID:i/cUBwgO0]: >>910
他人の金儲けがイヤなんじゃなくて、おまえが金取られるのがイヤなだけだろ？
914 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/01(日) 14:33:28 ID:fo4Xkd3C0]: 観光地等で、今までタダで商品をかっぱらっていたお猿さん。
明日から一部の商品には対価を支払えと言っても意味が通じないお猿さん。
915 名前：名無しさん＠お腹いっぱい。 [2007/04/01(日) 14:56:09 ID:PbZs9CXV0]: 同等のものがタダで使えるのにわざわざ金払う人よりはお猿さんのほうが賢いと思いまーす
916 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/01(日) 15:02:20 ID:xBjIORbj0]: だから使えばいいじゃん
917 名前：名無しさん＠お腹いっぱい。 mailto:はいはい、俺はumiumiですよ。 [2007/04/01(日) 15:26:12 ID:oCcZ9llM0]: >>915

UWSC Pro 6,720円

使い慣れたUWSCを捨て、英文ドキュメントの類似ソフトの
言語・仕様を身につけるために必要な時間：5時間

今までに貯まったUWSCスクリプトを、類似ソフト用に
書き直すのに必要な時間：10時間

6,720円÷15h=448円

結論：
有料化を理由に乗り換えたがる人間の
時給は448円以下。ｶﾜｲｿス
918 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/01(日) 15:32:26 ID:QmnxHExP0]: お金払うのいやなら
Pro版じゃなくてFree版使えばいい
Free版でなにか困ることある？
919 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/01(日) 15:36:51 ID:xBjIORbj0]: Free版で特に困らないから不満もないってとこ

なくてもいいけどちょっと便利なのを含めてシェアってのは海外製でもよくあるし
別になんとも思わない。
920 名前：名無しさん＠お腹いっぱい。 [2007/04/01(日) 16:55:27 ID:bzr723gj0]: ＲｅｃＩＥってなくなったの？
やべー。どっかにあるかな。
921 名前：913 mailto:sage [2007/04/01(日) 17:09:24 ID:i/cUBwgO0]: >>914
> 観光地等で、今までタダで商品をかっぱらっていたお猿さん。

俺はシェア化もいいと思う人間だが、今までフリーだったものを使ってた
ことについてこんな例え方されたらさすがにムカつくわ。神経を疑う。
922 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/01(日) 17:40:15 ID:CgmyEoUf0]: >>920
4.1dに入ってるのじゃダメ?
923 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/01(日) 17:50:06 ID:QmnxHExP0]: >>913
914の例えは
ぜんぜん例えになってないから気にスンナ

今までは売り物ではなかったのだから
商品ではないし、かっぱらっていたわけでもない

何故に何の共通点もない観光地の猿にかけて例えようとしたのか
はなはだ疑問
924 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/01(日) 17:51:34 ID:QmnxHExP0]: >>922
4.2より前はRecIEは別配布だったYO
925 名前：名無しさん＠お腹いっぱい。 [2007/04/01(日) 18:08:55 ID:bzr723gj0]: Recieはproに統合されたのか。まいったね。
今もってるやつ大事にしておく。
926 名前：名無しさん＠お腹いっぱい。 [2007/04/01(日) 18:14:32 ID:rvyPBRxL0]: >>921
なんでそのレスで神経を疑うのか神経を疑うが
927 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/01(日) 18:16:58 ID:CgmyEoUf0]: あ、そうか。
ダウンロードもできなくなってるな。
これは再配布できないのか?
今回の件で一番気になるのは旧/フリー版のダウンロードと再配布だな。
928 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/01(日) 18:44:46 ID:fo4Xkd3C0]: おまいら食い付きすぎｗ　良く読め。
漏れはUWSCの一連の事の”例え”とは一言も言ってないぞ？ｗ
929 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/01(日) 19:42:05 ID:QmnxHExP0]: >>928
それならこれあげる
つチラシ
930 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/01(日) 19:54:58 ID:QmnxHExP0]: >>927
旧/フリー版のダウンロードは問題ないと思うよ。
機能的には4.2Free＞4.1dなんだし。

旧版RecIE1.0aの再配布についてはグレーゾーンかな。
過去バイナリのリポジトリでも
J-Kenに確認した結果、再配布はやめることにしたみたい。

ちなみにPro同梱のRecIE1.1は
UWSCProレジストしてないと起動できない。
931 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/02(月) 12:11:12 ID:g1Zhvdkx0]: 上のほうで inputbox() を他の言語から実現方法を尋ねていたものなんだけど
WSHのインプットボックスは利用できないみたい。

OLEのみの利用からどうにかしてインプットボックスは作れないでしょうか?

解決してくれた方には、ものすごい感謝をさせていただきます。
うみうみやさんも見てたらお願いします。
932 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/02(月) 15:50:35 ID:hUBsO6hf0]: 自分で頑張って書いて貼ってくれたら
俺からものすごい賛辞をおくらせていただきます。
933 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/02(月) 16:39:53 ID:bL7dTpiU0]: >>931
使う予定の他の言語ってのが何かは知らないけど
COM使えるならVBScriptのinputbox使ったらいいんじゃね？
ヒント：スクリプトコンポーネント
934 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/02(月) 16:41:28 ID:bL7dTpiU0]: 失礼。
つスクリプトコントロール
935 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/02(月) 17:04:41 ID:bL7dTpiU0]: COMコンポーネントのインストールができる環境なら
使えるのいくらでもあると思うけど。それこそAutoItXでもいいしさ。

それができない環境という条件でやるなら

sendstrは代わりにsendkeysで我慢するか
Excel経由でWin32API叩く

fukidasiは同じようなの見当たらないけど
小さいIEでも立ち上げてそこに表示するとかで代用できない？
それかExcel経由でWin32API

どちらにしても、素直にUWSC使っといたほうが楽だと思うなあ。
逆に聞きたいんだけど、UWSC使えない理由は？
936 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/02(月) 20:21:56 ID:JLq+GLJt0]: 有料版を作った意地汚さ
937 名前：931 mailto:sage [2007/04/02(月) 21:08:20 ID:ogtfzMDi0]: >>933
ヒントありがとうございます。
こんなに解決できないのはMS系言語に対する知識の乏しさだと思いました。
なんだかいけそうな気がしてきました。

>>935
Win32APIを利用したことがなかったのですが、そんな便利なものがあるんですね。
fukidashi()はひとまず置いといて、print()を
InternetExplorerのメニュー等、全非表示で対応しようかと思っています。

UWSC関数を自作しようとする理由はRubyです。
やはりテキスト処理なんかでかなり違ってくるところがありまして。
あとは自作関数の移植の楽しさも。

なんだか申し訳ない気持ちです。
938 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/02(月) 21:21:57 ID:7ft9hyJL0]: お金を稼ぐことが悪いことだと考える人が多いと
ますます国が貧しくなっていきます。
特に貧しい人がこの考えに陥り安く、さらに貧しさを増す。

これまでに何度もシェア化した作者がたたかれてるのを見たが
はっきり言ってこういう土壌では日本の産業は成長しない
金に意地汚いのと、正当に対価を得るのとは別の問題
939 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/02(月) 21:46:58 ID:Ed0bbl2l0]: この手のツールは大抵ユーザが増えるとシェアウェアになる。
そしてPROの名前が付く。
しかし実際はシェアウェアには海外に強力なライバルがたくさんある。
中には日本語のドキュメントやサポート付のものもある。
UWSCの強みは日本国内では海外のツールがあまり知られておらず
これまでのフリー版で知名度が高くなっている事。
940 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/02(月) 21:56:15 ID:SvMsYSWL0]: ttp://home.att.ne.jp/yellow/town/rockm.htm
マウスカーソルが設定されたタイミングで動いて、画面をクリックしていきますので、毎日の定型的な操作のすべてを自動で記録・再生することができます。
また、キーボード操作までも自動化可能ですので、ほとんどのWindows操作を自動化することが可能です。
普段行っている操作全てが自動化できるため、これ一つで用途は無限大に広がります。
自動処理の安定性・信頼性の高さから、すでに多くの企業や公共施設等で使用されており、使用者からは「驚くべき生産性をもたらす」と、たいへん喜ばれております。
941 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/02(月) 22:02:04 ID:t2yJmR+90]: 有料化はまあいいんだが高すぎだろ
942 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/02(月) 22:06:54 ID:bL7dTpiU0]: >>931

なるほどRubyか。
オブジェクト指向プログラミング、したいよね。

RubyならWIN32API扱うライブラリがあるから
それ使って、手間さえ惜しまなければ
UWSCと同等、そしてもちろんそれ以上のこともできるはず
943 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/02(月) 22:16:22 ID:bL7dTpiU0]: >>940

それは正直、使い物にならない…

>すでに多くの企業や公共施設等で使用されており
安易に飛びついたせいで、大変なことになって使用禁止になった例も聞いている
944 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/02(月) 22:19:06 ID:SvMsYSWL0]: 大変な事って？
945 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/02(月) 22:27:36 ID:bL7dTpiU0]: 簡単に言うと
誤動作によって生じた間違いを修正するのに
ものすごい手間がかかったってこと
それにビジネスでは間違いは信用問題にもつながるしね
946 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/02(月) 22:49:53 ID:bL7dTpiU0]: 別にネガティブキャンペーンするつもりはないんだけど…

RocketMouseは状況に応じて処理を変えたり
エラーを自分で検出したりといった処理を書くことがほとんどできないじゃん？

だからミッションクリティカルな状況ではちょっと使えないって意味

もちろん普段の定型作業をちょろっと記録して
ちょろっと再生できればいいような用途では便利だと思うよ

でもそれなら別にお金出さなくても
フリーのUWSCの記録再生機能で充分じゃね？と思ってしまう
947 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/04(水) 02:49:56 ID:/A7uTJSC0]: ソフトの有料化に反対はしないが
UWSCがそこまでのソフトだとは思えないが？
本にも載って各所で紹介されて
「有名になった」からだけの有料化にしか思えない
948 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/04(水) 03:48:39 ID:BLrduIXk0]: UWSCは２年後にはフリーに戻ると予想している
949 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/04(水) 03:57:37 ID:CA8Jbx2L0]: 無料で日本語も気楽に使えたし日本語のサンプルもある。
そのようなソフトは殆どなかったからユーザが増えた。
しかも個人的にちょっと利用するユーザより仕事や
ゲームユーザの方がヘビーユーザが多い。
これだけでじゅうぶんに商売にする価値になるだろ。
UWSCがどんなものであれ、それが仕事であれば
それがどんなウンコな方法であってもとにかく動くように
しなきゃいかん事になる。これは何でも同じ。
特注システム＋MS系ソフトとか既に完成されたような場所でも
PCに張り付く事を余儀なくされる事は一杯あるからな。
950 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/04(水) 07:05:42 ID:XcGAeyGY0]: >>947
有名になったから云々はその通りだろう。が、そこまでのソフトかどうかはユーザー次第だ。

フリー公開を止めての有料化ではないのだから、今のところは選択肢が増えただけだな。
今後のFREE版公開やバージョンアップが止まったりすると悲しいから、一応最新版は保管した。
951 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/04(水) 08:45:23 ID:PSfFtV0h0]: >今のところは選択肢が増えただけだな。
にもかかわらずごねてる基地外は何がしたいんだろうな。
俺たちが育ててやった恩も忘れて金儲けに走って利益を独占するなんてけしからん。
なんてけしからんとかアホな事考えているんだろうか。
952 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/04(水) 09:08:57 ID:wYRVp9K60]: こっち使おうぜ

AutoHotkey
www.autohotkey.com
pc11.2ch.net/test/read.cgi/software/1157043396/
953 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/04(水) 09:49:30 ID:CA8Jbx2L0]: >>952
いいんだけどunicodeくらい普通ニ使えないと困る。
954 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/04(水) 10:58:33 ID:gBRd0dul0]: >>952
煽る訳ではないが、何故に乗り換える必要があるのか？
それほど使って欲しければ、それぞれの利点と欠点を簡潔に述べよ。

知ってる範囲では、流行らせるページの存在と、割と活発な日本語コミュニティは利点の様だな。
955 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/04(水) 11:40:47 ID:REf8q+680]: 貼っている香具師はただの煽りだろうが、
AutoHotkeyにはuwscにはない機能はいくつかある

ショートカットキー割当てが強力
（何のアプリケーションが動いている時だけ有効なショートカットキーもできる）
一定期間入力がなければスクリプト開始、という機能がある
スクリプトファイルにファイルをドラッグ＆ドロップできる

しかしAutoHotKeyの文法は取っつきにくい
956 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/04(水) 13:19:11 ID:Cy/GE0al0]: AHKは文法キモすぎ。
957 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/05(木) 00:03:31 ID:CA8Jbx2L0]: > ショートカットキー割当てが強力
> 一定期間入力がなければスクリプト開始、という機能がある
これってマウス用の常駐ソフトと同じ類なんだろ?
だとしたら俺には邪魔臭いだけだなぁ・・。
958 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/05(木) 00:10:13 ID:z8Argzt90]: ホットキーを利用しないなら別に常駐させる必要はないけどな
959 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/05(木) 00:45:45 ID:NJWJS1WW0]: 常駐させればホットキーなんてUWSCでもなんでもできるだろ。
もし常駐させるならもっとサイズのちいさな別のソフト使うよ。
960 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/05(木) 03:39:10 ID:l42HB2fw0]: >>955
> スクリプトファイルにファイルをドラッグ＆ドロップできる
>>317
961 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/05(木) 12:33:27 ID:YEYCfAUV0]: ttp://www2.osk.3web.ne.jp/~sm/products.html
ここにあるkOSUみたいな機能のスクリプト書いたら
1000円で売れますか？
7個売れたらPro版買っても元とれるな、うはw
962 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/06(金) 03:22:31 ID:i/shweZS0]: ドロップハンドラがうまく動かん…。
レジストリ設定はUWSCが出たての頃バッチファイルかなんかを真似て
そのままやったものだったと思う。今はレジストリとかいじらなくなったので
全然覚えて居ないのだが…。レジストリ検索したらこんな感じだった。

HKCR\.uws
　uwsfile
HKCR\PersitantHandler
　{5e941d80-bf96-11cd-b579-08002b30bfeb}
HKCR\uwsfile\Shell\実行\command
　"C:\Program Files\Uwsc\Uwsc.exe" "%1" "%*"
HKCR\uwsfile\shellexe\DropHandler
　{86C86720-42A0-1069-A2E8-08002B30309D}

HKCR\Application\UWSC.exe\shell
　(標準)= "実行"
　FriendlyCache=UWSC
　FriendlyCacheCtime=xx xx xx xx xx xx xx xx
HKCR\Application\UWSC.exe\shell\実行\command
　"C:\Program Files\Uwsc.exe" "%1"　

以前はPARM_STRとか無かったかもしれんし、Win9xでためしてみたかどうかも記憶に無い。
Win2Kにしてからもレジストリ書き出したのをそのまま読み込んで特に変更して無いと思う。
HKCR\Application～は全く覚えが無いので良くワカラン。
たまたま今回送るメニューに突っ込んでPARM_STR[]を拾うスクリプトを書いてみたら
パラメータが全然もらえない…。もう頭が腐ってるので誰か間違いを訂正してほしい。
963 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/06(金) 03:24:21 ID:i/shweZS0]: >>962 ちょっと間違えた

> HKCR\PersitantHandler
> 　{5e941d80-bf96-11cd-b579-08002b30bfeb}
　↓
> HKCR\.uws\PersitantHandler
> 　{5e941d80-bf96-11cd-b579-08002b30bfeb}
964 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/06(金) 03:32:22 ID:i/shweZS0]: >>962
もひとつ間違い

> HKCR\uwsfile\Shell\実行\command
> 　"C:\Program Files\Uwsc\Uwsc.exe" "%1" "%*"
　↓
HKCR\uwsfile\Shell\実行\command
　"C:\Program Files\Uwsc\Uwsc.exe" "%1" %*

なんどもすんません…。
965 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/06(金) 23:02:46 ID:hA8MgwtQ0]: >>962
×shellexe
○shellex

Windows Registry Editor Version 5.00
[HKEY_CLASSES_ROOT\uwsfile\shellex\DropHandler]
@="{86C86720-42A0-1069-A2E8-08002B30309D}"
966 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/07(土) 03:14:48 ID:E7AhKoCt0]: >>965
すまん…。
最近めんどくさくて手でコピーしてしまうので。
そんでそのとおりになってるんですわ。
でもまぁ以前使えてたような記憶があるので自分で調べてみます。
967 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/09(月) 10:11:27 ID:aWahsl5Q0]: public Obj_Shell = CreateOleObj("Shell.Application")
ハンドル = Obj_Shell.Windows(ハンドル番号)

こんな感じでＣＯＭハンドルとってきたんだけど、 HNDTOIDでＵＷＳＣ用のＩＤに変換しようとすると
-1しか帰ってこない。
ＣＯＭハンドルでIESETDATAとか使えているからハンドルとしては問題ないばすなんだけど、
ＣＯＭハンドルからＵＷＳＣ用ハンドルに変換する方法ってこれでいいでしょうか。
968 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/09(月) 13:18:34 ID:fswpoqEL0]: よくない。
COMハンドルとHNDTOIDで扱うハンドルはまったくの別物だよ
969 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/09(月) 13:23:18 ID:Prbq67bm0]: こっち使おうぜ

AutoIt
www.autoitscript.com/autoit3/

WindowController
chi.usamimi.info
970 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/09(月) 13:37:54 ID:DQxaN6Ri0]: どこのサイトでスクリプト勉強すればいいですか？
971 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/09(月) 14:21:08 ID:fswpoqEL0]: 情報が古かったり、更新が止まっていたり、
「ここで決まり」と言えるようなチュートリアル的ページはまだ無いのが現状。
公式ページのリンク集などからたどって
いろんなところ見て回るしかないと思われ
972 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/09(月) 20:35:25 ID:zG2z9OQC0]: ちょっと質問。
htmlにsubmit属性のボタン置いて、クリックしたときにcheckboxをすべてdisabledにする
関数つくったんだけど。
procedure dis(formName,objName,flg)
objForm = ("document."+formName)
ifb (objName = "all") then
for i=0 to objForm.length
objForm[i].disabled = flg
next
else
for i=0 to objForm.length
ifb (objForm[i].type = objName) then
objForm[i].disabled = flg
elseif (objform[i].name = objName) then
objForm[i].disabled = flg
endif
next
endif
fend

こんな関数で実装。
973 名前：972 mailto:sage [2007/04/09(月) 20:36:28 ID:zG2z9OQC0]: ifb GETFORMDATA("aaaa_btn") = TRUE then
dis("form1","checkbox",true)
endif

こんな形で使いたい。

これだとfor i=0 to objForm.length ここでcomエラーに。
OleStr型からDispatch型へのバリアラント型変換はできないって。
ここら辺について詳しい人教えてください。。
974 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/09(月) 21:31:49 ID:fswpoqEL0]: objForm = ("document."+formName)

これは無茶やろw
975 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/09(月) 21:38:45 ID:qIZ/lpkv0]: こっち使おうぜ

AutoIt
www.autoitscript.com/autoit3/

WindowController
chi.usamimi.info
976 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/09(月) 21:50:06 ID:fswpoqEL0]: objForm = ("document."+formName)
ここでobjFormに入っているのは「単なる文字列」であって「オブジェクト」ではないよ
だからobjFormをオブジェクトとして扱った（＝プロパティにアクセスしようとした）とたん、
「OleStr型からDispatch型へのバリアント型変換はできない」と言われてしまうってワケ

もしやるんなら
objForm = ie.document.getElementsByName(formName).item(0)
とかじゃないのかな
977 名前：名無しさん＠お腹いっぱい。 [2007/04/12(木) 15:09:40 ID:ljN5gr/P0]: 【マクロ】　UWSC　Part3　【シェアウェア化】
pc11.2ch.net/test/read.cgi/software/1176358142/
978 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/12(木) 20:23:38 ID:cLGbW9dl0]: ほんと貧乏人の僻みはキモイなｗ
ゆとりなし世代かｗ
979 名前：名無しさん＠お腹いっぱい。 [2007/04/12(木) 20:44:26 ID:QpEmRYGy0]: んー久しぶりにこのスレ来たんでよくわからん
フリー版は今までのよりも機能が劣るのか?
だったらそのままにしておくが
980 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/12(木) 20:45:20 ID:YfntQ+RK0]: >>977
有料化に対する憎悪がスレ立ての目的というキモいスレだな。
皆さん、これ使いたいと思う？　俺はＮＯ。
981 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/12(木) 21:00:26 ID:S+uvTyUQ0]: こんなシチュエーションの処理でつまずいてます。

forによるループ処理で、指定回数繰り返す処理です。
で、ループの初めで例えば変数（wks）を生成して、
2回目以降の処理にて、1つ前の処理で生成した値を参照する方法ってありますか？

>【マクロ】　UWSC　Part3　【シェアウェア化】
UWSCの場合は従来のフリー版が現在も存在して、機能が増えたPRO版が新たにシェアウェアとして
登場したのだから、シェアウェア化っていうのは間違いでは？ｗ
982 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/12(木) 22:09:38 ID:xKHHIYVc0]: むしろ次スレいらねんじゃね？
983 名前：名無しさん＠お腹いっぱい。 [2007/04/13(金) 10:11:20 ID:iTumlDMp0]: >>981
変数二つ持てば良いだけでは？
984 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/13(金) 13:09:14 ID:kTlLKoA60]: >>983
いえ、その変数もループ回数毎に中身が入れ替わります。
985 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/13(金) 13:46:16 ID:Dw1kwxSc0]: >>981
一旦ループ(for)前に変数の基準値(?)を定義してやって
ループ最後でその変数を替えてやればよいのでは？
986 名前：981 mailto:sage [2007/04/13(金) 15:56:36 ID:kTlLKoA60]: 皆さん、レスありがとです。参考になりました。
かなり近いところまでは逝きましたが変数の中が文字列だと厳しいですね。。
IF文で1回目のみを除外したり何通りか色々書いてみましたが。
最初にループ回数分を全て配列に代入して処理すれば逝けるかも。

取り敢えず代替え案として、変数を数字にする事で
望みの結果になったのでこれで妥協します。ｗ
987 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/13(金) 16:32:38 ID:9l6QXSCz0]: a
988 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/13(金) 16:33:31 ID:9l6QXSCz0]: b
989 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/13(金) 22:32:11 ID:tuzTfjN50]: 自動化ツール総合スレ立てればいいな
990 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/14(土) 07:04:59 ID:p2ZYZF0d0]: 自動ドアマニヤとかきそうだな。
991 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/14(土) 12:23:59 ID:mdPjr2v00]: フリーでもシェアでもなんでもいいよ
992 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/14(土) 13:03:15 ID:jIHCYkWv0]: 児童化ツール
(;´Д｀)ﾊｧﾊｧ
993 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/14(土) 13:50:17 ID:ithzHL9M0]: >>989
これが落としどころだろうね
AHKは単独スレでも伸びてるからいいけど、他の自動化ツールで総合スレにまとめた方が
今後乱立しないで済むからいいと思う。テンプレに入れるのって何個あるかな？
uwsc、AutoIt、WindowController、
994 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/14(土) 14:38:56 ID:p2ZYZF0d0]: C++
995 名前：名無しさん＠お腹いっぱい。 [2007/04/15(日) 22:54:33 ID:vo7IRD9l0]: 埋め
996 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/15(日) 22:55:36 ID:vo7IRD9l0]: 埋め
997 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/15(日) 22:56:40 ID:vo7IRD9l0]: 埋め
998 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/15(日) 22:58:15 ID:vo7IRD9l0]: pc11.2ch.net/test/read.cgi/software/1176358142/
999 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/15(日) 22:59:13 ID:vo7IRD9l0]: 999
1000 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/15(日) 23:00:13 ID:vo7IRD9l0]: 1000
1001 名前：１００１ [Over 1000 Thread]: このスレッドは１０００を超えました。
もう書けないので、新しいスレッドを立ててくださいです。。。

[ 新着レスの取得/表示 (agate) ] / [ 携帯版 ]

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