以前次のようなプログラムを作ったのですが、これはURLを入力するとブラウザのソースを表示するものなので、フレームによって分割されたページのソースはすべて表示させることができません。このプログラムに何か追加して分割されていてもソースが表示できるようにしたいのですが。新たにコマンドを作ってやるしかないのでしょうか?何かアドバイスお願いします。
Private Sub Command1_Click()
Dim strUrl As String
Dim strBuf As String
Command1.Enabled = False
strUrl = InputBox("URLを入力して下さい.")
If (Len(strUrl) = 0) Then
Exit Sub
End If
Command1.Enabled = True
strBuf = Inet1.OpenURL(strUrl)
Form2.Show
Form2.Text1.Text = strBuf
End Sub
Function Getsource() As String
Dim strBuf As String
Dim strUrl As String
Dim strUrl2 As String
strBuf = Inet1.OpenURL(strUrl) 'ファイル内容を取得
strUrl2 = InStr(strBuf, "frame src=")
If strUrl2 > 0 Then
strUrl3 = Mid(strBuf, strUrl2, 100)
strUrl4 = Mid(strUrl3, 1, l)
Getsource = strBuf
End Function
No.1ベストアンサー
- 回答日時:
ループもしくは、再帰呼び出しを使用しましょう。
1.ソースをget
パラメータは[http://www.hoge.hoge]などのアドレスを文字列で受けて、ソースを文字列で返す)
2.ソースにフレームが含まれているかを判断
3-1.含まれているなら、フレーム内のアドレスを1の関数に与える
3-2.含まれていないなら、終了
ありがとうございました。これはstrUrl3とstrUrl4が生かされてないですよね。frame srcがあったらその次に書かれてあるURLを参考にそのページを表示させたいのですが。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) 2つのVBAを一緒にしたら機能しなくなりました(エクセル) 7 2022/06/02 12:41
- Visual Basic(VBA) エクセルのマクロとシートの保護について教えてください。 1 2022/10/18 08:36
- Visual Basic(VBA) エクセルのマクロについて教えてください。 2 2023/07/15 15:12
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 1 2023/08/09 10:33
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 1 2023/08/08 15:45
- Visual Basic(VBA) 別シートから年齢別の件数をカウントしたい 6 2023/01/23 12:00
- Visual Basic(VBA) エクセルのマクロについて教えてください。 7 2023/07/04 09:18
- Visual Basic(VBA) エクセルのマクロについて教えてください。 3 2023/02/17 11:59
- Visual Basic(VBA) Vbaで数式をポーランド記法に変換するコードを作って実行しようとするとフリーズします。 1 2022/05/24 17:53
- Excel(エクセル) エクセルVBAでオブジェクトが必要です 2 2022/09/10 16:37
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
LED点滅速度
-
レストラン、英語のメニュー表記
-
VC++でマイクを使いたいんですが……
-
ソース公開
-
ソースを表示させない方法はあ...
-
VisualStudio2010でデバッグソ...
-
HTMLのMETA タグ、charset の扱...
-
ホームページリンク共有時に指...
-
ソケット通信
-
自作ルーターのためのプログラム
-
HPで本日の日付を表示したいで...
-
ライブラリにない関数の定義
-
ホームページビルダーのソース...
-
HTMLソースの文字コードがutfの...
-
VBAで#Regionに変わるものは無...
-
▲▲HTML/CSSでのリスト作成▲▲以...
-
VB2010で正規表現
-
ホームページでファイルをダウ...
-
<!DOCTYPE html>あってますか?...
-
<!DOCTYPE html>あってますか?...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
htmlソース文の 各行 改行位置...
-
VBAで#Regionに変わるものは無...
-
レストラン、英語のメニュー表記
-
Dreamweaverのコードカラーが黒...
-
プログラム時のヘッダコメント...
-
【VC++6.0(MFC)】Access Violat...
-
#ifdef多用でソースが見づらい
-
ソースの追加行数と変更行数
-
ソースの表示を無効にする方法。
-
画像と文字が重なって表示される。
-
JSPの実行結果をHTMLに変換
-
Visual Source Safe?
-
コメントが閉じてないというエ...
-
HTMLソースの文字コードがutfの...
-
ポップアップを1日1回だけ表示...
-
「MicrosoftVisualBasic6.0 行...
-
c言語の改修されたソースから改...
-
htmlのタブの色変更について
-
DreamWeaver 文字列を含まない...
-
IEでテキストの文字が一部だけ...
おすすめ情報