AccessTr.neT
Alandaki verileri nasıl değiştirebilirim.? - 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ığı: Alandaki verileri nasıl değiştirebilirim.? (/konu-alandaki-verileri-nasil-degistirebilirim.html)

Sayfalar: 1 2


Alandaki verileri nasıl değiştirebilirim.? - teo81a - 15/04/2009

Merhaba arkadaşlar,

Benim sıkıntım şu;
ADSOYAD ve MESLEGI adında iki tane alanım var ve;

"MESLEGI" alanındaki veriler "ADSOYAD" alanına yazılmış. Şu şekilde

ALİ VELİ(NAKLİYECİ)

Parantez içinde yazılmış olan bilgileri nasıl silebilirim veya MESLEGI kutusuna nasıl aktarabilirim. Bununla ilgili bir kod veya formül varmı acaba?

Bana bu konuda yardımcı olabilirseniz çok ama çok sevinirim. Şimdiden herkese çok teşekkür ederim.


Cvp: Alandaki verileri nasıl değiştirebilirim.? - tdsharun - 15/04/2009

Örnek nerde? Sen örneğini göndereceksin ki yardım edebilelim, değil mi???


Cvp: Alandaki verileri nasıl değiştirebilirim.? - teo81a - 16/04/2009

Öncelikle ilginize çok teşekkür ediyorum. Örneği ekledim. Yardımcı olabilirseniz çok müteşekkir olacağım

[uyari]Forum Kuralları Madde 18[/uyari]


Cvp: Alandaki verileri nasıl değiştirebilirim.? - ozanakkaya - 16/04/2009

Forma buton ekle, tıklama olayına aşağıdaki kodu yaz.

Kod:
strSQL = "SELECT * FROM KEFIL "
Set rsyenile = New ADODB.Recordset
rsyenile.Open strSQL, CurrentProject.Connection, adOpenKeyset, adLockOptimistic
With rsyenile
.Find "[ORTAK_NO]=" & Me.ORTAK_NO
.Update
.Fields("MESLEGI") = Mid([ADSOYAD], InStr(1, [ADSOYAD], "(") + 1)
.Update
End With
Me.Mesleği.Requery




Cvp: Alandaki verileri nasıl değiştirebilirim.? - teo81a - 16/04/2009

Ustadım çok tşk ederim. Tamam bakıp deneyeceğim tekrar görüş bildiririm duruma göre. tekrar tekrar çok teşekkür ederim ilgi ve alakanıza.
Söylediğiniz gibi yaptım oldu ve parantez içinde yazılan veriyi meslek alanına ekledi fakat o parantez içinde yazılan (eski verileri) sildirme şansımız olamaz mı? parantezlerde dahil. sadece adı ve soyadı kalsın yani


Cvp: Alandaki verileri nasıl değiştirebilirim.? - ozanakkaya - 16/04/2009

verdiğim kodaki
Kod:
.Fields("MESLEGI") = Mid([ADSOYAD], InStr(1, [ADSOYAD], "(") + 1)
hemen altına aşağıdakini ekle,

Kod:
.Fields("ADSOYAD") = Left([ADSOYAD], InStr(1, [ADSOYAD], "(") - 1)