fc2ブログ

ログイン画面

2011/09/29 (木) 19:45
ログイン画面のHTMLソース（一部を抜粋）は以下のようになっています。
スポンサーリンク 
<html>
<head></head>
<body id="top" class="lyt-column-ms-01">
<form method="get" name="search"></form>
<form method="get" name="searchform"></form>
<form name="loginform" action="xxx" method="post" target="_top">
ログインID<input type="text" id="form-login-id" name="loginid" />
パスワード<input type="password" id="form-login-pass" name="passwd" />
<input type="image" value="ログイン" src="xxx" id="login-btn" name="submit%template" />
</form>
</body>
</html>
このようなHTMLのとき、ログイン画面クラスは以下のようになります。
Public Class RakutenLogin
  Inherits AbstructRakutenWebScreen
  Implements IWebScreenOpen, IWebScreenLogin

  Const RAKUTEN_SEC_URL As String = "https://www.rakuten-sec.co.jp/"

  Private Shared ReadOnly USER_ID As String = "xxxxxxxx"
  Private Shared ReadOnly PASS_WD As String = "xxxxxxxx"

  Protected Sub New()
    MyBase.New()
    _ie = New IEWrapper()
    _ie.NewIE(RAKUTEN_SEC_URL)
  End Sub

  Protected Sub New(ByVal screen As AbstructRakutenWebScreen)
    _ie = screen.IE
    _ie.GotoUrl(RAKUTEN_SEC_URL)
  End Sub

  Shared Function Open() As RakutenLogin
    Return New RakutenLogin()
  End Function

  Shared Function Open(ByVal screen As AbstructRakutenWebScreen) As RakutenLogin
    Return New RakutenLogin(screen)
  End Function

  Function Login() As IWebScreen Implements IWebScreenLogin.Login
    LoginInner()
    Return New RakutenTop(Me)
  End Function

  Private Sub LoginInner()
    _ie.RootFrame().RootDocument()
    _ie.TypeValue("loginid", USER_ID)  'name
    _ie.TypeValue("passwd", PASS_WD)
    ' ログインボタンをクリック
    _ie.ClickSubmit("login-btn")  'id
  End Sub

End Class
RakutenLoginクラスは、AbstructRakutenWebScreenクラスを継承し、IWebScreenOpenインタフェース、IWebScreenLoginインタフェースを実装しています。LoginInnerメソッドで、ログインIDとパスワードを入力し、ログインボタンをクリックいています。
スポンサーリンク
よろしければ、応援お願いします！→ 人気ブログランキングへ
カテゴリ 証券会社のWeb画面をクラス化する | 関連タグ 証券会社 楽天証券 Web画面
↑トップへ戻る | コメント(0) | トラックバック(0)
<<資産タブの基本クラス | ホーム | トップ画面>>
コメント(0)
↑トップへ戻る
コメントの投稿












※PASSWORDをつけると、後で編集、削除ができます。

管理者にだけ表示を許可する

↑トップへ戻る
トラックバック(0)
トラックバックURL
→http://autodaytrade.blog.fc2.com/tb.php/45-0111150f
この記事にトラックバックする(FC2ブログユーザー)
↑トップへ戻る