VB.NET: Get The Generated Letter with GetPDF()

Instructions

Create a new Console Application project and add a web reference.

Copy the entire code below, delete anything written in your application and paste the code there.
Replace the values of the Const lines with your details:
- Replace MyUsername and MyPassword with your PostalMethods user details.
- Replace "ID" with the LetterID for which you would like to get the PDF.
Start your application. If the response is -3000, you will see the status report. If the response is any other number, check the Web Service Status Codes section.

Imports System.IO
 
Module Module1
    Sub Main()
        Const MyUsername As String = "MyUsername"
        Const MyPassword As String = "MyPassword"
        Const ID As Integer = 0
 
        Dim objPM As New com.postalmethods.api.PostalWS()
        Dim objResult As com.postalmethods.api.GetPDFResult
 
        '
        ' Invoke the GetPDF method
        '
        objResult = objPM.GetPDF(MyUsername, MyPassword, ID)
 
        '
        ' Check response status
        '
        If objResult.ResultCode = -3000 Then
            '
            ' -3000 means that the PDF was successfully retrieved. Enter the full path to save it in e.g. "c:\mypdf.pdf".
            '
            Console.WriteLine("Successfully retrieved PDF. Please enter a path to save it in.")
            Dim strPath As String = Console.ReadLine()
 
            '
            'Save the file
            '
            Dim objFS As New FileStream(strPath, FileMode.Create, FileAccess.Write)
            objFS.Write(objResult.FileData, 0, objResult.FileData.Length)
            objFS.Close()
            objFS = Nothing
        Else
            '
            ' A value less than -3000 means an error occurred.
            ' See the PostalMethods Status Codes: http://www.postalmethods.com/statuscodes.
            '
            Console.WriteLine("Error is:" & objResult.ResultCode)
        End If
 
        ' In debug mode, the following lines prevent your console application from closing automatically upon termination
        Console.WriteLine("Hit ENTER to terminate application")
        Console.ReadLine()
 
    End Sub
End Module

VB.NET

Developer?

Get a full development account, for free:

VB.NET: Get The Generated Letter with GetPDF()

Instructions