This project is read-only.
How to use CDMA Messaging.

1. Add Reference the CDMAMessaging.dll
2. Add the code below in button click.

Public Class CDMAForm

Dim WithEvents objCdma As CDMAMessaging

Private Sub btnConnect_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnConnect.Click
Try

objCdma = New CDMAMessaging(cboPort.Text, "cdma")
objCdma.Connect()


If objCdma.isModemSupported Then
MsgBox("Connect")
Else
MsgBox("Not Connect")
End If


Catch ex As Exception

End Try
End Sub

Private Sub objCdma_Connected(ByVal sender As Object, ByVal e As System.EventArgs) Handles objCdma.Connected

End Sub

Private Sub btnRefreshDeviceInformation_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnRefreshDeviceInformation.Click
Me.Cursor = Cursors.WaitCursor

txtModel.Text = objCdma.PhoneModel
txtManufacturer.Text = objCdma.ManufacturerIdentification

txtSerialNo.Text = objCdma.IMEI
txtImsi.Text = objCdma.RevisionIdentification

Me.Cursor = Cursors.Default
End Sub

Private Sub objCdma_ConnectedError(ByVal sender As Object, ByVal e As VegatechIT.Messaging.ConnectedErrorEventArgs) Handles objCdma.ConnectedError
MsgBox(e.Exception.Message)
End Sub

End Class

Last edited Oct 13, 2012 at 12:43 PM by Sirsteven, version 1

Comments

No comments yet.