Metin,

After reading your posting today, I have downloaded the Nokia SDK 2.1 and rummaged about a bit. The following is based on a very short look at the problem.

For some reason the Nokia controls aren't available from VFP under Tools/Options/Controls. They also fail to be added even when selecting the dlls directly with Add button. Gritting teeth and loading up Visual Basic/Project/References shows the Nokia SMS Adaptor as available. So I don't know what the matter is with VFP. Time to do the job by hand.

The default installation of the Nokia SDK places some dlls in Common Files\nokia\adapters. Based on this, what seems to work is something like:

x=NEWOBJECT("myclass")

* Test the object
x.ISMSSend_CreateShortMsg
x.ISMSSend_Send
x.ISMSSend_GetLastError
x.ISMSSend_Terminate
x.ISMSSend_StartListeningEvents

MESSAGEBOX('Finished')


DEFINE CLASS myclass AS session OLEPUBLIC

	* Inherit ISMSSend class definition from dll
	IMPLEMENTS ISMSSend IN "C:\Program Files\Common Files\nokia\adapters\sms3as.dll"

	PROCEDURE ISMSSend_CreateShortMsg() AS VARIANT;
 				HELPSTRING "method CreateShortMsg"
		MESSAGEBOX('method CreateShortMsg')
	ENDPROC

	PROCEDURE ISMSSend_Send(pSMS AS VARIANT) AS VOID;
 				HELPSTRING "method Send"
		MESSAGEBOX('method Send')
	ENDPROC

	PROCEDURE ISMSSend_GetLastError() AS VARIANT;
 				HELPSTRING "method GetLastError"
		MESSAGEBOX('method GetLastError')
	ENDPROC

	PROCEDURE ISMSSend_Terminate() AS VOID;
 				HELPSTRING "method Terminate"
		MESSAGEBOX('method Terminate')
	ENDPROC

	PROCEDURE ISMSSend_StartListeningEvents() AS VOID;
 				HELPSTRING "method StartListeningEvents"
		MESSAGEBOX('method StartListeningEvents')
	ENDPROC

ENDDEFINE

HTH

Alan