SMS-it support forum    

Welcome to the SMS-it support forum.
Before entering a query/request please search the forum to see if someone else has asked the question before.
Please feel also free to respond to queries from other users if you have experienced the same type of problem and found a solution to it. 
Our support team will monitor this forum and endeavour to provide answers to the queries posted.
Please make sure to post your query to the right forum as there is a separate forum for each application provided by MAW Software.

Show messages for: Last 7 days Last 30 days All (Digest of all)

Back to the forum

On Thursday , the 06.16.2005, MAW Support wrote at 15:33:41 :

>Using sms-it with Sql-Server


is it possible to use sms-it with my sql-server database through my own custom application

You could use a VBS script to loop through your DB and send a SMS to the numbers stored there.
Here is a small sample... UNTESTED, JUST FOR REFERENCE :-(


Option Explicit
Const adOpenDynamic = 2
Const adLockPessimistic = 2
Const adUseClient = 3
Const adModeWrite = 2
Const WindowStyle = 1
Const WaitOnReturn = true
Dim sCommand
Dim oSh
Dim Conn, RS

On Error Resume Next

Set Conn = CreateObject("ADODB.Connection")
Set RS = CreateObject("ADODB.Recordset")
Conn.Provider = "MSDASQL"
Conn.Mode = adModeWrite
Conn.Open "Driver=MySQL; Server=localhost; Database=Users;", "MyUser", "nopwd"
' For the new ODBC 3.51 driver!
' Conn.ConnectionString = "DRIVER={MySQL ODBC 3.51 Driver};DATABASE=DBName;SERVER=localhost;"
Conn.CursorLocation = adUseClient
RS.CursorLocation = adUseClient
RS.Open "Select * from TPhoneNumbers", Conn, adOpenDynamic, adLockPessimistic
sCommand = RS.Fields("MobileNumber")

sCommand = "C:\SMS-it\Sms-it.exe SMST [SMS:" & "] Hello"

Set oSh = CreateObject("WScript.Shell")
oSh.Run sCommand, WindowStyle, WaitOnReturn
Set oSh = Nothing

Set RS = Nothing
Set Conn = Nothing

Post reply:

SPAM code displayed
next to this:

CGIForum (C) Markus Triska

Home to