+- 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'te Metin Kutusu1'deki Harfe Göre Metinkutusu2'ye Değer Atanması (/konu-access-te-metin-kutusu1-deki-harfe-gore-metinkutusu2-ye-deger-atanmasi.html)
Sayfalar:
1
2
Access'te Metin Kutusu1'deki Harfe Göre Metinkutusu2'ye Değer Atanması - ertuğrul2022 - 03/12/2022
Hayırlı günler
Benim uygulamada siparişnu alanındaki kelimenin içinde I,M var ise günekle kutusu otomatik olarak 730 yazsın.
siparişnu alanındaki kelimenin içinde O,Y var ise günekle kutusu otomatik olarak 365 yazsın.
siparişnu alanındaki kelimenin içinde E,H var ise günekle kutusu otomatik olarak 0 yazsın.
Ben sadece sayenizde
Me.günekle = IIf([siparişnu] Like "*k*" Or [siparişnu] Like "*y*" Or [siparişnu] Like "*j*", 365, 730)
yaptım ama bu nu zenginleştiremedim. bu konuda bana yardımcı olabilirmisiniz.
RE: Access'te Metin Kutusu1'deki Harfe Göre Metinkutusu2'ye Değer Atanması - atoykan - 03/12/2022
Bu harfler yoksa?
RE: Access'te Metin Kutusu1'deki Harfe Göre Metinkutusu2'ye Değer Atanması - ertuğrul2022 - 03/12/2022
(03/12/2022, 11:12)atoykan yazdı: Bu harfler yoksa?
Hocam bu harflerden başka harf olmayacak
RE: Access'te Metin Kutusu1'deki Harfe Göre Metinkutusu2'ye Değer Atanması - atoykan - 03/12/2022
Kodunuzu aşağıdaki gibi düzenleyebilirsiniz
Me.günekle = IIf([siparişnu] Like "*I*" Or [siparişnu] Like "*M*", 730, IIf([siparişnu] Like "*O*" Or [siparişnu] Like "*Y*", 365, IIf([siparişnu] Like "*E*" Or [siparişnu] Like "*H*", 0, "HATALI GİRİŞ KONTROL EDİNİZ")))Hızla cevap yazayım derken kod satırını bölmeye niyetlenip vazgeçmişim o yüzden arada anlamsız bir & bağlacı var kodu revize ettim bu halini dikkate alın.
RE: Access'te Metin Kutusu1'deki Harfe Göre Metinkutusu2'ye Değer Atanması - ertuğrul2022 - 03/12/2022
(03/12/2022, 11:21)atoykan yazdı: Kodunuzu aşağıdaki gibi düzenleyebilirsiniz
Me.günekle = IIf([siparişnu] Like "*I*" Or [siparişnu] Like "*M*", 730," & IIf([siparişnu] Like "*O*" Or [siparişnu] Like "*Y*", 365, IIf([siparişnu] Like "*E*" Or [siparişnu] Like "*H*", 0, "HATALI GİRİŞ KONTROL EDİNİZ")))
Ellerin dert görmesin hocam deneyeceğim.
RE: Access'te Metin Kutusu1'deki Harfe Göre Metinkutusu2'ye Değer Atanması - ertuğrul2022 - 03/12/2022
(03/12/2022, 11:26)ertuğrul2022 yazdı:Hocam kod çalışıyor ancak sipariş kutusuna kod içindeki harflerden başka yazılmayacak ama eskaza yanlış harf yazılırsa kod hata veriyor ve kullanıcıyı kod sayfasına yönlendiriyor. Bu konuda ne yapabilirim.(03/12/2022, 11:21)atoykan yazdı: Kodunuzu aşağıdaki gibi düzenleyebilirsiniz
Me.günekle = IIf([siparişnu] Like "*I*" Or [siparişnu] Like "*M*", 730," & IIf([siparişnu] Like "*O*" Or [siparişnu] Like "*Y*", 365, IIf([siparişnu] Like "*E*" Or [siparişnu] Like "*H*", 0, "HATALI GİRİŞ KONTROL EDİNİZ")))
Ellerin dert görmesin hocam deneyeceğim.
Değerli bilgilerinizi bizlerle paylaştığınız için ayrıca teşekkür ederim.