• ベストアンサー

Accessのフォーム上のWebBrowserにhtmlを指定したい。

Accessのフォーム上のWebBrowserに任意の文字列を表示させる場合、 一度、その文字列を含んだtextファイルを作成し、そこへnavigate していましたが、直接、htmlをWebBrowserに指定することはできない ものでしょうか?

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

  • ベストアンサー
  • nda23
  • ベストアンサー率54% (777/1415)
回答No.1

できますよ。 以下はその例です。コントロール名は"WB"とし、フォーム内の イベント（ボタンのクリック等）のプロシージャです。 Dim C, D, B, T As String '==HTML組み立て== T = "<HTML><BODY>ABC" T = T & "</BODY></HTML>" '==オブジェクトの取得== Set C = Me.WB Set D = C.Document If D Is Nothing Then 　　C.Navigate "about:blank" 　　Do 　　　　DoEvents 　　　　Set D = C.Document 　　Loop While D Is Nothing End If Set B = D.Body '★ここでHTML仕込む B.InnerHTML = T

tss_jp
質問者

お礼

ありがとうございました。

全文を見る
すると、全ての回答が全文表示されます。
  1. カテゴリ
  2. [技術者向] コンピューター
  3. データベース
  4. その他(データベース)

関連するQ&A

  • アクセスのフォームに動画を入れたいと思っています。

    アクセスのフォームに動画を入れたいと思っています。 手順については、こちらのサイトで下記を見つけたのでそれを参考にしました。 (1)GIF動画を貼り付けたHTMLファイルを作成します。 例えば、C:\test.htm (2)Microsoft Web Browserをフォームの中に埋め込みます。 例えば、『WebBrowser0』という名前にします。 (3)フォーム読み込み時にそのページを呼び出します。 Private Sub Form_Load() WebBrowser0.Navigate "C:\test.htm" End Sub これで、フォームを開いたときに、test.htmが表示されるはずです。表示サイズなどは調整してください。 ここまでが参考にした文章です。それで、下記が私の作成したVBAです。 Private Sub Form_Load() WebBrowser0.Navigate "test.htm" End Sub test.htmという画像をファイルに保存しました。プロパティはインターネットエクスプローラーで、ダブルクリックすると動画になっています。 しかし、アクセスに上記のコードを入力すると、 Web ページへのナビゲーションは取り消されました と表示されます。（WEBページのように見えますので、一応、WebBrowser0.Navigate　は機能しているが、このtest.htmのファイルが何か悪いのでしょうか。 どなたか、何が間違いか教えていただけないでしょうか。

  • .NetのWebBrowserについて

    【環境】 WindowsXｐ VisualStudio2005 Excel2003 VB.netでWebBrowserを使ってフォームにExcelを表示するアプリがあります。 ある日突然特定の端末でExcelがそのアプリで表示できなくなりました。 ・現在分かっていること (1)他の端末は問題なく使えています。 (2)アプリは修正・等は一切していません(昔に作ったまま) (3)Wordなどは表示できてます (4)Excelのマクロの有無は関係ないと思います(あるものでもないものでも発生しました) (5)Excelを開く際にダイアログが出て開くか保存するか？を聞いてくるので、 　 ファイルパス間違いとかそういった問題ではありません。 特定端末（1台）だけなので、 その端末の設定的なものだろうと思うのですが、 その端末を使っている人も特になにか変えたつもりがないということで、 原因が分かっておりません。 ソースは、抜粋ですが、 フォームに張り付けたWebBrowserコンポーネントのNavigateに 引数でExcelファイルを指定しているだけのシンプルなものです。 ------------------------------------ Me.WebBrowser1.Navigate(strFileName) ------------------------------------ どなたか、なにか原因について心当たりがある方いらっしゃいましたら、 ご教授ください。

  • ActiveX の WebBrowser コントロール上で、フォームのボタンを「クリックする」動作

    ActiveX の WebBrowser コントロール上で、フォームのボタンを「クリックする」動作をソフトで行いたいのですが、方法をご存知の方がおられましたらご教授いただけませんでしょうか。目的は Webからのフォーム入力を支援するソフトの作成です。 以下のようなケースを想定しています １.Webからフォーム入りのページを WebBrowser コントロールで取得し ２.取得したドキュメント内の文字入力欄等にデフォルト値を差し込み ３.加工したドキュメントをWebBrowser コントロールに戻し ４.そのままフォームの送信ボタンを押された動作を行う ことにより、必要な情報を誤りなく入力できるようにするものです。 Navigate や Navigate2 で、直接フォーム入力を送信するのではなく、あくまで「クリックしたことにする」方法をとりたいと思っています。 なんとなく、セキュリティへの配慮からサポートされていないのかな？という気もしなくないですが、ご存知の方がおられましたら教えていただければと思います。 環境は IE5以降、VC++ (MFC)で作成しています。(VS6)

  • WebBrowserについて

    VB2005で、WebBrowserを使おうとしたところ次のような問題が発生しました。 フォームに、WebBrowserを貼り付けてボタンをクリックしたところsubの途中でStopさせるとWebBrowserに表示されません。どうしてでしょうか？教えてください。 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click WebBrowser1.Navigate("http://www.goo.ne.jp/") End Sub の状態だと表示されますが、 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click WebBrowser1.Navigate("http://www.goo.ne.jp/") 　　　　Stop End Sub で止めると表示されません。 教えていただけないでしょうか？宜しくお願い致します。

  • WebBrowserでPDF表示でのトラブル

    WindowsXP、VB6.0にてWebBrowserを使用してPDFファイルを画面に表示 していますが、画面にはしっかり表示され問題は無いのでですが、 プログラムを終了しても、タスクマネージャーに「AcroRd32.exe」が 残ったままになっています。 WebBrowserの使用方法がおかしいのでしょうか？ WebBrowser.Navigateで表示指定しています。 どなたかわかる方教えて下さい。

  • C#2010 webBrowserについて

    こんにちは。WebBrowserコントロールを使ってウェブページを表示するプログラムを作成しています。 私の環境はWindows7の64bitでIE9がインストールされています。また、.NETFrameworkは4.5です。 WebBrowserはデザイナ上でフォームに設置しています。 友達の環境で動かないと報告を受けたので、プログラムを簡略化して private void Form1_Load(object sender, EventArgs e) { this.webBrowser1.Navigate("https://www.google.co.jp/"); } これだけにして試してもらいましたが、真っ白で何も表示されないと報告を受けました。 その友達のPCではIE10がインストールされています。また.NETFrameworkは4.0でした。 別の二人の友達の環境では正常に動いたようです。(こちらは、環境の詳細を聞いていません。) 特にエラーが出るわけでもなく、真っ白で何も表示されないという事で困っています。 何を疑って調べればいいのかが、まず分かりません。 以上、宜しくお願い致します。

  • フォームの「FILE」に任意の文字列表示

    フォームのテキストボックスではなく、FILEに任意の文字列を表示させたいのですが、 VALUEで指定しただけではダメみたいです。 どのようにすればいいでしょうか？

    • ベストアンサー
    • Perl
  • WebBrowserの読み込み待ちの処理の仕方

    VB2005にてプログラムしております。 WebBrowser内にて表示したページでID、PASSを自動入力、ログインするというプログラムですが、 ------------------------------------------------------------- 　　　　Dim IDCODE As String = TextBox1.Text Dim PASSCODE As String = TextBox2.Text '文字列で指定したＵＲＬに飛ぶ WebBrowser1.Navigate("https://XXXXXXXXX.ne.jp/") '表示終了まで待つ ？？？？？？ 　　　‘WebBrowser1へID、PASS入力処理 ------------------------------------------------------------- 上記の ？？？？？？ 部分に表示待ちの処理をするコードを入れると思うのですが、 With WebBrowser1 Do While .IsBusy = True Loop Do While .ReadyState <> "complete" Loop End With を入力すると読み込み途中で止まってしまうみたいです。 なにかいい方法がありますか？

  • WebBrowserコントロールでExplorerのようなものを作りたいのですが困っています

    VB.NET2008にて、開発中です。 WebBrowserコントロールを使用してExplorerを作っているのですが、たとえば WebBrowser1.Navigate("C:\Users\" + Environment.UserName + "\Desktop") とすることによってコントロール上にデスクトップにあるファイルが表示されますよね？ そこで、表示されたファイルのうち１つをを選択し、そのファイル（もしくはディレクトリ）のフルネームを取得したいのですが、どうもやり方がわかりません。 どなたかこの方法を知っている方、いらっしゃいませんでしょうか？

  • Accessのフォームで

    Accessで２つほど質問いたします。 (1)テーブルにフィールドを追加したのですがフォーム上でそのフィールドが追加できません（プロパティで選択できない）、多分クエリーを経由してフォームを作成したのですが、どのクエリーだかわからなくなってしまいました、参照しているクエリーがどれなのかを調べる方法を教えてください。 (2)検索フォームを作成して入力した文字を含む検索をしたいのですが どのようにしたら良いのでしょうか、今は入力の文字列の最初と最後に「　*　」を入力して検索しています。

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

あなたにピッタリな商品が見つかる！ OKWAVEセレクト

質問する