Alandaki verileri nasıl değiştirebilirim.?

1 2
15/04/2009, 11:53

teo81a

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.
15/04/2009, 12:33

tdsharun

Örnek nerde? Sen örneğini göndereceksin ki yardım edebilelim, değil mi???
16/04/2009, 12:28

teo81a

Ö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]
16/04/2009, 13:37

ozanakkaya

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
16/04/2009, 13:47

teo81a

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
16/04/2009, 14:05

ozanakkaya

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)
1 2