+- 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ığı: Access Sorgusunda Alan Adı Değişkeni (/konu-access-sorgusunda-alan-adi-degiskeni.html)
Access Sorgusunda Alan Adı Değişkeni - kanakan52 - 28/06/2020
Merhabalar,
if şartı ile arama yapılacak alan adını değişkene bağlamak isitiyorum
If ComboBox14.Value = "Başlama Zamanı" Then
alan = "BaslamaZamani"
ElseIf ComboBox14.Value = "Bitiş Zamanı" Then
alan = "BitisZamani"
ElseIf ComboBox14.Value = "Hatırlatma Zamanı" Then
alan = "HatirlatmaZamani"
End If
secim = TextBox11.Text '(Burası tarih metin veya asayı olabilir)
If ComboBox15.Value = "Eşittir" Then
rs.Open "select*from Ajandam WHERE Ajandam.alan='" & secim & "'", baglan, 1, 1
Kırmızı alanları nasıl belirtmem lazım, bir çok konu araştırdım, Dlookup ile yapılacak gibi ama çözemedim.
Yardımınızı rica ederim.
RE: Access Sorgusunda Alan Adı Değiişkeni - feraz - 28/06/2020
(28/06/2020, 14:27)kanakan52 yazdı: Ajandam.alanBurdaki Ajandam yazan yere gerek yok.
Ve bir değişken tanımlayın dim x gibi mesela
X= "alanad" olarak girin.Whereden sonra " & x & "
Gibi deneyebilirsiniz örneğin.
RE: Access Sorgusunda Alan Adı Değiişkeni - kanakan52 - 28/06/2020
(28/06/2020, 14:34)feraz yazdı:(28/06/2020, 14:27)kanakan52 yazdı: Ajandam.alanBurdaki Ajandam yazan yere gerek yok.
Ve bir değişken tanımlayın dim x gibi mesela
X= "alanad" olarak girin.Whereden sonra " & x & "
Gibi deneyebilirsiniz örneğin.
Hocam birşeyler yanlış gidiyor ama anlamadım. Denemeye devam ediyorum..
Alan adını tamam gibi de kriterde hata veriyor şimdide...
RE: Access Sorgusunda Alan Adı Değiişkeni - feraz - 28/06/2020
(28/06/2020, 15:15)kanakan52 yazdı:Kriter olayında tek tırnak olaylarına dikkat edim abey.(28/06/2020, 14:34)feraz yazdı:(28/06/2020, 14:27)kanakan52 yazdı: Ajandam.alanBurdaki Ajandam yazan yere gerek yok.
Ve bir değişken tanımlayın dim x gibi mesela
X= "alanad" olarak girin.Whereden sonra " & x & "
Gibi deneyebilirsiniz örneğin.
Hocam birşeyler yanlış gidiyor ama anlamadım. Denemeye devam ediyorum..
Alan adını tamam gibi de kriterde hata veriyor şimdide...
RE: Access Sorgusunda Alan Adı Değiişkeni - kanakan52 - 28/06/2020
(28/06/2020, 15:50)feraz yazdı:(28/06/2020, 15:15)kanakan52 yazdı:Kriter olayında tek tırnak olaylarına dikkat edim abey.(28/06/2020, 14:34)feraz yazdı:(28/06/2020, 14:27)kanakan52 yazdı: Ajandam.alanBurdaki Ajandam yazan yere gerek yok.
Ve bir değişken tanımlayın dim x gibi mesela
X= "alanad" olarak girin.Whereden sonra " & x & "
Gibi deneyebilirsiniz örneğin.
Hocam birşeyler yanlış gidiyor ama anlamadım. Denemeye devam ediyorum..
Alan adını tamam gibi de kriterde hata veriyor şimdide...
Eşittir olayını yaptım hocam, ancak arasında için between kullanımını nasıl yaparım ?
If ComboBox15.Value = "Arasında" Then
'rs.Open "select*from Ajandam WHERE int([" & alan & "]) >" & CDbl(CDate(secim)) & " and >" & CDbl(CDate(secim2)) & "", baglan, 1, 1
RE: Access Sorgusunda Alan Adı Değiişkeni - feraz - 28/06/2020
Pc açık olmadığı için between yapısı buldum internetten ona göre düzenlersiniz.
sql = "SELECT Date FROM Table WHERE Date BETWEEN #" & DateMin & "# AND #" & DateMax & "#
Yani >= yada <= gibi yerlere gerek yok.Tabii koddaki # bunada gerek yok.Sadece between ne and yazan kısımları inceleyin.