arkadaşlar Access ile yaptığım programda barkod okumalarında eğer metin değerleri arasında ise ayır sesi değilse normal bip çalmasını istiyorum fakat program hep bip sesi çıkarmaktadır. şimdiden teşekkürler.
Private Sub barkod_AfterUpdate()
If ([barkod] >= [Metin71]) And ([barkod] <= [Metin73]) Then
Playsound ("C:\Ambar\ayir.wav")
Else
Playsound ("C:\Ambar\bip2.wav")
End If
End Sub
vba between komutu
sayın macyzr,
Site Kuralları gereği örnek uygulamanızı eklemeniz halinde daha geçerli bilgilendirmeleri edinmeniz daha muhtemel.
fakat,ilk etapta bir bilgilendirmede bulunmuş olmak adına;
.Wav dosyasını çalıştırmak için gerekli modül eklentisinin olduğunu varsaymak sureti ile,
ilgili barkod adlı denetimin GÜNCELLEME SONRASINDA olay yordamı içerisine
kod satırlarını dahil ediniz.olası bir hata veya sorun durumunda lütfen örnek uygulamanızı,içeriğinde farazi gerçek dışı ve sonuçları görebilmek adına birkaç veri barındıracak şekilde ekleyiniz.
bilginize...iyi çalışmalar,saygılar.
Site Kuralları gereği örnek uygulamanızı eklemeniz halinde daha geçerli bilgilendirmeleri edinmeniz daha muhtemel.
fakat,ilk etapta bir bilgilendirmede bulunmuş olmak adına;
.Wav dosyasını çalıştırmak için gerekli modül eklentisinin olduğunu varsaymak sureti ile,
ilgili barkod adlı denetimin GÜNCELLEME SONRASINDA olay yordamı içerisine
Kod:
Select Case Me.barkod.Text
Case Me.Metin71 To Me.Metin73
PlaySound ("C:\Ambar\ayir.wav")
Case Else
PlaySound ("C:\Ambar\ayir.wav")
End Select
bilginize...iyi çalışmalar,saygılar.
çok teşekkür ederim Atoz112 kod çalıştı. modül eklentisini zaten yapmıştım. iyi çalışmalar dilerim
Konuyu Okuyanlar: