• 發(fā)起呼叫
• 往SIM卡上添加
• 更新SIM卡上的
• 刪除SIN卡上的
• 開啟/關(guān)閉固定號(hào)碼撥號(hào)
• 輸入PIN和PIN2碼

• 該操作是如此簡(jiǎn)單的，您只需在您的程序中聲明相應(yīng)的DLL函數(shù)即可，就像在用戶的應(yīng)用程序之內(nèi)的功能；呼叫它就像用戶自己寫入一樣。如下是一個(gè)演示實(shí)例，它展示了如何發(fā)起呼叫、如何列出SIM卡的表以及如何存儲(chǔ)。
  
  Public Sub MakeCall(ByVal sPhoneNumber As String)
  SIMMakeCall(sPhoneNumber, SapphireSIMLicence)
  End Sub
  Public Sub ListPhoneNumbers(ByRef iEntries As Integer, _ByVal iLocation As Integer, _ByRef sPhoneNames As String, _ByRef sPhoneNumbers As String)
  
  Dim sListPhoneNames As String
  Dim sListPhoneNumbers As String sListPhoneNames = Space(1024)
  sListPhoneNumbers = Space(1024)
  sSIMListPhoneNumbers(iEntries, _iLocation, _sListPhoneNames, _sListPhoneNumbers, _SapphireSIMLicence)
  sPhoneNames = StripString(sListPhoneNames)
  sPhoneNumbers = StripString(sListPhoneNumbers)
  End
  
  Sub Public Sub WritePhoneNumber(ByVal iIndex As Integer, _ByVal iLocation As Integer, _ByVal sPhoneName As String, _ByVal sPhoneNumber As String)
  
  UnlockPIN("123456", "")
  sSIMWritePhoneNumber(iIndex, _iLocation, _sPhoneName, _sPhoneNumber, _SapphireSIMLicence)
  End Sub

Product Features
The Sapphire Sim Utility makes SIM card management easy with the following features:

• Make a phone call
• Add a contact to the SIM card
• Update a contact on the SIM card
• Delete a contract form the SIM card
• Enable or disable fixed dialling
• Enter PIN and PIN2 numbers

Sample Code

• Implementation couldn’t be easier, simply declare the DLL function as a function within your application and call it as though you wrote it yourself. Here’s a sample demo to show how to make a call, list the SIM card phone numbers and to store a phone number.
  
  Public Sub MakeCall(ByVal sPhoneNumber As String)
  SIMMakeCall(sPhoneNumber, SapphireSIMLicence)
  End Sub
  Public Sub ListPhoneNumbers(ByRef iEntries As Integer, _ByVal iLocation As Integer, _ByRef sPhoneNames As String, _ByRef sPhoneNumbers As String)
  
  Dim sListPhoneNames As String
  Dim sListPhoneNumbers As String sListPhoneNames = Space(1024)
  sListPhoneNumbers = Space(1024)
  sSIMListPhoneNumbers(iEntries, _iLocation, _sListPhoneNames, _sListPhoneNumbers, _SapphireSIMLicence)
  sPhoneNames = StripString(sListPhoneNames)
  sPhoneNumbers = StripString(sListPhoneNumbers)
  End
  
  Sub Public Sub WritePhoneNumber(ByVal iIndex As Integer, _ByVal iLocation As Integer, _ByVal sPhoneName As String, _ByVal sPhoneNumber As String)
  
  UnlockPIN("123456", "")
  sSIMWritePhoneNumber(iIndex, _iLocation, _sPhoneName, _sPhoneNumber, _SapphireSIMLicence)
  End Sub