AccessTr.neT
run-time error 3464 ifade türü uyuşmazlığı hk - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: run-time error 3464 ifade türü uyuşmazlığı hk (/konu-run-time-error-3464-ifade-turu-uyusmazligi-hk.html)

Sayfalar: 1 2 3 4 5 6 7


Cvp: run-time error 3464 ifade türü uyuşmazlığı hk - tdsharun - 10/03/2009

alpeki99 hocama aynen katılıyorum... Ah örnek dosyasızlık aahhhh... Img-grin


Cvp: run-time error 3464 ifade türü uyuşmazlığı hk - osman06 - 10/03/2009

hocam örnek dosyayı çıkartmaya çalışıyım örnek dolu ve karışık biraz ayıklayabilirsem ekleyim hocam
hocam örnek ekte açılan formda renkli olan 3 yer var sorun bunlarda


Cvp: run-time error 3464 ifade türü uyuşmazlığı hk - osman06 - 10/03/2009

hocam örneği ekledim


Cvp: run-time error 3464 ifade türü uyuşmazlığı hk - Bilgisayarcı - 10/03/2009

Saat de datetime sanırım ordan arıza çıkıyor
stLinkCriteria3 = "[Saat]=" & "#" & SD3 & "#" yaparsak olur sanırım.


Cvp: run-time error 3464 ifade türü uyuşmazlığı hk - C*e*l*o*y*c*e - 10/03/2009

BULDUM Img-grin

Dim SD1, SD2, SD3, c As String


Dim stLinkCriteria1, stLinkCriteria2, stLinkCriteria3 As String


SD1 = Me.AdiSoyadi.Value
SD2 = Me.Tarih.Value
SD3 = Me.Saat.Value

stLinkCriteria1 = "[AdiSoyadi]=" & "'" & SD1 & "'"
stLinkCriteria2 = "[Tarih]=" & "#" & SD2 & "#"
stLinkCriteria3 = "[Saat]=" & "'" & SD3 & "'"

'Ayrıntı.BackColor = 16764057
'FormÜstbilgisi.BackColor = 255
'FormAltbilgisi.BackColor = 255

If DCount("*", "HATIRLATMALAR", "AdiSoyadi='" & Me.AdiSoyadi & "' and Tarih='" & Me.Tarih & "' and Saat='" & Me.Saat & "'") > 0 Then
c = MsgBox("DİKKAT!...LİSTENİZDE...*" _
& SD1 & " *adında ki kayıt * " _
& SD2 & " * Tarihinde*" _
& SD3 & " * Saatinde GİRİLMİŞ *" _
& vbCr & vbCr & " DEVAM ETMEK İSTİYORMUSUNUZ...", vbYesNo + vbQuestion, "..***..DİKKAT..***..")
If c = vbNo Then Undo: Exit Sub

If c = vbYes Then
Cevap = MsgBox("Emin misiniz", vbYesNo, "KONTROL")
If Cevap <> 6 Then
MsgBox "Kayıt Yapılmadı", vbOKOnly, "KAYIT YAPILMADI"
Undo

ElseIf vbNo Then
MsgBox "KAYIT YAPILDI", vbOKOnly, "KAYIT TAMAM"

End If
End If
End If

TAMAM ANCAK TABLODA BULUNAN tARİH VE sAAT ALANLARINI mETİN OLARAK AYARLAYACAKSIN YANİ TARİH?SAAT YAPMIYACAKSIN


Cvp: run-time error 3464 ifade türü uyuşmazlığı hk - osman06 - 10/03/2009

sn celoy hocam öyle yaparsam bu seferde raporda tarih aralığı verdiğimde verdiğim tarih aralığını çıkarmıyor
sn umut bey öylede olmadı
hocam aşağıdaki raporda tarih aralığı verdidirğim kodum tabloda metin yaparsam bunda nasıl bi değişiklik yaparsam istediğim tarih aralığını alırım

>=[forms]![Rapor]![İlk Hareket Tarihi] And <=[forms]![Rapor]![Son Har Tarihi]