0

有没有办法检测用户的 AD 凭据并使用它们来创建可用于查询 Web 服务的 NetworkCredential 对象?下面是我的代码摘录,基本上我是通过 web 服务查询 GIS 数据库,并且 web 服务需要 Windows AD 身份验证。

目前这是一个手动过程,所以我们只是将我们自己的 AD 凭据硬编码到顶部的变量中,它工作正常,但我希望页面检测某人的 AD 凭据并使用它们来创建 NetworkCredential 对象,这样我们就可以拥有我们的内部客户也使用该页面。

Public Function getJSON(ByVal url As String) As String

    Dim HTMLSource As String = ""
    Dim Request As WebRequest = WebRequest.Create(url)
    Request.Credentials = New NetworkCredential(username, password, domain)
    Dim Response As WebResponse = Request.GetResponse
    Dim SR As StreamReader
    SR = New StreamReader(Response.GetResponseStream)
    HTMLSource = SR.ReadToEnd
    SR.Close()
    Return HTMLSource
End Function
4

1 回答 1

0

让用户将他的 Kerberos 凭证委托给您的服务器/服务,在身份验证期间提取该凭证,模拟并代表用户执行您的请求。

于 2012-12-15T21:44:30.277 回答