Results 1 to 1 of 1

Thread: Need to loop .wav file three times

  1. #1

    Thread Starter
    Member
    Join Date
    Feb 2006
    Posts
    50

    Need to loop .wav file three times

    Need to loop .wav file three times. (See "Sound") (Not tagged in origional code.)

    Private Sub Address_Exit(Cancel As Integer)
    Address.BackColor = 16777215
    On Error Resume Next

    'If there is no matching record in communications do nothing.
    If IsNull(DLookup("[address]", "communications", "[address]='" & replacequote(Me![Address]) & "'")) Then
    Exit Sub
    End If


    'Make button visable and activate alert beep.
    Command1796.Visible = True


    PlaySound "H:\Generald\media\BEEP_FM.wav", ByVal 0&, SND_FILENAME Or SND_ASYNC



    End Sub
    Last edited by carbo; May 20th, 2006 at 08:20 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
  •  



Click Here to Expand Forum to Full Width