woking on prototype with VB (and c#) webforms (or MVC doenst matter)
stepping in startup -seems to work
app.UseOpenIdConnectAuthentication(New OpenIdConnectAuthenticationOptions() With {
.ClientId = clientId,
.Authority = authority,
.PostLogoutRedirectUri = postLogoutRedirectUri,
.Notifications = New OpenIdConnectAuthenticationNotifications() With {
.AuthorizationCodeReceived = Function(context)
Dim code = context.Code '.code OpenIdConnect 4.2 AuthorizationCodeReceived
Dim credential As New ClientCredential(clientId, ClientSecret)
Dim signedInUserID As String = context.AuthenticationTicket.Identity.FindFirst(ClaimTypes.NameIdentifier).Value
Dim authContext As New AuthenticationContext(authority, New ADALTokenCache(signedInUserID))
Dim result As AuthenticationResult = authContext.AcquireTokenByAuthorizationCodeAsync(code, New Uri(HttpContext.Current.Request.Url.GetLeftPart(UriPartial.Path)), credential, graphResourceId).Result
Return Task.FromResult(0)
End Function
}
})
Database is generated- entry in table
generating a aspx page
Dim publicClient = ConfidentialClientApplicationBuilder.Create(Startup.clientId) _
.WithClientSecret(ConfigurationManager.AppSettings("ida:ClientSecret")) _
.WithAuthority(New Uri(authorityUri)) _
.WithRedirectUri(redirectUri).Build()
Dim accounts = Await publicClient.GetAccountsAsync() 'Empty
Try
Dim res1 = publicClient.AcquireTokenSilent(scopes, accounts.FirstOrDefault) _
so acquire token cache throws an exception-
thanks for help
