vba between komutu

24/03/2016, 15:34

macyrz

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
24/03/2016, 17:27

atoz112

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:
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

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.
25/03/2016, 10:47

macyrz

çok teşekkür ederim Atoz112 kod çalıştı. modül eklentisini zaten yapmıştım. iyi çalışmalar dilerim