WebBrowserで表示しているページのメッセージ欄に挿入するには？
解決先日はお世話になりました。
引き続きVB6にてブラウザの開発しています。
今回は、コマンドボタンを押したらテキストボックに書いたモノをブラウザ画面のメッセージ欄に書き込みして送信ボタンを押すようにしたいと思い来ました。
最初はPOSTで送信していたのですが、度々cgiの仕様などを変更されるようで、対応が追いつかなくなってしまう為、ブラウザから送信できればと思います。
<form method="POST" action="ＵＲＬ" name="fcs">
<input type="hidden" name="BBS" value="ＢＢＳ">
<input type="hidden" name="KEY" value="ＫＥＹ">
<input type="hidden" name="DIR" value="ＤＩＲ">
<input type="hidden" name="TIME" value="ＴＩＭＥ">
<input type="submit" value="書き込み" name="submit">
名前 <input type="text" name="NAME" size="19">
E-mail <input type="text" name="MAIL" size="19"><br>
<textarea rows="5" cols="70" wrap="OFF" name="MESSAGE"></textarea><br>
これが送信画面のHTMLの内容です。
よろしくお願いします。
それで、肝心の質問内容は何ですか?
どこまでができていて、何がわからないのかを明らかにしてください。
……掲示板で、一から十まで全てを教えるわけにもいきませんからね。
今回のように、具体的な質問内容が無く、ただHTMLの仕様だけ述べて、
「よろしくお願いします」と書くのでは、最早それは質問とは呼べず、
ただの「開発依頼」になってしまいますよ。
>>コマンドボタンを押したらテキストボックに書いたモノをブラウザ画面のメッセージ欄に書き込みして送信ボタンを押すようにしたい
これだな
わからんのだが
結局POSTで対応しました。
ありがとうございました。
解決したみたいですが、一応サンプルを。
With WebBrowser1
.Document.fcs.NAME.Value = Text1.Text
.Document.fcs.MAIL.Value = Text2.Text
.Document.fcs.Submit ' .Document.fcs.submit.click かも
Do While .Busy = True
DoEvents
Loop
Do While .Document.ReadyState <> "complete"
DoEvents
Loop
End With
LESIAさん
ありがとうございます。
解決はしましたが、今後使うような事があれば参考にさせて頂きたいと思います。
ありがとうございます。
| ツイート |  |