facebookに自動ログイン(ログアウト)「facebookLogIn」の解説

こちらは、エクセルVBAでfacebookに自動ログイン(ログアウト)する方法についての解説となります。VBAの知識がない方やfacebook自動ログイン(ログアウト)ツールをお求めの方には、無償で提供していますので「facebook自動ログインツール」よりダウンロードしてください。

さてfacebookの自動ログイン(ログアウト)について説明してきましたが、今回は自動ログイン(ログアウト)をサブルーチン化させます。
こちらを利用することでどんなアカウントでも簡単にログイン処理をすることが可能になります。

スポンサー リンク

facebookに自動ログイン(ログアウト)のサブルーチン


Sub facebookLogIn(objIE As InternetExplorer, _
                facebookId As String, _
                facebookPass As String, _
                Optional ieType As String = "ieView")

    'IEでfacebook画面を起動
    If ieType = "ieView" Then
      Call ieView(objIE, "https://www.facebook.com/")
    ElseIf ieType = "ieNavi" Then
      Call ieNavi(objIE, "https://www.facebook.com/")
    End If
    
    'ログアウト処理
    If tagCheck(objIE, "input", "ログアウト") = True Then
        Call tagClick(objIE, "input", "ログアウト")
    End If
    
    'facebookID自動入力
    Call formText(objIE, "email", facebookId)

    'facebookログインパスワード自動入力
    Call formText(objIE, "pass", facebookPass)
    
    'ログインボタンをクリック
    Call tagClick(objIE, "input", "ログイン")

End Sub

facebookに自動ログイン(ログアウト)のマクロ


Sub sample1()

  Dim objIE As InternetExplorer

  Call facebookLogIn(objIE, "★facebookID★", "★facebookPASS★")

End Sub

Sub sample2()

  Dim objIE As InternetExplorer
    
  Call ieView(objIE, "http://www.vba-ie.net/")
    
  Call facebookLogIn(objIE, "★facebookID★", "★facebookPASS★", "ieNavi")

End Sub

実行結果

facebook自動ログイン

引数は以下の4つが設定されています。

引数名データ型内容値の事例初期値省略
objIEInternetExplorerIEオブジェクトobjIE,objIE2×
facebookIdStringfacebookのログインID文字列"★facebookID★"×
facebookPassStringfacebookのログインパスワード文字列"★facebookPASS★"×
ieTypeStringIEオブジェクトの状態文字列"ieView",
"ieNavi"
"ieView"
facebookLogIn("IEオブジェクト","facebookのログインID文字列","facebookのログインパスワード文字列","IEオブジェクトの状態文字列[省略可]")

「objIE」「facebookId」「facebookPass」は必須項目で、「objIE」は複数ページを表示させる場合に「objIE」「objIE2」と複数オブジェクトを生成します。
「facebookId」にはfacebookのログインIDを、「facebookPass」にはfacebookのログインパスワードを設定します。

次に「ieType」ですが、こちらはIEオブジェクトの状態によって、処理を分岐させるものです。
新規でIEオブジェクトを作成する場合は「ieView」を指定し、「ieViewサブルーチン」で処理します。
既存のIEオブジェクトがある場合は「ieNavi」を指定し、「ieNaviサブルーチン」で処理させます。
こちらは初期設定が「ieView」で設定させており、Optionalを付けて宣言した引数なので、省略することができます。


'IEでfacebook画面を起動
If ieType = "ieView" Then
      Call ieView(objIE, "https://www.facebook.com/")
    ElseIf ieType = "ieNavi" Then
      Call ieNavi(objIE, "https://www.facebook.com/")
    End If
End If

「ieType」で「ieView」「ieNavi」サブルーチンのどちらかでIEを起動しfacebookページを開きます。


'ログアウト処理
If tagCheck(objIE, "input", "ログアウト") = True Then
 Call tagClick(objIE, "input", "ログアウト")
End If

こちらはログインしていた場合のログアウト処理ですが、「tagCheckサブルーチン」を利用してログアウトボタンがある場合は、そちらをクリックする処理をしています。
ちなみにログアウト部分のHTMLソースは以下になります。


'facebookログイン処理
Call formText(objIE, "email", facebookId)
Call formText(objIE, "pass", facebookPass)
Call tagClick(objIE, "input", "ログイン")
こちらでは、ログインするための情報を入力し、ログインボタンをクリックしています。
「facebookId」にはfacebookログインIDが、「facebookPass」にはfacebookログインパスワードが格納されています。
あとはログインボタンをクリックし、ログイン完了です。
ここまでがfacebook自動ログインのサブルーチン化についての解説でした。
こちらの内容は前回とあわせて理解できたかと思います。
ID・パスワードを記録する機能が付いているので、ここだけの処理はあまり活用はないかもしれませんが、facebookページなどの自動投稿機能を追加すると便利な機能になりますので、サブルーチンを利用して更に機能追加していってください。

次の記事: VBAのIE操作でルーターを再起動 >>

Excel VBAでIEを思いのままに操作できるプログラミング術 Excel 2013/2010/2007/2003対応

近田 伸矢, 植木 悠二, 上田 寛

IEのデータ収集&自動操作のプログラミング本はこの1冊だけ!IEの起動やポップアップウィンドウ、表示を制御する基本的なコードはもちろん、テキストボックスやラジオボタン、表、ハイパーリンクなどのHTML部品を制御する方法など、自動操作に欠かせないノウハウを丁寧に解説。

VBAのIE制御についてのQ&A掲示板

↑エクセルVBAのIE(InternetExplorer)操作で分からない事があればこちらの掲示板よりご質問ください^^

ExcelのVBA初心者入門

↑こちらはExcelのVBAをマスターできるよう初心者向けのエクセルVBA入門コンテンツになります^^

VBAのIE制御入門RSS

RSSフィードを登録すると最新記事を受け取ることができます。

VBAIE操作のスカイプレッスン

VBAでIE(InternetExplorer)制御の準備

エクセルVBAでIE制御の応用編

こちらでは、エクセルVBAで実際に作成したIE(InternetExplorer)制御ツールをまとめています。自動ログインや情報収集など具体的に解説しています。IE(InternetExplorer)制御をされる方は参考にしてください。

【ダウンロード】IE操作に便利なツール

こちらでは、これまでに紹介したIE(InternetExplorer)操作で便利な機能をツール化しています。無償でダウンロードできますので、目的に合わせたご利用ください。

IEオブジェクトのメソッド・プロパティ

こちらでは、IE(InternetExplorer)オブジェクトのメソッド・プロパティをまとめています。

IE操作に利用されているVBA関数

こちらでは、エクセルVBAのIE(InternetExplorer)操作で利用されたVBA関数をまとめています。

IE操作に利用されているステートメント

こちらでは、エクセルVBAのIE(InternetExplorer)操作で利用されたステートメントをまとめています。ExcelのVBAで基本的な部分になりますので、しっかり理解しましょう。

IE(InternetExplorer)制御のVBAコード

こちらでは、これまでに作成したIE(InternetExplorer)操作で役立つサブルーチンをまとめています。
全てをコピーする必要はありませんが、目的に合わせたサブルーチンをご利用ください。