FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for CA-Clipper send sms via modem (with phone sim card)
Posts: 83
Joined: Tue Nov 08, 2005 11:09 AM
send sms via modem (with phone sim card)
Posted: Fri Dec 02, 2005 09:05 PM

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
Posts: 310
Joined: Sun Jan 08, 2006 10:09 PM
send sms via modem (with phone sim card)
Posted: Sun Jan 15, 2006 06:40 AM
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.
Posts: 83
Joined: Tue Nov 08, 2005 11:09 AM
send sms via modem (with phone sim card)
Posted: Sun Jan 22, 2006 01:23 PM

==> 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
Posts: 86
Joined: Fri Oct 07, 2005 07:59 AM
SMS FIVEWIN
Posted: Mon Feb 27, 2006 04:54 PM

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

Continue the discussion