VB.NET环境下WebRequest验证有效代理凭证后无法校验无效凭证问题

问题原因 #

• WebRequest.DefaultWebProxy 不会在你为Credentials属性赋值时立即校验凭证有效性，校验动作只会在首次实际发起网络请求时触发，和代理服务器完成407质询验证流程
• 首次使用有效凭证请求代理成功后，.NET运行时会缓存已验证通过的代理会话，后续你修改同一WebProxy实例的凭证为无效值时，框架会直接复用现有有效会话，不会重新发起凭证校验，所以不会抛出验证失败的错误

修复方案 #

1. 凭证有效性校验逻辑 #

赋值代理配置后，必须主动发起一次测试请求确认凭证有效，示例代码如下：

Dim testUrl As String = "http://www.example.com" ' 用公网可稳定访问的HTTP地址即可
Dim webProxy = New Net.WebProxy(New Uri("你的代理地址"))
webProxy.Credentials = New Net.NetworkCredential("用户名", "密码")
WebRequest.DefaultWebProxy = webProxy

' 发起测试请求校验凭证
Try
    Using req As Net.WebRequest = Net.WebRequest.Create(testUrl)
        req.Timeout = 5000 ' 设置超时避免长时间等待
        Using resp As Net.WebResponse = req.GetResponse()
            ' 能正常拿到响应说明凭证有效
        End Using
    End Using
Catch ex As Net.WebException
    If ex.Status = Net.WebExceptionStatus.ProxyAuthenticationRequired Then
        ' 捕获到407错误，说明凭证无效
    End If
End Try

2. 更新凭证时避免复用旧会话 #

需要更换代理凭证时，不要直接修改原有WebProxy实例的Credentials属性，先清空原有代理配置再重新实例化，示例如下：

' 先清空原有代理，清除缓存会话
WebRequest.DefaultWebProxy = Nothing
' 重新实例化WebProxy传入新凭证
Dim newWebProxy = New Net.WebProxy(New Uri("你的代理地址"))
newWebProxy.Credentials = New Net.NetworkCredential("新用户名", "新密码")
WebRequest.DefaultWebProxy = newWebProxy

内容的提问来源于stack exchange，提问作者HARISH