Click here to Skip to main content
11,708,312 members (73,364 online)
Rate this: bad
good
Please Sign up or sign in to vote.
See more: VB6
Can we send sms using vb6 by connecting any free sms sender site like way2sms.com or anything else...?
Posted 23-Oct-11 0:50am
Rate this: bad
good
Please Sign up or sign in to vote.

Solution 1

  Permalink  
Rate this: bad
good
Please Sign up or sign in to vote.

Solution 2

try u can try http://www.smslib.org
  Permalink  
v2
Rate this: bad
good
Please Sign up or sign in to vote.

Solution 3

Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Private Sub cmdSend_Click()
On Error Resume Next
With objcom
.CommPort = CInt(txtPort.Text)
.Settings = "9600,N,8,1"
.Handshaking = comRTS
.RTSEnable = True
.DTREnable = True
.RThreshold = 1
.SThreshold = 1
.InputMode = comInputModeText
.InputLen = 0
.PortOpen = True
.Output = "AT" & vbCrLf
.Output = "AT+CMGF=1" & vbCrLf
.Output = "AT+CMGS=" & Chr(34) & Trim(txtNumber) & Chr(34) & vbCrLf
.Output = "HRL : " & tagabilang & vbCrLf & Trim(txtMsg) & Chr(26)
Sleep 5000
.PortOpen = False
End With
MsgBox ("Message Sent!")
End Sub
  Permalink  

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

  Print Answers RSS
0 Maciej Los 245
1 Sergey Alexandrovich Kryukov 189
2 Mika Wendelius 180
3 Peter Leow 130
4 OriginalGriff 103
0 OriginalGriff 9,253
1 Sergey Alexandrovich Kryukov 8,562
2 CPallini 5,189
3 Maciej Los 4,966
4 Mika Wendelius 3,856


Advertise | Privacy | Mobile
Web01 | 2.8.150819.1 | Last Updated 27 Mar 2013
Copyright © CodeProject, 1999-2015
All Rights Reserved. Terms of Service
Layout: fixed | fluid

CodeProject, 503-250 Ferrand Drive Toronto Ontario, M3C 3G8 Canada +1 416-849-8900 x 100