[RESOLVED] sending sms with listview and checkbox in listview

[useruseronline]

[QUOTE=salsa31;4177355]let me show you part of the sending code

l LsVw.SelectedItem it will work?
you will have to change this code to list then it will snd

but u will have to bring whole data of database to text data base

[salsa31]

[QUOTE=useruseronline;4177363]

let me show you part of the sending code

l LsVw.SelectedItem it will work?
you will have to change this code to list then it will snd

but u will have to bring whole data of database to text data base

didntwork

[useruseronline]

[QUOTE=salsa31;4177366]

didntwork

u r doing it wrong because ur data is mdb format bring it in to two files as i did
the draw the list and code accordingly

[akhileshbc]

Assuming, your API provider allows multiple TO elements.

Private Function getSelectedNums() As String
    Dim temp As String
    temp = ""
    
    Dim i As Long
    For i = 1 To ListView1.ListItems.Count  '~~~ Loop through the listview
        If ListView1.ListItems(i).Checked = True Then   '~~~ if an item is checked
            temp = temp & "<TO>" & ListView1.ListItems(i).SubItems(1) & "</TO>" & vbCrLf    '~~~ enclose the number in "<TO>" tags
        End If
    Next
    
    getSelectedNums = temp  '~~~ return it
End Function

[salsa31]

Assuming, your API provider allows multiple TO elements.

Private Function getSelectedNums() As String
    Dim temp As String
    temp = ""
    
    Dim i As Long
    For i = 1 To ListView1.ListItems.Count  '~~~ Loop through the listview
        If ListView1.ListItems(i).Checked = True Then   '~~~ if an item is checked
            temp = temp & "<TO>" & ListView1.ListItems(i).SubItems(1) & "</TO>" & vbCrLf    '~~~ enclose the number in "<TO>" tags
        End If
    Next
    
    getSelectedNums = temp  '~~~ return it
End Function

where do i put this code?
i just want to be able to choose a contact form the listview and send him a sms