Receive a fax via vb

See more:

VB

Hi
finaly I could send fax via following code It works fine,now I want to receive fax with vb code when I click a receive button in my application but I do not know how I can do it

'this is sending code:
Private Sub Buttonsend_Click(sender As Object, e As EventArgs) Handles Buttonsend.Click
   Try
      Dim objFaxDocument As New FAXCOMEXLib.FaxDocument
      Dim objFaxServer As New FAXCOMEXLib.FaxServer
      Dim objSender As FAXCOMEXLib.FaxSender = Nothing
      Dim JobID As Object

      'Connect to the local fax machine
      objFaxServer.Connect("") 'Change to //ComputerName if access a fax sever

      'Set high priority for bigger files
      objFaxDocument.Priority = FAXCOMEXLib.FAX_PRIORITY_TYPE_ENUM.fptHIGH

      'Set the body text of the fax to a file
      objFaxDocument.Body = "c:\New Microsoft Office Word Document.docx"

      'The Faxes document name
      objFaxDocument.DocumentName = "My First Fax"

      'Set the recipient of the fax
      objFaxDocument.Recipients.Add("1111111", "the")
      objFaxDocument.AttachFaxToReceipt = True

      'Any notes for the fax
      objFaxDocument.Note = "first text fax of the day in vb"

      'Fax Subject
      objFaxDocument.Subject = "testing fax system in vb"

      'Provide the address for the fax receipt 
      objFaxDocument.ReceiptAddress = "*********@yahoo.com"

      JobID = objFaxDocument.ConnectedSubmit(objFaxServer)
      MsgBox("The Job ID is :" & JobID(0))

   Catch ex As Exception
      MsgBox("Error number: " & Hex(Err.Number) & ", " & Err.Description)
   End Try
End Sub

now how can I receive fax inside my application?
can anyone assistance me?
thanks.