[戻]-35425/ﾚｽ

---

Re[3]: ワンタイムパスワードのサイトに自動ログインしてアクセストークンを得る

---

けい

最初-->Private Sub Button1_Click(sender As Object, e As EventArgs)
End Sub Button1.Click
'サイトを開く
WebView2.CoreWebView2.Navigate(TargetURL2)
End Sub

Module Hensu
'パブリック変数宣言
Public intNavigationState As Integer
End Module

Private Sub WebView2_NavigationStarting(sender As Object, e As CoreWebView2NavigationStartingEventArgs) Handles WebView2.NavigationStarting
intNavigationState = 0 'サイト表示開始
End Sub

Private Sub WebView2_NavigationCompleted(sender As Object, e As CoreWebView2NavigationCompletedEventArgs) Handles WebView2.NavigationCompleted
intNavigationState = 1 'サイト表示完了
End Sub

Private Sub Button2_Click(sender As Object, e As EventArgs)
End Sub Button2.Click
Dim strResponse As String
If intNavigationState = 1 Then
'URLを取得する。
strResponse=WebView2.CoreWebView2.Source
End If
End Sub

-------------------------------------

ここで得られたstrResponseから、アクセストークン� -->続き

05/16 17:20
[編|消]

---

次のﾚｽ>
35422のﾚｽ
35425にﾚｽを書く

---

Child K-Tai