Results 1 to 9 of 9
  1. #1
    hemaazez is offline Novice
    Windows 10 Access 2016
    Join Date
    Feb 2017
    Posts
    23

    Lightbulb send SMS

    Thank you [IMG]file:///C:/Users/Ibrahim/AppData/Local/Temp/msohtmlclip1/01/clip_image001.png[/IMG]June7 - [IMG]file:///C:/Users/Ibrahim/AppData/Local/Temp/msohtmlclip1/01/clip_image002.png[/IMG]VIP
    I found my mistake
    I’m beginner in access
    When I asked the previous question I thought that I can save the all data of any one in table

    Now I found the right code

    Dim x, xt As String
    x = Me.Mobiltext.Value


    xt = Me.SMStext.Value
    sampleurl = "http://smsmisr.com/api/send.aspx?username=................&password=..... .................&language=3&sender=...........&mo bile=" & x & "&message=" & xt & ""

    via this code I can write a mobile number in the text box and send the text message .
    but I need to get all numbers from the table in sub-form

  2. #2
    hemaazez is offline Novice
    Windows 10 Access 2016
    Join Date
    Feb 2017
    Posts
    23

    kindly found the SMS access form

    Thank you June7 VIP
    I found my mistake
    I’m beginner in access
    When I asked the previous question I thought that I can save the all data of any one in table

    Now I found the right code

    Dim x, xt As String
    x = Me.Mobiltext.Value
    xt = Me.SMStext.Value
    sampleurl = "http://smsmisr.com/api/send.aspx?username=................&password=..... .................&language=3&sender=...........&mo bile=" & x & "&message=" & xt & ""

    via this code I can write a mobile number in the text box and send the text message .
    but I need to get all numbers from the table in sub-form
    [/QUOTE]
    Attached Files Attached Files

  3. #3
    pbaldy's Avatar
    pbaldy is offline Who is John Galt?
    Windows XP Access 2007
    Join Date
    Feb 2010
    Location
    Nevada, USA
    Posts
    22,518
    One method would be to open a recordset on an SQL statement that retrieved the appropriate records, and loop that, sending a text for each record.
    Paul (wino moderator)
    MS Access MVP 2007-2019
    www.BaldyWeb.com

  4. #4
    hemaazez is offline Novice
    Windows 10 Access 2016
    Join Date
    Feb 2017
    Posts
    23
    thank you a lot
    kindly , can you help me in this code to open a recordset on an SQL statement that retrieved the appropriate records, and loop that, sending a text for each record.
    regards

  5. #5
    pbaldy's Avatar
    pbaldy is offline Who is John Galt?
    Windows XP Access 2007
    Join Date
    Feb 2010
    Location
    Nevada, USA
    Posts
    22,518
    Here's my template code:

    Code:
      Dim strSQL  As String
      Dim db      As DAO.Database
      Dim rs      As DAO.Recordset
    
      Set db = CurrentDb()
      
      strSQL = "SELECT ..."
      Set rs = db.OpenRecordset(strSQL, dbOpenDynaset)
    
      Do While Not rs.EOF
    
        rs.MoveNext
      Loop
    
      rs.Close
      set rs = nothing
      set db = nothing
    You'd use

    rs!FieldName

    to refer to a field in the recordset.
    Paul (wino moderator)
    MS Access MVP 2007-2019
    www.BaldyWeb.com

  6. #6
    hemaazez is offline Novice
    Windows 10 Access 2016
    Join Date
    Feb 2017
    Posts
    23
    Thank you a lot
    i will try using this code
    Regards

  7. #7
    pbaldy's Avatar
    pbaldy is offline Who is John Galt?
    Windows XP Access 2007
    Join Date
    Feb 2010
    Location
    Nevada, USA
    Posts
    22,518
    Regarding your PM, post your effort here and we'll try to fix it.
    Paul (wino moderator)
    MS Access MVP 2007-2019
    www.BaldyWeb.com

  8. #8
    hemaazez is offline Novice
    Windows 10 Access 2016
    Join Date
    Feb 2017
    Posts
    23

    thanks

    dear pbaldy


    thank you for your support
    i did the code , but the code didn't work correctly
    kindly , can you help me
    Attached Files Attached Files

  9. #9
    pbaldy's Avatar
    pbaldy is offline Who is John Galt?
    Windows XP Access 2007
    Join Date
    Feb 2010
    Location
    Nevada, USA
    Posts
    22,518
    Use your code to send in the loop, replacing

    x = Me.Mobiltext.Value

    with

    x = rsmobile!Mobile
    Paul (wino moderator)
    MS Access MVP 2007-2019
    www.BaldyWeb.com

Please reply to this thread with any new information or opinions.

Similar Threads

  1. Send SMS from Access
    By dniezby in forum Access
    Replies: 7
    Last Post: 12-26-2015, 05:37 PM
  2. Send from in Outlook
    By KylieReed in forum Import/Export Data
    Replies: 1
    Last Post: 02-10-2015, 10:36 AM
  3. how to send sms via ms access
    By seylom in forum Programming
    Replies: 2
    Last Post: 07-23-2014, 07:50 AM
  4. Send Email
    By cbrsix in forum Programming
    Replies: 1
    Last Post: 08-27-2013, 12:50 PM
  5. Send Email
    By cbrsix in forum Programming
    Replies: 10
    Last Post: 05-10-2013, 11:37 AM

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  
Other Forums: Microsoft Office Forums