Click here to Skip to main content
11,637,415 members (65,448 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 Sergey Alexandrovich Kryukov 314
1 OriginalGriff 295
2 stibee 288
3 jyo.net 270
4 himanshu agarwal 209
0 OriginalGriff 9,031
1 Sergey Alexandrovich Kryukov 8,643
2 Mika Wendelius 6,959
3 F-ES Sitecore 2,388
4 Suvendu Shekhar Giri 2,320


Advertise | Privacy | Mobile
Web02 | 2.8.150728.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