ひとりゴト

2005年09月09日
XML
カテゴリ: プログラミング
h抜きのURLを補完するのが面倒なので
UWSCでやってみた。

//----スクリプトここから----

//多重起動防止と終了
id = getid("url補完.uws","TFOya",0.1)
ifb id > 0 then//既に起動していれば閉じて自身も終了
 ctrlwin(id, close)
 fukidasi("url補完.uws 終了")
 SLEEP(2)
 ExitExit
endif


//お知らせ
Fukidasi("url補完.uws")
SLEEP(1.5)
Fukidasi()


while true
 sleep(0.3)
 id = getid(get_frompoint_win)
 if status(id, st_class) <> "IEFrame" then continue
 url = getstr(id, 1)
 if copy(url, 1, 3) = "ttp" then sendstr(id, "h" + url, 1, true)
wend


//-----ここまで------

クリップボードを編集する方がいいのかな。





お気に入りの記事を「いいね!」で応援しよう

最終更新日  2005年09月09日 11時44分14秒
コメント(2) | コメントを書く
[プログラミング] カテゴリの最新記事


【毎日開催】
15記事にいいね!で1ポイント
10秒滞在
いいね! -- / --
おめでとうございます!
ミッションを達成しました。
※「ポイントを獲得する」ボタンを押すと広告が表示されます。
x
X

© Rakuten Group, Inc.
X
Design a Mobile Site
スマートフォン版を閲覧 | PC版を閲覧
Share by: