Maybe declare...
Private Declare Auto Function PlaySound Lib "winmm.dll" (ByVal
ByVallpszSoundName As _
String, ByVal hModule As Integer, ByVal dwFlags As Integer) As Integer
then call...
On Error Resume Next
Dim fileName As String = String.Concat("N:\ODRC04Data\Sounds\tada.wav")
Const SND_FILENAME As Integer = &H20000
PlaySound(fileName, 0, SND_FILENAME)
Graeme
"Xero" <jeff_at_chezjeff_dot_net> wrote in message
news:45**********************************@microsof t.com...
Is there a simpler way to play from a sound file than this one?
http://msdn.microsoft.com/library/de...ayingsound.asp
Thanks.
--
Xero
http://www.chezjeff.net
My personal web portal