» Serial code management

Serial code management

Hi im new here at plimus and im not sure how to work the serial code submission / verification. Is there any example code for VB6 about? Or code someone please explain how i get / read the XML stream.

Thanks.

ive managed to find some code

ive managed to find some code that demonstrates how this is done now but im having problems getting it to work

Private sub RegisterSerial ()
Dim objHTTP As New MSXML2.XMLHTTP
Dim strEnvelope As String
Dim strReturn As String
Dim objReturn As New MSXML2.DOMDocument
Dim nodeReturned As IXMLDOMNode
Dim xStatus As String

'here load xml file to be posted to the server
strEnvelope = "jsp/validateKey.jsp?action=REGISTER&productId=76044&key=123-456-7894-1234"
objHTTP.Open "post", "https://www.XYZ.com/", False

'Set a standard SOAP/ XML header for the content-type
objHTTP.setRequestHeader "Content-Type", "text/xml"

'Make the SOAP call
objHTTP.send strEnvelope

'Load the return envelope into a DOM
objReturn.Load objHTTP.responseBody

'Query the return envelope
Set nodeReturned = objReturn.selectSingleNode("//status")
xStatus = nodeReturned.Text
End sub

But im getting the error 'User defined type not defined' on the first line

Dim objHTTP As New MSXML2.XMLHTTP

Do i have to add a reference to my project? If so what do i have to reference?

Vendor Support

Hi there,

This specific request would be best handled by opening up a support ticket with Vendor Support from the control panel of your Plimus User account.

Please bear in mind that while the Support team will try to help you they cannot assist in creation and modifying code. They might however be able to pass you some useful pointers once they are able to fully clarify precisely what you are trying to achieve.

Thanks, and good luck,

 

Derek, Plimus