Skip to main content

AccessTr.neT


Birinci Alanda Geçen Herhangi Bir Kelime İkinci Alanda Varsa İstenilen Alana "x" Yazd

Birinci Alanda Geçen Herhangi Bir Kelime İkinci Alanda Varsa İstenilen Alana "x" Yazd

#13
(19/09/2024, 12:19)berduş yazdı: gerçi yukardaki yöntem sadece "x" yazmak için işe yarar,
eğer veri değiştirilmişse daha önceden "x" yazan alanlar değişmez onların da değiştirilmesini istiyor musunuz?

yukardaki olasılığa uygun yeni yapı:
1 - bir modüle aşağıdaki kodu ekleyin
Function xRegExStr(xBol As String, xKontrol As String) As String
xBol = Replace(xBol, " ", " | ")
Dim RegEx As Object
Set RegEx = CreateObject("VBScript.RegExp")
With RegEx
.IgnoreCase = True
.Global = True
.MultiLine = True
.Pattern = "(" & xBol & ")"

xRegExStr = IIf(.Test(" " & xKontrol & " "), "x", "")
End With
End Function

2 - sorgu kodunu da aşağıdaki gibi düzenleyip dener misiniz?
UPDATE SIEMENS SET SIEMENS.statu = xRegExStr([SIEMENS]![GIRDI_FIRMA],[SIEMENS]![NMCRL_NCAGEName]);
bu kod ile içerik değişmişse artık değer içermiyorsa x kaldırılır
Cevapla
#14
hocam ellerinizden öperim,
çok yardımcı oldunuz
mevcut veriyi güncellemesine gerek yok zahmet etmeyin
visual basic kodlar hakkında çok bilgim yok
sizlerden öğrendiklerimle farklı soruguları geliştirebiliyorum
yardımlarınız için teşekkür ederim.
Cevapla
#15
rica ederim
iyi çalışmalar
yalnız kodları uç koşullarda da denemenizi öneririm
alanda noktalama işareti yada bileşik kelimeler varsa ayrıca kontrol etmeniz yerinde olur
sorun çözüldüyse konuyu cevaplanmışlara taşıyalım.
Cevapla
#16
(19/09/2024, 14:56)berduş yazdı: rica ederim
iyi çalışmalar
yalnız kodları uç koşullarda da denemenizi öneririm
alanda noktalama işareti yada bileşik kelimeler varsa ayrıca kontrol etmeniz yerinde olur
sorun çözüldüyse konuyu cevaplanmışlara taşıyalım.

sizi fazla uğraştırmayacak ise statu alanına x var ise değiştirme nasıl yapabiliriz öğrene bilirmiyim ?
sorun çözüldü bu arada.
Cevapla
#17
(19/09/2024, 15:10)sevincili yazdı: sizi fazla uğraştırmayacak ise statu alanına x var ise değiştirme nasıl yapabiliriz öğrene bilirmiyim ?
yalniz 13. mesajdaki kod alanda x varsa ama olmamasi gerekiyorsa değiştirir
Cevapla
#18
(19/09/2024, 15:14)berduş yazdı:
(19/09/2024, 15:10)sevincili yazdı: sizi fazla uğraştırmayacak ise statu alanına x var ise değiştirme nasıl yapabiliriz öğrene bilirmiyim ?
yalniz 13. mesajdaki kod alanda x varsa ama olmamasi gerekiyorsa değiştirir

hocam bu hali ile kalsın ben bir şekide halledebilirim.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da
Task