Hi. I have solved my problem by creating a custom policy to deal with the
fact that I'm using a test certificate. I found the solution in the following
"Rusty" wrote:
> I am testing a web service on my notebook using SSL. There is no proxy
> settings required since I am not running a proxy server. But yet I am getting
> the same message. Any thoughts ?
>
> Thanks in advance
>
> Regards
> Shaun
>
> "Arun Ganesh_MVP" wrote:
>
> > Check this:
> >
http://discuss.fogcreek.com/dotnetquestions/default.asp?cmd=show&ixPost=5463 > >
> > Thanks,
> > Warm Regards,
> > Arun Ganesh.
> >
> > "Toby" wrote:
> >
> > > After running the following code i get the error.
> > >
> > >
> > > An unhandled exception of type 'System.NotSupportedException' occurred in
> > > system.dll
> > > Additional information: The ServicePointManager does not support proxies of
> > > https scheme.
> > >
> > > All i'm trying to do is authenticate to a proxy and then use a web service.
> > > everything is over https
> > >
> > > Please any help would be great.
> > >
> > > Toby
> > >
> > > Public Class TrustAllCertificatePolicy
> > > Implements System.Net.ICertificatePolicy
> > >
> > > Sub New()
> > > End Sub
> > >
> > > Public Function CheckValidationResult(ByVal srvPoint As
> > > System.Net.ServicePoint, _
> > > ByVal
> > > certificate As
> > > System.Security.Cryptography.X509Certificates.X509Certificate, _
> > > ByVal
> > > request As System.Net.WebRequest, _
> > > ByVal
> > > certificateProblem As Integer) As Boolean Implements
> > > System.Net.ICertificatePolicy.CheckValidationResult
> > >
> > > Return True
> > >
> > > End Function
> > >
> > > End Class
> > >
> > > Private Sub Test()
> > >
> > > Dim oCD As New cdprocess.CDProcess
> > > Dim cache As CredentialCache = New CredentialCache
> > > Dim proxyObject As New WebProxy("https://secureproxy", True)
> > >
> > > cache.Add(New Uri("https://secureproxy"), "Basic", New
> > > NetworkCredential("username", "password"))
> > > oCD.Proxy = proxyObject
> > > oCD.Proxy.Credentials = cache
> > > System.Net.ServicePointManager.CertificatePolicy = New
> > > TrustAllCertificatePolicy
> > >
> > > Me.TextBox1.Text = oCD.Test("username", "password")
> > >
> > > End Sub
> > >
> > >
> > >
> > >