2-way SSL VB.NET Client Consuming Webservices(Jav aServer)

[paulngpc]

> Hi folks

This is a challenging and interesting topic. Need HELP on
this, would be good if some tips/techniques can be given
for the topic.

Using VB.NET client to connect to JavaWebserver. Don't
know how to use the 2-way SSL to communicate and make the
SSL handshake process( at Transport level https://)
transparent. Any .NET classes to make all the 2-way SSL
communication transparent between VB.Client(Webse rvice
consumer) and JavaWebserver(W ebservice provider)???

My VB.NET Client is able to access the web service with
HTTP protocol BUT NOT HTTPS protocol(SSL port 443)

Where to add in the clientcert(X509 ) into the http object
request object ? And how to get the HTTP Response back to
parse in the XML details? Any .NET classes to do all these with ease?

Some advice or technical samples please?

Thanks in advance.!!!

This is the code snippet of what we are trying to do.
Would be great to get advise or technical solutions to
help me out.

-------------- Begin of Code
Dim Store As X509Certificate Store
Dim cert As X509Certificate
Dim lCertName As String
Dim certoken As
Microsoft.Web.S ervices2.Securi ty.Tokens.X509S ecurityToken
Dim objInBW As New WebServiceWSDLL ink.InboundWS
' Open and read the certificate store for
' the local machine account.

Store = X509Certificate Store.CurrentUs erStore
(X509Certificat eStore.MyStore)
Store.OpenRead( )
' Search for all certificates and add all
' matching certificates to the certificate
collection.
Dim x As Integer = 0
For Each cert In Store.Certifica tes

If InStr(cert.GetN ame(), "UserA") Then
MsgBox("Issued To= {0}" & cert.GetName())
x = 1
Exit For
End If

Next
If x = 0 Then
MsgBox("Service is not able to encrypt the
response")
End If
objInBW.ClientC ertificates.Add (cert)

objInBW.UnsafeA uthenticatedCon nectionSharing = True
Dim xcertoken As New X509SecurityTok en(cert)
''create a new Signature object using the
X509SecurityTok en
''as a parameter for the Signature constructor
Dim signature1 As New MessageSignatur e(xcertoken)
''Along with the Tokens collection there is a
SoapContext.Sec urity.Elements
''collection that will allow you to add various WS- Security elements including
''a Signature element.
objInBW.Request SoapContext.Sec urity.Tokens.Ad d
(xcertoken)

objInBW.Request SoapContext.Sec urity.Elements. Add
(signature1)
'we pull the certificate from the certificate
store
'and add it to the Tokens collection. We then and add the Signature object
'to the Elements collection.

'Finally we are calling the webservice object like
the 'following :

objretmsg = objInBW.process SingleMessage(o bjMsg)

------------- end of code------------------------------