arkadaşlar kullanıdığım Access programında ses modülü var bu modül sadece 32 bit Access te çalışmakta, ben bu modülü hem 32 hemde 64 bit Access te çalıştırmam için başına hangi kodu yazmam gerekiyor. şimdiden çok teşekkürler.

sayın macyrz,

bahsettiğiniz talebinize yönelik olarak;

kod satırının altındaki fonksiyon ifadesini iptal edip yerine

kod satırlarını kullanmayı deneyiniz.bilginize...iyi çalışmalar.saygılar.

hocam denedim olmadı

sayın macyrz,

Alıntı:...denedim olmadı...

sadece yukarıdaki ifadeyi yazmak yerine lütfen daha geçerli ve net açıklamalar olması adına,daha ayrıntılı bilgilendirmeler ile geri bildirimde bulunmanız yerinde olurdu.

gerekirse,olası sorun veya hatanın ekran görüntüsünü ekleyiniz.fakat öncesinde,lütfen örnek uygulamanızı içeriğinde farazi gerçek dışı veriler ve sonuçları görmek adına da birkaç kayıt olacak şekilde ekleyiniz.

bilginize...iyi çalışmalar,saygılar.

Alttaki kodu modüle kaydedince 32 bit ve 64 bitte sorunsuz olarak çalıştı.

Option Compare Database







#If VBA7 Then



Declare PtrSafe Function apisndPlaySound Lib "winmm" Alias "sndPlaySoundA" _

    (ByVal filename As String, ByVal snd_async As Long) As Long



#Else



Declare Function apisndPlaySound Lib "winmm" Alias "sndPlaySoundA" _

    (ByVal filename As String, ByVal snd_async As Long) As Long



#End If

  Function PlaySound(sWavFile As String)

    ' Purpose:  Plays a sound.

    ' Argument: the full path and file name.



    If apisndPlaySound(sWavFile, 1) = 0 Then

        MsgBox "The Sound Did Not Play!"

    End If

  End Function

çok teşekkür ederim atoz112 ve ozankaya, modül hem 32 bitte hem 64 bitte çalıştı. Bu modül hakkında kısa bir açıklama  wav formatındaki sesleri accesste çalıştırabilirsiniz. örnek verecek olursak modülü Access te kayıt ettikten sonra formun açılışı ses olayına aşağıdaki kodu yapıştırırsak form açılışında load.wav sesi çalar. 

 

Private Sub Form_Open(Cancel As Integer)



PlaySound ("C:\load.wav")

End Sub