Code:txtmusic.Text = App.Path & "\Prayer.wav" With MMControl1 .Notify = False .Wait = True .Shareable = False .Command = "close" End With If lblhr.Caption = "03:00:00 PM" Then With MMControl1 .FileName = txtmusic.Text .Command = "open" .Command = "play" End With End If
or
[CODE]If InStr(Label1.Caption, "03:00:00") Then
txtmusic.Text = App.Path & "\3oclockhabit.wav"
With mmcplayer
.Filename = txtmusic.text
.Command = "open"
.Command = "play"
End With
End If
End If
this will play it as long your time format is same 03:00:00
please attach ur source thanks..
also if u cant attach source tell us the label name for the time
also do this
for accurate results
instead of using timer lable use text1.text
and try this code
text1.text = 03:00:00
Code:If InStr(Text1.Text, "3") Then MsgBox "alert play azan" End If
so u gona be doing this
bare in mind your using text1.text as timer not lableCode:If InStr(Text1.Text, "03:00:00") Then txtmusic.Text = App.Path & "\3oclockhabit.wav" With mmcplayer .Filename = txtmusic.text .Command = "open" .Command = "play" End With End If End If
it works




Reply With Quote