Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Clipboard to phone
#1
This macro will send whatever text is in your clipboard to your cell via SMS. Substitute your number. Email out server must be setup.

ClipToPhone
Code:
Select All      Help
str Clip MesText
Clip.getclip
MesText.from("Would you like to send the following text?[][]" Clip)
mes-(MesText "ClipToPhone" "YN?a")
SendMail "5555551212@teleflip.com" "ClipToPhone" Clip
bee 4
Matt B
Reply
#2
I believe teleflip.com no longer works. I use this function (only tested with verizon and sprint)
Function TextMessage2
Code:
Select All      Help
function ~number ~message [carrier] ;;carrier 1 = verizon, 2 = sprint, 3 = nextel, 4 = att, 5 = alltell, 6 = tmobile, 7 = myboostmobile
str s =
;smtp_server smtp.gmail.com
;smtp_port 465
;smtp_user DispatchMessage@gmail.com
;smtp_password B6FB7681A7F595CE
;smtp_auth 2
;smtp_secure 1
;smtp_timeout 60
;smtp_email DispatchMessage@gmail.com
;smtp_displayname AutoText
;smtp_replyto DispatchMessage@gmail.com
;pop_server pop.gmail.com
;pop_port 995
;pop_user DispatchMessage@gmail.com
;pop_password B6FB7681A7F595CE
;pop_auth 0
;pop_secure 1
;pop_timeout 60
number + "@"
sel carrier
,case 1: number + "vtext.com"
,case 2: number + "messaging.sprintpcs.com"
,case 3: number + "messaging.nextel.com"
,case 4: number + "txt.att.net"
,case 5: number + "message.alltell.com"
,case 6: number + "tmomail.net"
,case 6: number + "vmobl.net"
,case 7: number + "myboostmobile.com"
,case else: number + "vtext.com"  ;;you can put a default here or a return
SendMail2 number "" message 0 "" "" "" "" "" s
err
,ret 0
ret 1
Reply


Forum Jump:


Users browsing this thread: 1 Guest(s)