vb2005のWebbrowserコントロールでSubmitすると動作がおかしい

2023/08/09 13:54

このQ&Aのポイント

vb2005のWebbrowserコントロールでSubmitすると動作がおかしい。
Submit後のページが最後の方しか返ってこない。
手動でsubmitボタンをクリックすると大丈夫なのに、なぜか自動的にsubmitすると動作がおかしい。

ベストアンサー

vb2005のWebbrowserコントロールでSubmitすると動作

2010/02/06 11:06

vb2005のWebbrowserコントロールでSubmitすると動作がおかしいのですが Browser.Navigate("http://hyperlink.xrea.jp/regist.php") Do While Not Browser.ReadyState = WebBrowserReadyState.Complete Application.DoEvents() Loop Browser.Document.All.GetElementsByName("site_name")(0).InnerText = "test" 　　　　　　　　　　・　　　　　　　　　　・ Browser.Document.Forms(0).InvokeMember("submit") このようなソースなのですが、submit後のページが <div id="copyright"> Copyright By ***</div></body></html> のように、最後の方しか返してこないのです。手動でsubmitボタンをクリックすると大丈夫なのですが、なぜだかわかるでしょうか？

tohoho777
お礼率22% (6/27)

Visual Basic
回答数1
ありがとう数0

みんなの回答 （1）
専門家の回答

質問者が選んだベストアンサー

ベストアンサー

todo36
ベストアンサー率58% (728/1234)

2010/02/07 06:51 回答No.1

コードからsubmitボタンをクリック submitボタン.InvokeMember("click")

質問者

補足 2010/02/07 15:12

ありがとうございます。うまくできました！

関連するQ&A

VB2005のWebbrowserでSubmit
VB初心者です。 Webbrowserで、Submitを押して自動ログインしたいと思います。ネットで色々調べてみると、 WebBrowser1.Document.All.GetElementsByName(TextBox2.Text)(0).InnerText = TextBox4.Text WebBrowser1.Document.All.GetElementsByName(TextBox3.Text)(0).InnerText = TextBox5.Text WebBrowser1.Document.Forms(0).InvokeMember("submit") で、実行可能というのがありました。 IDとパスワードの入力はできたのですが。(フォーム上で、TextBoxで入力しての話)Submitが実行されません。ローカルウィンドーで見ても、よく判らないのですが、何をどのように調べれば、実行可能であるか？どうか？判るのでしょうか？どなたか？詳しい方宜しくお願いします。
- 締切済み
- Visual Basic
ＶＢ2005、WebBrowserにてログインが成功したか失敗したかを判断
お世話になっております。ＶＢ2005ユーザーです。 WebBrowserを使用し、windowsフォームに入力した内容を元にログインし、ログインが成功したか失敗したかを判断したいのです。 With WebBrowser1 .Navigate("ログインしたいＵＲＬ") Do While WebBrowser1.ReadyState <> WebBrowserReadyState.Complete '読み込み終わるまで待つ System.Windows.Forms.Application.DoEvents() Loop .Document.All.GetElementsByName("ＩＤ")(0).InnerText = ＩＤ.Text .Document.All.GetElementsByName("パスワード")(0).InnerText = パスワード.Text .Document.Forms(0).InvokeMember("submit") という物を使い、その後にログイン成功か失敗かを判断するために、 If .Document.Body.Innertext = "ログイン失敗" Then MsgBox("だめ") Exit Sub Else MsgBox("ＯＫ") Exit Sub End If というコードを使ってみたのですが、Innertextの情報を読み取っていないのか、Else　MsgBox("ＯＫ")に飛んでしまいます。 Navigateにて進んだ先のＨＴＭＬ情報（Innertext）と、コチラが指定したい情報が一致しているかの判断はどのようなコードを記述すればいいのでしょうか？
- ベストアンサー
- Visual Basic
WebBrowserにてsubmitの前にnavigateしてしまう
いつもお世話になっております。ＶＢ2005ユーザーです。 WebBrowser内の"submit"を押したあと、違うページに行きたいのですが、 "submit"を押す前に"Navigate"で指定しているページに行ってしまいます。このようなコードを書いています。 With WebBrowser1 .Navigate("最初のＵＲＬ") Do While WebBrowser1.ReadyState <> WebBrowserReadyState.Complete System.Windows.Forms.Application.DoEvents() Loop .Document.Forms(0).InvokeMember("submit") Do While WebBrowser1.ReadyState <> WebBrowserReadyState.Complete System.Windows.Forms.Application.DoEvents() Loop .Navigate("次の指定ＵＲＬ") Do While WebBrowser1.ReadyState <> WebBrowserReadyState.Complete System.Windows.Forms.Application.DoEvents() Loop 「指定ＵＲＬ」は"submit"により新しいＨＴＭＬが生まれるので、その後の作業のためにどうしても"submit"を押したいのですが、上のようなコードですと先に「指定ＵＲＬ」に行ってしまいます。 "submit"をクリックせず、無視してしまうのです。 Navigate("次の指定ＵＲＬ")を外せばクリックしてくれるのですが・・・。 WebBrowserを完全に待機させる方法などが必要なのでしょうか？宜しくご教授のほどお願い致します。
- ベストアンサー
- Visual Basic
vb2005　webbrowserでリンクをクリックした後の表示待ちの方法
VB2005を勉強中の者です。 WebBrowser1.Navigateを使ってwebページを開いた際は下記while文での表示待ちが機能するのですが、ページ表示後、さらにInvokeMemberを使って先のページにクリックで進んだ後では同一の表示待ち部分がうまく機能せずにそのまま次の処理へと進んでしまいいます。どこに問題があるのか分からず困っております。どなたか助けていただけませんでしょうか？ WebBrowser1.Navigate("https://yahoo.co.jp") '↓ここは機能します While WebBrowser1.IsBusy Or WebBrowser1.ReadyState <> WebBrowserReadyState.Complete Application.DoEvents() End While WebBrowser1.Document.GetElementsByTagName("a").Item(15).InvokeMember("click") '↓これが機能しなくて困っています！ While WebBrowser1.IsBusy Or WebBrowser1.ReadyState <> WebBrowserReadyState.Complete Application.DoEvents() End While '↓目的 TextBox1.Text = WebBrowser1.Document.Body.InnerText
- ベストアンサー
- Visual Basic
WebBrowserでHTML要素のclick処理
WebBrowserで画面の自動遷移制御をしたいですが、うまくいかないです。なぜかHTML要素のbuttonにInvokeMember("click")を呼び出す後の画面更新待ちができないようです。ソースコードをご覧ください。 WebBrowser wb = new WebBrowser(); wb.Navigate("http://www.google.co.jp"); Application.DoEvents(); while (wb.ReadyState != WebBrowserReadyState.Complete || wb.IsBusy) { Console.WriteLine("waiting..."); System.Threading.Thread.Sleep(10); Application.DoEvents(); } Console.WriteLine(wb.DocumentTitle);　　　＜----ここでGoogleが出力される //キーワードより検索する HtmlElement input = wb.Document.All.GetElementsByName("q")[0]; HtmlElement button = wb.Document.All.GetElementsByName("btnG")[0]; input.InnerText = "test"; button.InvokeMember("click"); Application.DoEvents(); while (wb.ReadyState != WebBrowserReadyState.Complete || wb.IsBusy) { Console.WriteLine("waiting..."); System.Threading.Thread.Sleep(10); Application.DoEvents(); } Console.WriteLine(wb.DocumentTitle); ＜----ここでもGoogleが出力される２回目のタイトルは「test - Google 検索」がでるはずですが、なぜか前のページのままです。 Documentの中身も前のページのままです。解決方法お願いします。
- 締切済み
- その他（プログラミング・開発）
WebBrowserについて
Visual Studio 2008を使っています途中で処理が停止しまい困っていますデバックで一時停止をすると Do While WebBrowser1.ReadyState <> WebBrowserReadyState.Complete System.Windows.Forms.Application.DoEvents() Loop この部分で作業が止まっています何かいい方法はないでしょうか？ソースは下記の通りです WebBrowser1.Navigate(New Uri("http://※※※※※※※※※※※※)) Do While WebBrowser1.ReadyState <> WebBrowserReadyState.Complete System.Windows.Forms.Application.DoEvents() Loop ＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿ Threading.Thread.Sleep(1000)とか入れても止まってしまいます秒数はいろいろ試しましたが駄目でした WebBrowser1.Navigate(New Uri("※※※※※※※※※※※※)) Threading.Thread.Sleep(1000) Do While WebBrowser1.ReadyState <> WebBrowserReadyState.Complete System.Windows.Forms.Application.DoEvents() Loop
- 締切済み
- Visual Basic
VB2005でWebBrowserでログイン
今まで、ExcelのVBAを手探り状態で使い、IEを操作していたものです宜しくお願い致します。今回、VB2005EEをインストールしたので、Excelで行っていた作業を移行させようと思ってネットでサンプルを手にいれ使おうかと考え行き詰りました。どなたか教えてください。 formにWebBrowserコントロールを貼り付けてネットのログイン画面を With WebBrowser1 .Navigate("http://xxxx.xxx.co.jp/xxx/mail?roginname=abcd123") .Document.All.GetElementsByName("acctname")(0).InnerText = "abcd123" .Document.All.GetElementsByName("passwd")(0).InnerText = "1234567" .Document.Forms(0).InvokeMember("submit") End With としたところ、.Documentの行で、オブジェクト参照がオブジェクトインスタンスに設定されていません。のエラーが出てしまいます。ヒントには、オブジェクトインスタンスの作成には、newキーワードを使用します。と、メソッドを呼び出す前に、オブジェクトがnullでよいかどうか確認してくださいとあます。私は、いったいどうすればいいのでしょうか？基本的な部分が分かっていないだけだと思いますが、教えて頂けないでしょうか？
- ベストアンサー
- Visual Basic
vb2005のWebbrowserコントロールで複数のSubmitボタンがある場合
Webbrowserコントロールに読み込んだwebページ上に複数のSUBMITボタンがある場合、name属性で押すボタンを選択し実行する方法を教えてください。 -------------------------------------------------------------- 【htmlのソース】 <INPUT type=submit value=アップロード name=select> <INPUT type=submit value=次へ > -------------------------------------------------------------- 同一フォーム上に二つのボタンがある。【vb2005のソース】 -------------------------------------------------------------- WebBrowser1.Document.Forms(0).InvokeMember("submit") -------------------------------------------------------------- を実行すると、「<INPUT type=submit value=次へ >」のボタンの方は実行できるのですが、「<INPUT type=submit value=画像のアップロード name=select>」の方は実行されません。よく分からないなりに、 -------------------------------------------------------------- WebBrowser1.Document.All.GetElementsByName("select")(0).InvokeMember("submit") -------------------------------------------------------------- 等と書いてみましたが、反応ナシです。ご教授、お願いいたします。
- ベストアンサー
- Visual Basic
webbrowserについてボタンが見つからない
現在 https://secure.avaonline.jp/member/ の自動ログインツールを作っているのですが、 WebBrowser1.Document.All.GetElementsByName("accountid")(0).InnerText = TextBox1.Text WebBrowser1.Document.All.GetElementsByName("passwd")(0).InnerText = TextBox2.Text によって、IDとPWの入力はできたのですが、ログインボタンと、ゲームスタートのボタンどうしても見つかりません。 WebBrowser1.Document.All.GetElementsByName("ボタン名")(0).InvokeMember("submit") となど試してはみたのですが、 0' の値は 'index' に対して有効ではありません。'index' は 0 と -1 の間でなければなりません。パラメータ名: index とエラーが出てしまいます。上記のサイトはjavascriptなど使っていて見つけられなかったので、具体的なボタンの名前やどのように記述していいの教えてください。よろしくお願いします
- 締切済み
- Visual Basic
WebBrowser 複数のsubmit
VB初心者ですご指導の程宜しくお願い致します visual basic 2008　でWebBrowserにて webページに複数のname属性のないsubmitがある場合どうやって選択して押す動作をさせるのでしょうか？？？下記：webのソース <input type="submit" value="変更する" class="formBt01" /> <input type="submit" value="戻る" class="formBt02" /> どちらかを選択できるようにしたいです過去にも同じような質問がありましたが回答の通り試しましたがうまくいきません自分が試したもの WebBrowser1.Document.Forms(0).InvokeMember("submit") もちろんwebソースにsubmitが二つあるので、動作しません WebBrowser1.Document.Forms(1).InvokeMember("submit") フォームで選ぶのかなと試しましたが何も動作しません WebBrowser1.Document.Forms("ボタンのname").InvokeMember("click") ボタンの名前がわからないので、これは使えず… どなたかご教授お願いします
- 締切済み
- Visual Basic