[リストへもどる]
一括表示

投稿時間:2003/07/04(Fri) 13:25
投稿者名:シルバー
Eメール:kazu1248@hotmail.com
URL :
タイトル:
掲示板に投稿の仕方?
はじめまして、質問があります。

インターネットアプリを作成しています。WEBの掲示板にVBから投稿するプログラムを作成しているのですが、
VBからどのようにすればようか、どなたかアドバイスお願いいたします。
HTMLの取り込みは、できています。

winXp、VB6、IE5.5

投稿時間:2003/07/04(Fri) 18:59
投稿者名:花ちゃん
Eメール:
URL :
タイトル:
Re: 掲示板に投稿の仕方?
> インターネットアプリを作成しています。WEBの掲示板にVBから投稿する
>プログラムを作成しているのですが、

どのようにしたいかにもよりますし、各掲示板によっても構造が違いますので、もう少し
具体的な内容で質問された方が回答が得られ易いかと思います。
HTMLファイル上のテキストボックス等に入力する方法はここの掲示板のワード検索で検索
しても見つかります。

下記はある掲示板に投稿したYahooメールのログインを自動的に行うサンプルですが、掲示板
にも応用できると思いますので参考までに!

Private Sub Command1_Click()
    Dim IE As Object
    Set IE = CreateObject("InternetExplorer.Application")
    With IE
        .Navigate ("http://mail.yahoo.co.jp/")
        DoEvents
        Do While .Busy = True
            DoEvents
        Loop
        .Visible = True
        Do While .Document.ReadyState <> "complete"
            DoEvents
        Loop
        .Document.Forms(0).Elements("login").Value = CVar("ユーザID")
        .Document.Forms(0).Elements("passwd").Value = CVar("パスワード")
        .Document.Forms(0).Elements(".persistent").Click
        .Document.Forms(0).Elements(16).Click
    End With
    Set IE = Nothing
End Sub