AccessTr.neT

Tam Versiyon: Alandaki verileri nasıl değiştirebilirim.?
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Sayfalar: 1 2
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.
Örnek nerde? Sen örneğini göndereceksin ki yardım edebilelim, değil mi???
Ö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]
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
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
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)
Sayfalar: 1 2