Giriş yapmadınız. Lütfen giriş yapın yada kayıt olun.
fox4um » Veritabanı, Tablo, View, Index ve SQL Syntax » update komutu
tablo1 tablo2
id ad id ad
1 a 1 ahmet
2 b 2 mehmet
3 c 3 ayşe
update tablo1 set tablo1.ad=tablo2.ad where tablo1.id=tablo2.id
amaç tablo2 deki ad alanın bilgilerini tablo1 aktarmak
scan endscan kullanmadan, yukarıdaki çalışmayan update komutu gibi bir satırlık kodla yapmak mümkün mü?
Vfp'da olurmu bilmiyorum, ama SQL ile şu komut çalışıyor:
UPDATE tablo1, tablo2 SET tablo1.ad = tablo2.ad WHERE tablo1.id = tablo2.id
Erdal yazdığın kod hemen hemen olmuş 
"FROM" clause ekliyceksin , Where koşulu yerine "JOIN" Tablo2 + "ON" kullanıcaksın
Update tablo1 ;
set tablo1.ad=tablo2.ad ;
From tablo1;
Join tablo2 ON tablo1.id=tablo2.id
Önemli Not :
Eğer Join bölümünde kullanacağın field CHAR ise = yerine == kullanmanı tavsiye ederim. Eğer SET EXACT değerin OFF ise "ABC" = "AB" ( .T. ) alırsın; eğer "ABC" == "AB"kullanırsan (.F.) TAM EŞİTLİK aranır. Özelikle Update From.. SQL tümcelerinde buna dikkat etmeni öneririm
Birde Join kısmında kullandığın field ların INDEX i komutun hızını çok etkiliyor. Optimizasyon için dikkat
update tablo1 set tablo1.ad= (select ad from tablo2 where id=tablo1.id)
Bence Ugur'un kodu guzel. Bir benzeri:
Update tablo1 ;
set tablo1.ad=tablo2.ad ;
From tablo2 ;
where tablo1.id=tablo2.id
fox versiyonunun 8 olduğunu yazmayı unuttum özür dilerim
9 da sorun yok fox 8 yapamıyorum
Replace ile yapabilirsin. Biraz karışık gibi ama alışınca çok daha kolay
Bendeki kodun aynını koyuyorum buraya : Index mutlaka gerekli.
SELECT 2
USE AMODEL
SELECT 1
USE U_Tp000
INDEX ON Modelno TO U_Tp000
SET ORDER TO TAG AMODEL OF AMODEL.cdx IN AMODEL
SET RELATION TO MODELNO INTO AMODEL ADDITIVE
REPLACE ALL Amodel.Miktar WITH U_Tp000.Miktar IN U_Tp000
VBFP9 oncesi ise klasik yontemi kullan:
select tablo2
scan
Update tablo1 ;
set tablo1.ad=tablo2.ad ;
where id=tablo2.id
endscan
Ya da VFP'ye ozel (tablo2'de "index on id tag idTag" ile index yaratildigini var sayarsak):
Update tablo1 ;
set ad = tablo2.ad ;
where seek( tablo1.id, 'tablo2', 'idTag')
Tablo2 indexli ise relation kurmadan aşağıdaki şekildede yapılabilir.
IIF in içindeki tablo1.ad yerine "" veya başka birşeyde konulabilir.
REPLACE ALL tablo1.ad WITH IIF( SEEK(tablo1.id, 'tablo2', 'idTag'), tablo2.ad, tablo1.ad) IN tablo1
fox4um » Veritabanı, Tablo, View, Index ve SQL Syntax » update komutu