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

自動化ツールuwsc使い ..

331:名無しさん＠お腹いっぱい。
06/12/01 06:45:36 HqQsiF3P0
// Internet Explorer 上での文字設定、ボタンのクリック　（COM利用）
// エディトボックス、ボタンはHTMLソースの'NAME='や'VALUE=' から確認
IE = CreateOLEObj("InternetExplorer.Application")
IE.Visible = True
IE.Navigate("URLﾘﾝｸ(prog-etc.bbs.thebbs.jp))// 掲示板
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:名無しさん＠お腹いっぱい。
06/12/01 07:12:38 xAQgo5dN0
手軽に画像の更新をしたいなあと思って
画像をショートカット(実行ファイル)に放り込むと特定のアップローダーにpostする、ということをやりたいんですけど、
このツールで出来ますか？

333:名無しさん＠お腹いっぱい。
06/12/01 09:35:19 bhBGT+M70
>>332
まぁしこしこスクリプト書けばできるが、あまりUWSCが向いてるようには思わない。
PerlとかでHTTPしゃべらす方がスマートだと思う。

334:名無しさん＠お腹いっぱい。
06/12/01 11:48:02 i7V3wzgJ0
>>331
smは、documentの直下じゃないよ。
　　IE.document.Fm.sm.click()
とか
　　IE.document.all["sm"].click()
formsから辿る方法とか、いくらでもやり方ある
※ Fmは、FROMタグのname

335:名無しさん＠お腹いっぱい。
06/12/01 21:30:51 Xs7RUjw90
CHKIMGをFPSゲームで使おうと思っているのですが、動的なところでどうしても画像判別ができません。
マウスがアクティブになるところ（メニュー画面など）では一応読み込めるようです。
フルスクリーンやウィンドウ両方で試しても読み込むことができませんでした。
CHKIMGなどでは判別することは不可能なのでしょうか？
わかる方がいましたらお願いします。

336:名無しさん＠お腹いっぱい。
06/12/01 22:24:41 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:名無しさん＠お腹いっぱい。
06/12/02 00:03:58 CWQeQlur0
>>334ありがと
できた、

338:名無しさん＠お腹いっぱい。
06/12/02 00:34:00 lizCI7GG0
06年12月02日00時33分

339:名無しさん＠お腹いっぱい。
06/12/02 07:48:39 43OZZphG0
しかしまだ難しい、ちょっと＂を全角．半角間違えただけでエラーがでて、その理由までＵＷＳＣは教えてくれない、
１０分もプログラムにらめっこ状態になった

340:名無しさん＠お腹いっぱい。
06/12/02 17:42:44 hvFLwMCZ0
エラーが出て教えてくれてるわけだが。

341:名無しさん＠お腹いっぱい。
06/12/02 19:33:04 DDIOW/mZ0
// Internet Explorer 上での文字設定、ボタンのクリック　（COM利用）
// エディトボックス、ボタンはHTMLソースの'NAME='や'VALUE=' から確認
IE = CreateOLEObj("InternetExplorer.Application")
IE.Visible = True
IE.Navigate("URLﾘﾝｸ(prog-etc.bbs.thebbs.jp))// 掲示板
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:名無しさん＠お腹いっぱい。
06/12/03 08:13:53 Zdl4S4Sj0
ソースにnameが無い場合、どうやってｃｌｉｃｋを設定するの？

343:名無しさん＠お腹いっぱい。
06/12/03 13:24:17 snS6N3rq0
　sleep(0.1)を入れるといいかも

344:名無しさん＠お腹いっぱい。
06/12/03 19:09:01 JP0s2lkY0
>>341
せっかく新しい関数が追加されてるので

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

IE.document.Fm.sm.click()　でもいけると思うけど

345:名無しさん＠お腹いっぱい。
06/12/03 19:35:32 JP0s2lkY0
>>342
IE.document.all.tags["input"].item[3].click() 　みたいな感じで

あと最近追加されたIE操作用の関数もあります

346:名無しさん＠お腹いっぱい。
06/12/03 20:13:39 Ww/6AySw0
マウス動かしたりchkimgとか使わずにCOMの操作だけで済む場合は
UWS使わずにVBスクリプトで書くほうがスマートだなと最近気付いた。
まだWebで調べながら試行錯誤しながら書くレベルだけど
どこでも実行できるから便利だよね。

347:名無しさん＠お腹いっぱい。
06/12/03 21:04:09 VUpqkTxs0
最近スレ伸びてるね
もしかしてどこか厨雑誌で紹介された？

348:名無しさん＠お腹いっぱい。
06/12/03 21:25:23 JOKqZmnZ0
// Internet Explorer 上での文字設定、ボタンのクリック　（COM利用）
// エディトボックス、ボタンはHTMLソースの'NAME='や'VALUE=' から確認
IE = CreateOLEObj("InternetExplorer.Application")
IE.Visible = True
IE.Navigate("ｽﾚﾘﾝｸ(software板:200番)n-")// 掲示板
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:名無しさん＠お腹いっぱい。
06/12/03 21:30:43 JOKqZmnZ0
06年12月03日21時30分

350:名無しさん＠お腹いっぱい。
06/12/03 21:31:57 JOKqZmnZ0
成功21時40分に自動書き込み設定

351:名無しさん＠お腹いっぱい。
06/12/03 21:40:40 JOKqZmnZ0
06年12月03日21時40分

352:名無しさん＠お腹いっぱい。
06/12/03 21:41:16 JOKqZmnZ0
よっしゃー

353:名無しさん＠お腹いっぱい。
06/12/04 00:28:04 MJakTm8F0
↑喜んでるところまで自動なら神

354:名無しさん＠お腹いっぱい。
06/12/04 03:25:18 WHrXC3Jy0
ありがとうございます

355:名無しさん＠お腹いっぱい。
06/12/04 04:10:21 OmF4uqP80
テストはテストスレでやれよボケ

356:名無しさん＠お腹いっぱい。
06/12/04 09:02:00 Qn4XOe5q0
type="file"のボックスのvlalueに入力する方法ってある？

type="text"と同じように指定しても入らない

357:名無しさん＠お腹いっぱい。
06/12/04 19:10:25 rtCP1keL0

ファイル名入力フィールド（type="file"）

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

URLﾘﾝｸ(www.tohoho-web.com)

358:名無しさん＠お腹いっぱい。
06/12/04 21:10:31 rtCP1keL0

クリップボードへ入力したいものを送っておいて
フォーカスを移動して右クリック貼り付け
SCKEY(getid("- Windows Internet Explorer"),VK_APPS,VK_DOWN,VK_DOWN,VK_DOWN,VK_DOWN,VK_RETURN)

359:名無しさん＠お腹いっぱい。
06/12/05 00:38:41 TfVwWult0
IE = CreateOLEObj("InternetExplorer.Application")
IE.Visible = True
IE.Navigate("URLﾘﾝｸ(headline.2ch.net))// 掲示板
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:名無しさん＠お腹いっぱい。
06/12/05 03:17:03 4dBMWCwl0
お前等2chにアクセスすんのにいちいちIE使うなボケ。

361:名無しさん＠お腹いっぱい。
06/12/05 03:34:03 lDz8eYVx0
基本は wget と curl だよな。
寂しくなったりしたときは telnet で喋るのもいいが。

362:名無しさん＠お腹いっぱい。
06/12/05 10:31:03 PMUEJKEi0
まだ難しいよな、数学で言えば、掛け算の九九をすっとばして、高等数学やるような気持ち

363:名無しさん＠お腹いっぱい。
06/12/05 15:04:59 UmSZpxfc0
でも「UWSCは難しい、もっと簡単にせよ」というのはこのスレでは一人なんだよな

364:名無しさん＠お腹いっぱい。
06/12/05 16:39:26 Xx8yar820
すれ違いかもしれないけど、
特定の時刻に決まった座標位置をダブルクリックしたい場合
このソフトうまく動かないんだけど、ネットゲームで使いたいんだけど

365:名無しさん＠お腹いっぱい。
06/12/05 17:28:39 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:名無しさん＠お腹いっぱい。
06/12/05 18:54:35 PMUEJKEi0
うーんうまくいかない。自分はタイマー自動でファイル（Ｆ）⇒名前をつけて保存
⇒ファイル名（Ｎ）でファイル名の後ろに日付をつけて保存したいんだけど、

マウスとカーソルだけでプログラム作れるようになればいいのになあ

367:名無しさん＠お腹いっぱい。
06/12/05 19:07:09 PMUEJKEi0
>>365
あーできた
ありがとうただ
ファイルの種類をアーカイブで保存したかった。

368:名無しさん＠お腹いっぱい。
06/12/05 19:17:24 PMUEJKEi0
//　文字の送信
SENDSTR( ID,　文字列,　[番号,　送信モードフラグ,　ACC指定] )
引数
　　ID：　Windowを識別するID
　　　　　（ID = 0　であればクリップボードへ）
　　文字列：　送りたい文字列
　　番号：　左上から数えたエディトコントロールの順番（１から指定）
　　　　　　　（デフォルトはフォーカスを持ったエディトコントロール）　　　　　　　
　　送信モードフラグ：　
　　　　　　　FALSE：　追加（デフォルト）
　　　　　　　TRUE：　置き換え
　　ACC指定：　
　　　　　　　FALSE：　APIによる（デフォルト）
　　　　　　　TRUE：　アクセシビリティ用インターフェースを利用
番号の部分が難しい、ウインドウみたいにソースが使えない

369:名無しさん＠お腹いっぱい。
06/12/05 19:28:22 PMUEJKEi0

なきゃないでかまわんがやはり
フリーのソフトはつかわんほうがいいのかな。
なんか怪しいソフトでも困るしなあ。いくら便利でも社長がちゃんとした人物
でないと、ウィンドウズＸＰ作ったビルゲイツはエイズの研究費出したり
して悪人でないだろうと思って使っているが、社員全部を管理できるかといえば
というきがする。

370:名無しさん＠お腹いっぱい。
06/12/05 19:43:58 TbpDXn5y0
な
フ
な
で
し
と

371:名無しさん＠お腹いっぱい。
06/12/05 20:07:59 lDz8eYVx0
とりあえず難しいから使えない=>フリーソフトは怪しいから使わない、
っていう論法にワラタ。

バカは無理して使わなくてもいいお?

372:名無しさん＠お腹いっぱい。
06/12/05 20:41:20 kin3Zm3D0
個人的には、uwscがオートメーションサーバー機能搭載してくれたら最高なんだが・・・
wshから簡単に利用できると使用者激増するだろうなー。
独自言語だと、どうしても習得に手間と時間かかるし

373:名無しさん＠お腹いっぱい。
06/12/06 02:56:21 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:名無しさん＠お腹いっぱい。
06/12/06 03:01:40 +7fqDNkb0
あっそ

375:名無しさん＠お腹いっぱい。
06/12/06 03:41:13 FAzu1gps0
>>372
要らん事言うな。
やり兼ねないだろ。VBS有るのに。
俺はもっと退化してほしい。

376:名無しさん＠お腹いっぱい。
06/12/06 05:31:27 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:名無しさん＠お腹いっぱい。
06/12/06 13:43:20 BvKVwaQG0
エッフェル塔のライブカメラの画像を日付つけて保存、（スケジューラーで1時間ごとにするときれい）
IE = CreateOLEObj("InternetExplorer.Application")
IE.Visible = True
IE.Navigate("URLﾘﾝｸ(www.paris-live.com))// 掲示板
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:続き
06/12/06 13:43:49 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:名無しさん＠お腹いっぱい。
06/12/06 15:11:21 adcM/QV70
NGWordに追加　KBD

380:名無しさん＠お腹いっぱい。
06/12/06 15:46:24 KUjaXZFz0
SCKEYっていうとっても便利な命令があるんだけどなーwww

381:名無しさん＠お腹いっぱい。
06/12/06 17:45:57 GLEwdEWu0
>>378
いいですね！
レスをまとめて参考にしたいのでコテにしてくれませんか

382:名無しさん＠お腹いっぱい。
06/12/06 19:44:23 FU5gZqhb0
何この日記帳

383:名無しさん＠お腹いっぱい。
06/12/06 21:10:02 quIrFEQz0
>>377
わざわざIE起動せんでも、直接DLしたほうがいいんでないかい。

url = "URLﾘﾝｸ(www.images2-abcparislive.com)
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:名無しさん＠お腹いっぱい。
06/12/06 22:55:14 JB2DjNOW0
近頃異様にﾚｽ伸びてんなあ。
どこかで紹介されたか？
そういや、これでLotusNotesって操作出来るんかな？

385:名無しさん＠お腹いっぱい。
06/12/07 01:59:16 VyEoqVxS0
できないものはない
あえて言うとすればUWSCそれ自身

386:名無しさん＠お腹いっぱい。
06/12/07 02:02:14 PZ8cfJA90
DirectInput にイベント放り込んだりできないじゃない。
DLL 呼び出せばできるが。

387:名無しさん＠お腹いっぱい。
06/12/07 14:44:40 FRC6maaU0
キーボード操作で
KBD(VK_RALT,UP,100)
KBD(VK_D,DOWN,100)
とあるのですがUPとDOWNの違いは何なんでしょうか？
普通のクリックしかしていないつもりなんですが表記が違ってて…

388:名無しさん＠お腹いっぱい。
06/12/07 16:21:19 7TNBYEsO0
DOWNがキー押下げ
UPが押していたキーを離す

389:名無しさん＠お腹いっぱい。
06/12/07 16:32:10 FRC6maaU0
>>388
有難う御座います。

390:名無しさん＠お腹いっぱい。
06/12/07 16:50:46 3GkzlLog0
どういたしまして

391:名無しさん＠お腹いっぱい。
06/12/07 18:33:21 hs1oaTsD0
KBDとMMV以外は廃止したほうがいい。

392:名無しさん＠お腹いっぱい。
06/12/07 18:43:49 7lLokSkD0
むしろKBDとMMVを廃止したほうがいい。

393:名無しさん＠お腹いっぱい。
06/12/07 19:33:07 hs1oaTsD0
>>392
mmvとkbdだけなら他のOSでも動く。
mmvとkbdだけにしてそれを拡張したほうがいい。

394:名無しさん＠お腹いっぱい。
06/12/07 20:04:35 ICY6rlFi0
>>369 >>378
かの有名な社長はきちんと偽善事業していますが
名前からして怪しい！そう思いませんか？
怪しいフリーソフトは使わない方が良いと思います。
KBDは便利ですが…手遅れになる前に…
あなたに感謝してます。
貴重な情報ありがとう。

395:名無しさん＠お腹いっぱい。
06/12/07 22:14:57 7ZOeS0w50
>>394
桜田門の人？
個人情報取るときは、本人に教えてほしい、共和党が選挙で破れたのは
国民の盗聴しすぎたからでないのかな、
民主党になれば権力のトップが替わるので不正が発見しやすい。

396:名無しさん＠お腹いっぱい。
06/12/07 23:37:18 2dPIF4520
Excelからマクロでスクリプトを出力してUWSCを起動させてる馬鹿は、俺以外にいるか？

397:名無しさん＠お腹いっぱい。
06/12/08 00:03:09 chHOovwv0
漢だな

使ってるCADでショートカット割り振れないアイコン、しかも右下の辺鄙なとこにあるやつね、
そいつをクリックするのがめんどいんでロジの８つボタンマウスに割り振ってる、俺は。

398:名無しさん＠お腹いっぱい。
06/12/08 00:10:40 ec1k12CL0
連動させてファイルの圧縮も自動化させたいんだけどなにか相性いいやつある？
できればコマンドラインで操作したい
LHAはファイル名の制限きついし……

399:396
06/12/08 00:37:07 0g+qQw1G0
>>397
エンドユーザが作成したデータを元に、
コマンドプロンプトもどき（メインフレームと通信する奴）に
入力する作業を自動化したら、そうなってしまったんだよ。

ホントレガシーシステムは地獄だぜ！フゥハハハーハァー

400:名無しさん＠お腹いっぱい。
06/12/08 14:52:07 nDsO2FL70
>>398
引数につけたファイルがアーカイブでなければ圧縮する
その際の設定は事前に設定しておく

っていうアーカイバを使えばいいんじゃないか？

401:名無しさん＠お腹いっぱい。
06/12/08 16:42:24 0zLBfT2k0
>>398
アイコンに D&D すると圧縮してくれる奴なら、
コマンドラインから渡せるんじゃないの?

と言うか別に DLL 叩けばいいんジャマイカ?

402:名無しさん＠お腹いっぱい。
06/12/08 19:32:34 9NJfuLhZ0
ずーっと前から気になってたんだけど○○叩くって何からきてんの？
DLL叩く、Winsock叩くとか日本語として変じゃない？

403:名無しさん＠お腹いっぱい。
06/12/08 20:27:49 dcPVzq7I0
IE = CreateOLEObj("InternetExplorer.Application")
IE.Visible = True
IE.Navigate("URLﾘﾝｸ(prog-etc.bbs.thebbs.jp))// 掲示板
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:続き
06/12/08 20:29:21 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:名無しさん＠お腹いっぱい。
06/12/08 21:23:09 nDsO2FL70
そのURL覗いてみたら早速試されてる形跡があってﾜﾛﾀ

406:名無しさん＠お腹いっぱい。
06/12/08 21:33:55 hZKfmjKg0
ありがとう！

407:名無しさん＠お腹いっぱい。
06/12/09 03:45:45 himiiWWI0
>>403 >>404 >>406
あ！まだやってるんですか…驚きました。
賢明なあなたのことですから全て理解して戴けたと思っていたのですが…
残念です、しかし、まだ間に合います、
過去の私の書込みを思い起こしてください。
気になる情報が有った時には下記スレッドへお願いします。
24時間注目してますから。
KBDｽﾚﾘﾝｸ(operate板)

408:名無しさん＠お腹いっぱい。
06/12/09 05:20:01 J16nIrh00
>>406
無意味な文章を定期的に書き込むのは「迷惑」行為に当たるぞ。
良く考えて行動してくれ。
UWSCがとばっちりを受けて公開中止になったらどう責任取るんだ！
削除要請出しとけ！

409:名無しさん＠お腹いっぱい。
06/12/09 06:19:57 CpeVJ4Nj0
>>402
英語の kick から来てるんだからおかしくても問題無いだろ。

410:名無しさん＠お腹いっぱい。
06/12/09 06:23:07 MrCYpI9z0
どういたしまして

411:名無しさん＠お腹いっぱい。
06/12/09 17:54:50 nWYe904v0
２チャンに自動書き込みするマクロの例プリーズ

412:名無しさん＠お腹いっぱい。
06/12/09 20:52:45 8gCVgCO70
sendstr(getid（"OpenJane 【ソフトウェア】 - 自動化ツール"）,"ウルセー馬鹿")

413:名無しさん＠お腹いっぱい。
06/12/10 04:08:19 dN5jDykH0
某競馬ゲームに自己開催レースを開始する際に4数字を入力しなければならず
当然その文字はサイズ及び位置が微妙に変化しキャプチャしたファイルを用意するには
膨大な量になるのですが、、、こういった方法以外で4つの数字を判別して自動的に
入力する様なスクリプトを組むには何か方法はありますでしょうか？

414:名無しさん＠お腹いっぱい。
06/12/10 06:03:24 D/A7riMi0
０－９９９９まで順番に入力。

415:名無しさん＠お腹いっぱい。
06/12/10 06:10:07 K3uOep/x0
その4つの数字ってテキストじゃなくて画像データなの？

416:名無しさん＠お腹いっぱい。
06/12/10 06:47:30 0UNXTb3i0
最近いろんなフォームで、画像で数字を表示して「この数字を入力してください」って出るよな。
自動処理よけなんだろうな。
画像の領域さえ分かれば、それをBMPに保存して、OCRソフトに送り込んで…
スゲー面倒くさそう。

こういう不正処理の仕方ばっかり話し合って不正ユーザー御用達ソフトのイメージがついちゃうのもちょっとアレだなあ。

417:名無しさん＠お腹いっぱい。
06/12/10 13:32:45 WZj2QqSU0
既存のOCRソフトは印刷物とかのフォントが整った文字しか読めないんだよね。
結局自分でプログラム書かないと無理だった。
大学の図書館で画像認識の教科書借りてきたよ。

418:名無しさん＠お腹いっぱい。
06/12/10 18:53:40 7pZAjrPi0
>>415
テキストのような綺麗な文字を大小の組み合わせ4文字にしている画像データですね。

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

OCRか・・・

419:名無しさん＠お腹いっぱい。
06/12/10 19:26:30 D/A7riMi0
ていーうかーそれくらい手入力しろよ。

420:ｷﾀ━━━━━━m9( ﾟ∀ﾟ)━━━━━━!!
06/12/10 19:50:22 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:名無しさん＠お腹いっぱい。
06/12/11 17:44:49 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:名無しさん＠お腹いっぱい。
06/12/12 05:19:39 xrHkevWY0
トライって何?

423:名無しさん＠お腹いっぱい。
06/12/12 07:43:07 hRXY00b50
＜＜
ありがとうございます。

424:名無しさん＠お腹いっぱい。
06/12/12 08:09:05 xAxZUHOq0
>>423
> ＜＜
?

425:名無しさん＠お腹いっぱい。
06/12/12 18:15:36 LtBtwK3a0
メモ帳が開いていれば以下の動作をする
と言う文を作る場合、式の部分はどの様に書けばいいのでしょうか
すみませんが教えてください。

426:名無しさん＠お腹いっぱい。
06/12/12 20:18:36 xrHkevWY0
while メモ帳が開いていれば()
以下の動作をする()
Wend

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

Procedure 以下の動作をする()
:
Fend

427:名無しさん＠お腹いっぱい。
06/12/12 20:21:38 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:名無しさん＠お腹いっぱい。
06/12/12 20:34:05 xrHkevWY0
誰かUWSCの基本関数(バージョン1.0からあったようなヤツ)を
VBS用にしたのを公開してくれないか?
対応リストがあるとどっちのユーザにも便利だと思うんだが?

429:名無しさん＠お腹いっぱい。
06/12/12 20:43:06 FgZSUGnE0
そんな便利なものがあったらUWSC必要なくなるな。

430:名無しさん＠お腹いっぱい。
06/12/12 21:08:13 I4NEN3JE0
質問です。

FOpenで開いたファイルを別名で保存したいのですがFCloseすると上書きになってしまいます。
開いたファイル名+"処理済"として出力したいのですがこういった事は出来ないのでしょうか？

431:名無しさん＠お腹いっぱい。
06/12/12 21:09:51 xrHkevWY0
それでもやっぱりUCSWの法が便利だよ。
ただ、誰かに配る時はVBSにしておいた方が便利だから。

432:名無しさん＠お腹いっぱい。
06/12/13 00:29:48 08giVOq70
>>430
俺も知りたい。
現状doscmdで処理ファイルを別フォルダにコピーしてdoscmdでリネーム、その後処理を行っている。
この方法だとコピー＞読み込み＞処理＞書き出しになってしまう。
コピーする分時間的ロスになるので
読み込み＞処理＞書き出しで出来る方法があれば知りたい。

433:名無しさん＠お腹いっぱい。
06/12/13 00:51:10 YBAilhCV0
>>432
多分close時にﾌｧｲﾙを別名保存は無理なような気がス…
というか、ﾌｧｲﾙのOpen前に
doscmd("copy /y hoge.txt hoge,txt.bak") とかではダメなんか？

434:名無しさん＠お腹いっぱい。
06/12/13 01:52:17 Ofnypsy40
FID1 = FOPEN(ファイル名)
　　STR = FGET(FID1, F_ALLTEXT)
FCLOSE(FID1)

// 処理

FID2 = FOPEN(ファイル名+"処理済",F_WRITE)
　　FPUT(FID2,STR)
FCLOSE(FID2)

435:425
06/12/13 01:52:34 XdCi3l4y0
>>426
>>427
遅くなりましたが有難う御座います。

436:名無しさん＠お腹いっぱい。
06/12/13 03:13:53 WrpxBZ3A0
>>426　ID:xrHkevWY0
「Procedure 以下の動作をする()」でメモ帳を閉じないと悲惨なことになるが…
ケアレスだと信じたい。
なんで while なの？

437:名無しさん＠お腹いっぱい。
06/12/13 03:19:04 FjqYCp2T0
で？

438:名無しさん＠お腹いっぱい。
06/12/13 12:03:10 e2lwdiCv0
>>433
>>434
ありがとうございます。
ファイルサイズが大きい＆多いのでコピーはしたくなかったんです。
確かに>>434のやり方ならロス無いですね。
ありがとうございました。精進します。

439:名無しさん＠お腹いっぱい。
06/12/14 10:52:57 b++jM5LY0
面白いプログラムだけどWinnyの作者が有罪判決されたしな
プログラムこれから
作りにくい、悪用したやつがわるいと思うが、作った者を悪いとした判決

440:名無しさん＠お腹いっぱい。
06/12/14 11:34:27 +YYrk/aI0
>>439
日本語でおk

あと、京都地裁は ny を作ったことが悪いとは言っていない。
判決ちゃんと読むべき。

441:名無しさん＠お腹いっぱい。
06/12/14 14:53:35 4kasxE8b0
UWSCだっていくらでも悪用できるし、たぶん作者だってそれを認識した上で公開してるでしょ？
他の様々なソフトとその作者もしかり・・・
半ケツをチラっと見たうえで、俺も439と同じように感じた。

442:名無しさん＠お腹いっぱい。
06/12/14 15:08:00 F2PcCtXj0
良くは知らないけど、
あれの場合は2chで認識してる旨の発言をしてるのが決め手なんでしょ？
少なくともそれすらないのに>>441みたいに「たぶん」なんて理由では裁けないでしょ

443:名無しさん＠お腹いっぱい。
06/12/14 23:36:46 mjghHbZ+0
使い方を紹介しまくった、某雑誌も有罪にして欲しいです

444:名無しさん＠お腹いっぱい。
06/12/14 23:56:24 3Kt7T7f60
Winnyのにたようなソフトが外国にあったと思うが、その場合どうなるんだろう．

外国人は罰せず日本人だけ罰したら日本のプログラム技術
がどんどん遅れるだろう、

445:名無しさん＠お腹いっぱい。
06/12/15 00:03:35 k+l3BTdp0
ツール自体は白って明言されてるだろ。

446:名無しさん＠お腹いっぱい。
06/12/15 08:59:40 Ez6AWitt0
ツール自体と、その開発行為が白でも、ツールが悪用されるのを認識したうえで、提供を続ければ、
幇助とみなされるってことじゃないの？判決の意味は。

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

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

とか、

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

みたいなことを書いてまわれば、次から次へと公開停止になるんじゃまいか？ｗ

447:名無しさん＠お腹いっぱい。
06/12/16 01:29:55 uS95ovKx0
>>439,444,446
「UWSCの知名度を上げたい」という趣旨は充分承知してます。
しかし、既ユーザーのスレッドに幾ら数多く書き込んだとしても
「状況は何も変わらない」と思えるのは私だけでしょうか？
むしろ現状では逆効果のような気がして成りません。

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

ついでに、余り足跡を残し過ぎない方が安全です。

448:名無しさん＠お腹いっぱい。
06/12/16 03:22:04 OQ3z3BDQ0
↑意味不明ｗ　誤爆？

449:名無しさん＠お腹いっぱい。
06/12/16 04:45:48 q5NvKemv0
あ、バカには理解できないかもしれませんね。

450:名無しさん＠お腹いっぱい。
06/12/16 08:05:00 bV4BfKKU0
>>445
> ツール自体は白って明言されてるだろ。
だったら有罪はおかしいだろ。お前もこじつけで逮捕されやがってみやがっれ

451:名無しさん＠お腹いっぱい。
06/12/16 14:01:25 3qaG3LqX0
>>447
日本語でおk

>>450
だから判決文くらい読んでレスしろと。

452:名無しさん＠お腹いっぱい。
06/12/16 17:35:17 Qs/JjjiN0
さて、自作スクリプトを晒していきますよ。最近このツールに嵌ったからな

453:名無しさん＠お腹いっぱい。
06/12/16 17:38:45 44Kiz7S30
>>452
そういう需要はないのでお引取りください。

454:名無しさん＠お腹いっぱい。
06/12/16 18:01:52 Qs/JjjiN0
あーあ萎えたわ

455:名無しさん＠お腹いっぱい。
06/12/16 19:05:47 3qaG3LqX0
>>454
これは素晴らしいスクリプトですね。
目から鱗です。

456:名無しさん＠お腹いっぱい。
06/12/17 00:25:01 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:名無しさん＠お腹いっぱい。
06/12/17 00:25:36 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:名無しさん＠お腹いっぱい。
06/12/17 01:24:09 FBnR/vwV0
decode(PARAM_STR[0], CODE_URL)
で終了　逝ってよし

459:名無しさん＠お腹いっぱい。
06/12/17 04:52:14 E2cqNZWM0
uwscからAPI利用でキー操作できないのか。。。。

460:名無しさん＠お腹いっぱい。
06/12/17 05:25:11 FBnR/vwV0
>>459
メッセージ送るウィンドウのハンドルさえ分かればできるはずだよ

461:名無しさん＠お腹いっぱい。
06/12/18 00:40:14 30950Apt0
ｽﾚﾘﾝｸ(software板:67-69番),71-73,77-79,82-84,86,101
ｽﾚﾘﾝｸ(software板:102番),104,126,133-135,136,140,142
ｽﾚﾘﾝｸ(software板:146番),156-157,160,165,169,173-175
ｽﾚﾘﾝｸ(software板:177番),195-196,198,200,206,208,249
ｽﾚﾘﾝｸ(software板:264-265番),275-276,278,282-292,294
ｽﾚﾘﾝｸ(software板:300番),305-306,331,338,341,348-352
ｽﾚﾘﾝｸ(software板:359番),362,366-369,377-378,395,410
ｽﾚﾘﾝｸ(software板:403-404番),406,439,444,446,452,454

＞87,408

462:名無しさん＠お腹いっぱい。
06/12/18 01:55:59 b3Wgu4wI0

>求人
>　UWSCの会社ができました。
>　スクリプトを書く人を求めています（企業からの自動化の案件を受けプログラムを作成）
>　興味のある方、是非ご連絡下さい。

急にスレが伸びたのはこういうことだったのか

463:名無しさん＠お腹いっぱい。
06/12/18 02:18:02 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:名無しさん＠お腹いっぱい。
06/12/18 06:15:12 njPYSj3q0
>>462
いつの話だよ

465:名無しさん＠お腹いっぱい。
06/12/18 10:05:51 oWhwdrgm0
>>447
URLﾘﾝｸ(www3.bigcosmic.com)

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

ｳｨﾝﾄﾞｳｽﾞの
ﾋﾞﾙｹﾞｲﾂはエイズの研究費に金を出したりして悪人でないのだろうけど社員がみな善人と言う保証はないもんな、

466:名無しさん＠お腹いっぱい。
06/12/18 10:14:10 oWhwdrgm0
439と444が同一人物ということがわかるということはUWSCがパソコンの個人情報をぬけるｿﾌﾄということ?

467:名無しさん＠お腹いっぱい。
06/12/18 10:25:15 oWhwdrgm0
umiumiさんが善人なのか悪人なのかがわからんので広めるべきかどうかわからん､
ヨーロッパはLinuxをひろめようとしているし.中国もIBM買収したり
しているからWindowsに
不信感あるんだろうな､民信無くばたたず.

468:名無しさん＠お腹いっぱい。
06/12/18 10:33:16 oWhwdrgm0
汎く衆を愛して仁に親しむ（多くの人々の幸せを願い思いやる)
が目的ならWindowsが広まることは止めないが､
そうでないなら交通費かけてまで使うもんじゃないね

469:名無しさん＠お腹いっぱい。
06/12/18 10:38:18 mfmoIXFm0
何この電波レスの嵐

470:名無しさん＠お腹いっぱい。
06/12/18 10:53:04 oWhwdrgm0
マイクロソフトのｰ社独占体制というのがいかんよな.ｿﾌﾄに不正
があってもわかりにくいから､どうも信用されない､平家が横暴なら対抗して源氏がでて､譜代に対抗して外様大名､自民党に対抗して民主党､イスラム教ならスンニ派に対抗してｼｰｱ派
キリスト教ならカトリックに対抗してプロテスタントというのが0Sにも欲しい､マイクロソフト独占体制だもんな､

471:名無しさん＠お腹いっぱい。
06/12/18 16:11:44 OQogrX0O0
日本のことわざにただより高いもの無し,

472:名無しさん＠お腹いっぱい。
06/12/18 18:08:47 0DrUvuEP0
俺もこの流れに異様なものを感じた。

473:名無しさん＠お腹いっぱい。
06/12/18 20:28:35 G41PQh210
>>459
できるの！？

474:名無しさん＠お腹いっぱい。
06/12/19 12:45:13 KjI/0F620
マイクロソフト1社独占体制だと

不正があってもチェックが客はしにくい、
自動車会社が
フォード１社だとブレーキが故障
する車を売って客に被害を与えても比較する別の自動車会社
がないため不正をチェックしずらいのと同じ

475:名無しさん＠お腹いっぱい。
06/12/19 13:10:32 +uay/HBu0
クンニ派？

476:名無しさん＠お腹いっぱい。
06/12/19 17:22:02 MKmgxx7j0
NGEx
タイプ：
NG Addr　正規（含まない）
キーワード：
.←ピリオド１個だけ
ぽっぷあっぷ推奨

とりあえず緊急避難的abn。

477:名無しさん＠お腹いっぱい。
06/12/20 22:05:07 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:名無しさん＠お腹いっぱい。
06/12/21 02:33:27 ZpmcWbzF0
>>477
分解能が秒単位だからどうしようもないでしょ。
0～1秒をスキップさせたらストップウォッチにはならないし…

X = GETTIME()
while GETTIME()-X <> 1
　　SLEEP(0.1)
wend
X = X+1

479:名無しさん＠お腹いっぱい。
06/12/21 05:21:46 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:名無しさん＠お腹いっぱい。
06/12/21 19:53:30 uRAZ97BC0
>>478
どうも。
なるほど…今度はふきだしの出現タイミングがランダムになるだけで
確かにストップウォッチにはなりませんね。
まあ自分が使う分にはそれでも良いのですけど。

481:名無しさん＠お腹いっぱい。
06/12/22 06:41:58 /gikv5V/0
自作スクリプト晒す奴ってなにがしたいんだ？
糞ほどにも役に立たないっていうのによ

482:名無しさん＠お腹いっぱい。
06/12/22 06:52:14 yJ1KS64a0
俺には役立ってるよ。
うｐされるたび毎日使ってる。

483:名無しさん＠お腹いっぱい。
06/12/22 06:58:39 Kcn8Xv4o0
>>1を見れ。ここが何のスレか。
たしかに他人が自分の必要に応じて作ったスクリプトが、そのまま自分の役に立つことは殆どない。
大勢の人間に需要がある機能なら、たいがいフリーの単機能ソフトを誰かが先に作っていて、ベクターなり窓の杜なりを探した方が早い。
欲しいけど自分にしか需要がないような特殊な用途を満たすためにUWSCはあるわけで。
他人のスクリプトが役立つ場合があるとすれば、そこに使われてる技術を理解して、自分がスクリプトを書くとき使う、という場合だけだろう。
そのスクリプト製作技術を学ぶ、という目的のためには、ここよりも、本家掲示板やそこに出入りしている常連の掲示板の方がはるかに役立つのは事実だがね。

次ページ