businessobjects Level: Trainee
 Registered: 08-03-2010 Posts: 1
|
Send and receive SMS via VB6 thru NOKIA phone
Good day.
I would like to create an application in VB6 to send and receive
SMS thru Nokia phone.
Actually I have Nokia N70 and NOKIA 6131.
I have found the NOKIA PC CONNECTIVITY SDK 3.0 document
and I have get the SDK at
http://www.forum.nokia.com/info/sw.nokia.com/id/d877bad2-a06b-4dca-b148-b74cda495c19/SDK_3_0_Installer.zip.html
I connect my phone via USB but when execute my VB6 code
I obtain this message:
No phone connected
This is the code (very easy):
--------------
Private WithEvents PhoneInfo As PhoneInfo4
Private PhoneInfoItem As IPhoneInfoItem
Private Sub Form_Load()
Set PhoneInfo = New PhoneInfo4
'Get phone Info
Set PhoneInfoItem = PhoneInfo.GetPhoneInfo
With PhoneInfoItem
MsgBox "" & .ProductCode, vbInformation, ""
End With
End Sub
--------------
Can you help me?
|