VB.NET Seleniumを使って楽天RMSの自動ログインをするプログラミング方法

【VB.NET】Seleniumを使って、楽天RMSの自動ログインをする(Chromeバージョン）

VB.NETでWatiNを使ったWEB操作をして
楽天RMSに自動ログインする方法を前回記述しましたが
今回はSeleniumを使った方法で楽天RMSへ自動ログインする
コーディングを紹介！

Seleniumの素晴らしいところは現在もなお更新されてること。
また、WatiNがInternetExplolerを基準としてWeb操作をするのに対して
Seleniumはブラウザ問わずWeb操作が可能です。

元々IEじゃなくてGoogleChromeでいろんな操作をしたいと思ってましたが
Chromeは外部から操作できない！
なんて先入観を持ってましたがSeleniumはChromeDriverを使えば
自動操作が可能！素晴らしです。

今回はChromeで自動ログインをしてみます。

*** Seleniumを使った楽天RMSの自動ログイン(Chromeバージョン） ***

①Seleniumを入手（これはぐぐってください！）

②Selenium ChromeDriverを参照登録

③コーディング

Imports OpenQA.Selenium

Public Class Form1
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim webC As Chrome.ChromeDriver
        Dim loginId As String = "ログインID"
        Dim loginPw As String = "ログインパスワード"
        Dim userId As String = "ユーザーID"
        Dim userPw As String = "ユーザーパスワード"
        webC = New Chrome.ChromeDriver
        webC.Navigate.GoToUrl("https://glogin.rms.rakuten.co.jp/?sp_id=1")

        Dim element As IWebElement

        element = webC.FindElementByName("login_id")
        element.SendKeys(loginId)
        element = webC.FindElementByName("passwd")
        element.SendKeys(loginPw)

        element = webC.FindElementByName("submit")
        element.Click()

        element = webC.FindElementById("rlogin-username-2-ja")
        element.SendKeys(userId)
        element = webC.FindElementById("rlogin-password-2-ja")
        element.SendKeys(userPw)

        element = webC.FindElementByName("submit")
        element.Click()

        element = webC.FindElementByName("submit")
        element.Click()

        element = webC.FindElementByClassName("tac")
        element.Click()
    End Sub
End Class

WatiNよりは若干複雑に見えますがやることは同じです。
また、WatiNよりSeleniumのほうが主流なのは間違いないので
これから使う人はこれですね。

ちなみにJAVAですが参考書です。両方読める人は参考になります。