This function is designed for license renewal process by e-mail. It creates renewal request certificate (into filePathName) which should be sent into our automatic e-mail processing address. The service sends renewal response certificate in reply
Syntax
Public Shared Function CreateRenewalRequestCertificate(filePathName As String, renewalCode As String, licenseCode As String) As ClientRenewalRequestResponseCode
Parameters
String filePathName - file name where request certificate will be stored
String renewalCode - renewal code for renewal process
String licenseCode - license code which should be renewed
Return value
Returns the status of operation via ClientRenewalRequestResponseCode enum.
Requirements
File: ItpLibraryNetWrapper.vb
Namespace: ItpLibraryNetClient;
Example
Private
Sub
btnSaveCertificate_Click(sender
As
Object
, e
As
EventArgs)
Handles
btnSaveCertificate.Click
Dim
licenseCode
As
String
= tbLicenseCode.Text.Trim()
If
String
.IsNullOrEmpty(licenseCode)
Then
MessageBox.Show(
"License code is not available"
,
"License is empty"
)
Return
End
If
Dim
renewalCode
As
String
= tbRenewalCode.Text.Trim()
If
String
.IsNullOrEmpty(renewalCode)
Then
MessageBox.Show(
"Please specify a renewal code"
,
"Renewal code is empty"
)
Return
End
If
Using saveFileDialog
As
SaveFileDialog = FileDialogs.CreateSaveFileDialog(_certificateName)
If
saveFileDialog.ShowDialog() <> DialogResult.OK
Then
Return
End
If
Dim
responseCode
As
ClientRenewalRequestResponseCode = ItpLibraryNetWrapper.CreateRenewalRequestCertificate(saveFileDialog.FileName, renewalCode, licenseCode)
MessageBox.Show(responseCode.ToString(), Text)
End
Using
End
Sub