send sms via modem (with phone sim card)

Post Reply
User avatar
tnhoe
Posts: 83
Joined: Tue Nov 08, 2005 11:09 am
Location: Malaysia
Contact:

send sms via modem (with phone sim card)

Post by tnhoe »

Hi,

Does anyone has fivewin sample to send sms via gsm modem in notebook/pc(connected with phone sim card) ?

Regards
Hoe
Regards

Hoe, email: easywin3@yahoo.com
Rochinha
Posts: 309
Joined: Sun Jan 08, 2006 10:09 pm
Location: Brasil - Sao Paulo
Contact:

Post by Rochinha »

Hi tnhoe

You have two ways

1-Develop a small aplication/service in Microsoft SMS SDK to use in your aplication.

2-Using Microsoft SMS Sender 1.0 tool. Is a free small aplication for send SMS. You can download at SOFT32.com

Or search on Google with sms api for more.
User avatar
tnhoe
Posts: 83
Joined: Tue Nov 08, 2005 11:09 am
Location: Malaysia
Contact:

Post by tnhoe »

==> 1-Develop a small aplication/service in Microsoft SMS SDK

Will try it.

==> 2-Using Microsoft SMS Sender 1.0 tool

Already tried. I call it from Fivewin nCode=Winexec() and a few problems found :-
- it always return same nCode value whether success or fail
- it hangs when sending more than 5 SMSs from app
Regards

Hoe, email: easywin3@yahoo.com
User avatar
PAUL SIMM
Posts: 63
Joined: Fri Oct 07, 2005 7:59 am
Location: Madrid, Spain
Contact:

SMS FIVEWIN

Post by PAUL SIMM »

These people sell an aplication that permits sending sms with a batch file.
http://www.intellisoftware.co.uk

I Fwrite from FW and Run :
[SENDSMS 637777888 Rec:PRUEBA SL /Dir:ABADESA, Nº 12 /Ciudad:MADRID /Hora:19:15] to send an SMS
************************************************
Function MakeSendSms(cSend,cTel)
Local oText
Local cText:='SENDSMS '+cTel+ ' "'+cSend+'"'

IF FILE("PESSEND.BAT")
ERASE PESSEND.BAT
ENDIF

oText:= TTxtFile():New("PESSEND.BAT" )

if oText:Open()
oText :Add(cText)
oText :Close()
endif

IF FILE("PESSEND.BAT")
WAITRUN("PESSEND.BAT",2)
ENDIF

RETURN NIL
Regards/Saludos
Paul

paul@pes-systems.net
Post Reply