HSPポータル
サイトマップ お問い合わせ


HSPTV!掲示板


未解決 解決 停止 削除要請

2017
0609
あいうえおieコンポーネントのキーボード入力2未解決


あいうえお

リンク

2017/6/9(Fri) 22:31:23|NO.80163


axobj ie, "Shell.Explorer.2", 640, 480
でブラウザを起動して、キーボード入力をじどうでするようにしたいのですが
keybd_eventやaplkeyで入力しようとしても入力されません
どのようにすればいいですか?



この記事に返信する


とおりすがり

リンク

2017/6/10(Sat) 12:09:33|NO.80169

こちらが参考になるかも知れません。

http://hsp.tv/play/pforum.php?mode=all&num=27174



MIZUSHIKI

リンク

2017/6/11(Sun) 22:24:15|NO.80206

フォームのテキストボックスに自動入力したい という内容だと思って返信します。

基本的には とおりすがりさん が紹介してくださったページに詳しく書かれているのでそちらを見て下さい。
私は、それをどうやって書いていけば良いのかの手順を紹介したいと思います。
(HTMLソースを見てなんとなく理解できる程度の知識が必要となります。)

【手順】
1. 該当ページのHTMLソースを表示する。(ブラウザ右クリック->ソースの表示)
2. "<form" で中身を検索して、自動入力させたいテキストボックスがいくつ目のformタグの中にあるかを確認。-> いくつ目にあるかで下記スクリプトの "forms",0 の数値を変更する。
3. formタグの中(<form >〜</form>)の自動入力したいテキストボックスの inputタグを見つける。
4. inputタグの中の name="〜" を調べる。 -> 下記スクリプトの該当部分を書き換える。

例として、ニコニコ動画のログインページで自動入力するスクリプトを書きました。
スクリプトの説明は、中にコメントを書き込んだのでそちらを見て頂ければ分かると思います。
(自動入力されるまで少し時間が掛かると思います。ページが完全に読み込まれてから自動入力が動作します。)

#include "mod_regexp.as" #define DIID_DWebBrowserEvents2 "{34A715A0-6587-11D0-924A-0020AFC7AC4D}" #define DISPID_DocumentComplete 259 axobj ieBrowser,"Shell.Explorer.2",640,480 //ieコンポーネント起動 comevent ieEvent, ieBrowser, DIID_DWebBrowserEvents2, *event //COMイベントの取得開始を登録 url = "https://account.nicovideo.jp/login" ieBrowser->"Navigate" url,,,,"" //指定URLに移動 stop *event // COMイベント処理 dispid = comevdisp(ieEvent) //イベントIDを取得 if dispid = DISPID_DocumentComplete : gosub *OnDocumentComplete //ドキュメントの読み込み完了時 return *OnDocumentComplete comevarg newurl, ieEvent, 1, 1 //URLを取得 ;logmes newurl //HSP Debugウィンドウのログを確認してみよう! if match(newurl,"^https://account.nicovideo.jp/login") != "" { // nicovideo.jp/login?site=niconico&time=・・・みたいに末尾に?以降が付いていても一致するように正規表現で確認してみた。 pDoc = ieBrowser("Document") pForms = pDoc("forms",0) //該当するテキストボックスが含まれるformタグはHTMLの先頭から何番目か。(1つ目:0, 2つ目:1, …) pMailTel = pForms("mail_tel") //自動入力したいテキストボックスのnameを入れる pMailTel("value") = "めーるあどれす"//自動入力される! pPassword = pForms("password") //自動入力したいテキストボックスのnameを入れる pPassword("value") = "ぱすわーど" //自動入力される! //ついでに送信する場合 ;pForms -> "submit" } return



ONION software Copyright 1997-2023(c) All rights reserved.