EPP (.be, .eu) connectie vanuit ASP.NET

[webfabriek]

De vraag komt hier regelmatig terug, maar een goede oplossing is niet direct te vinden.

De vraag is nogthans eenvoudig: is er iemand die de asp.net code heeft om te connecteren met het EPP systeem van DNS.BE (of EURID)?

Ondanks wat experimenten met HttpWebRequest en HttpWebResponse zijn we er nog niet in geslaagd een werkende connectie te krijgen.

We krijgen bij het connecteren de melding 'The remote certificate is invalid according to the validation procedure.' Moeten we de certificaten van DNS.BE nog ergens installeren of ligt dit aan iets anders?

Alvast bedankt voor de hulp!

Hans

[gjtje]

Je voegt je certificate wel toe aan het request?

[webfabriek]

Neen, geen idee hoe je dat doet ;-)

Je voegt je certificate wel toe aan het request?

Misschien dat we met wat samenwerking komen tot iets van voor verschillende van jullie kan werken. Hier is een aanzet... maar we krijgen momenteel 'The server committed a protocol violation. Section=ResponseStatusLine' als fout.

Wie heeft suggesties?

***********************


Sub Page_Load(sender as object, e as EventArgs)
Dim strCommandHello As String = "<?xml version='1.0' encoding='UTF-8'?>"
strCommandHello += "<epp xmlns='urn:ietfarams:xml:ns:epp-1.0' xmlns:xsi='http://www.w3.org/2001/XMLSchema-instance' xsi:schemaLocation='urn:ietfarams:xml:ns:epp-1.0 epp-1.0.xsd'>"
strCommandHello += "<hello/>"
strCommandHello += "</epp>"
Dim myCertificate As X509Certificate = X509Certificate.CreateFromCertFile("c:\InetPub\www root\www.hostfabriek.be\dnsbe_eppserver_tryout_cer t.cer")
ServicePointManager.CertificatePolicy = new TrustAllCertificatePolicy()
Dim myRequest As HttpWebRequest = CType(WebRequest.Create("https://epp.registry.tryout.be:33123"),HttpWebRequest)
myRequest.ClientCertificates.Add(myCertificate)
myRequest.Method = "POST"
myRequest.KeepAlive=false
Dim postBuffer() As Byte = System.Text.Encoding.GetEncoding(1252).GetBytes(st rCommandHello)
myRequest.ContentLength = postBuffer.Length
Dim myStream As Stream = myRequest.GetRequestStream()
myStream.Write(postBuffer, 0, postBuffer.Length)
myStream.Close()

Dim myResponse As HttpWebResponse = CType(myRequest.GetResponse(), HttpWebResponse)
Dim myEncoding As Encoding = System.Text.Encoding.GetEncoding(1252)
Dim myResponseStream As Stream = myResponse.GetResponseStream()
Dim myStreamReader As New StreamReader(myResponseStream, Encoding.UTF8)
Dim strResult As String = myStreamReader.ReadToEnd()
myResponseStream.Close()
myStreamReader.Close()
End Sub

Public Class TrustAllCertificatePolicy
implements System.Net.ICertificatePolicy
Public Function CheckValidationResult(ByVal srvPoint As ServicePoint, ByVal cert As X509Certificate, ByVal request As WebRequest, ByVal certificateProblem As Integer) As Boolean Implements ICertificatePolicy.CheckValidationResult
Return True
End Function
End Class

Misschien dat we met wat samenwerking komen tot iets van voor verschillende van jullie kan werken. Hier is een aanzet... maar we krijgen momenteel 'The server committed a protocol violation. Section=ResponseStatusLine' als fout.

Wie heeft suggesties?

***********************


Sub Page_Load(sender as object, e as EventArgs)
Dim strCommandHello As String = "<?xml version='1.0' encoding='UTF-8'?>"
strCommandHello += "<epp xmlns='urn:ietfarams:xml:ns:epp-1.0' xmlns:xsi='http://www.w3.org/2001/XMLSchema-instance' xsi:schemaLocation='urn:ietfarams:xml:ns:epp-1.0 epp-1.0.xsd'>"
strCommandHello += "<hello/>"
strCommandHello += "</epp>"
Dim myCertificate As X509Certificate = X509Certificate.CreateFromCertFile("c:\xxxx\dnsbe_ eppserver_tryout_cert.cer")
ServicePointManager.CertificatePolicy = new TrustAllCertificatePolicy()
Dim myRequest As HttpWebRequest = CType(WebRequest.Create("https://epp.registry.tryout.be:33123"),HttpWebRequest)
myRequest.ClientCertificates.Add(myCertificate)
myRequest.Method = "POST"
myRequest.KeepAlive=false
Dim postBuffer() As Byte = System.Text.Encoding.GetEncoding(1252).GetBytes(st rCommandHello)
myRequest.ContentLength = postBuffer.Length
Dim myStream As Stream = myRequest.GetRequestStream()
myStream.Write(postBuffer, 0, postBuffer.Length)
myStream.Close()

Dim myResponse As HttpWebResponse = CType(myRequest.GetResponse(), HttpWebResponse)
Dim myEncoding As Encoding = System.Text.Encoding.GetEncoding(1252)
Dim myResponseStream As Stream = myResponse.GetResponseStream()
Dim myStreamReader As New StreamReader(myResponseStream, Encoding.UTF8)
Dim strResult As String = myStreamReader.ReadToEnd()
myResponseStream.Close()
myStreamReader.Close()
End Sub

Public Class TrustAllCertificatePolicy
implements System.Net.ICertificatePolicy
Public Function CheckValidationResult(ByVal srvPoint As ServicePoint, ByVal cert As X509Certificate, ByVal request As WebRequest, ByVal certificateProblem As Integer) As Boolean Implements ICertificatePolicy.CheckValidationResult
Return True
End Function
End Class[/QUOTE]

Misschien dat we met wat samenwerking komen tot iets van voor verschillende van jullie kan werken. Hier is een aanzet... maar we krijgen momenteel 'The server committed a protocol violation. Section=ResponseStatusLine' als fout.

Wie heeft suggesties?

***********************


Sub Page_Load(sender as object, e as EventArgs)
Dim strCommandHello As String = "<?xml version='1.0' encoding='UTF-8'?>"
strCommandHello += "<epp xmlns='urn:ietfarams:xml:ns:epp-1.0' xmlns:xsi='http://www.w3.org/2001/XMLSchema-instance' xsi:schemaLocation='urn:ietfarams:xml:ns:epp-1.0 epp-1.0.xsd'>"
strCommandHello += "<hello/>"
strCommandHello += "</epp>"
Dim myCertificate As X509Certificate = X509Certificate.CreateFromCertFile("c:\xxxx\dnsbe_ eppserver_tryout_cert.cer")
ServicePointManager.CertificatePolicy = new TrustAllCertificatePolicy()
Dim myRequest As HttpWebRequest = CType(WebRequest.Create("https://epp.registry.tryout.be:33123"),HttpWebRequest)
myRequest.ClientCertificates.Add(myCertificate)
myRequest.Method = "POST"
myRequest.KeepAlive=false
Dim postBuffer() As Byte = System.Text.Encoding.GetEncoding(1252).GetBytes(st rCommandHello)
myRequest.ContentLength = postBuffer.Length
Dim myStream As Stream = myRequest.GetRequestStream()
myStream.Write(postBuffer, 0, postBuffer.Length)
myStream.Close()

Dim myResponse As HttpWebResponse = CType(myRequest.GetResponse(), HttpWebResponse)
Dim myEncoding As Encoding = System.Text.Encoding.GetEncoding(1252)
Dim myResponseStream As Stream = myResponse.GetResponseStream()
Dim myStreamReader As New StreamReader(myResponseStream, Encoding.UTF8)
Dim strResult As String = myStreamReader.ReadToEnd()
myResponseStream.Close()
myStreamReader.Close()
End Sub

Public Class TrustAllCertificatePolicy
implements System.Net.ICertificatePolicy
Public Function CheckValidationResult(ByVal srvPoint As ServicePoint, ByVal cert As X509Certificate, ByVal request As WebRequest, ByVal certificateProblem As Integer) As Boolean Implements ICertificatePolicy.CheckValidationResult
Return True
End Function
End Class[/QUOTE]