Skip to main content

AccessTr.neT M.



Komut Satırında Tablo Ve Alanı Bulamıyor

Komut Satırında Tablo Ve Alanı Bulamıyor

Çözüldü #1
üstatlara ve tüm üyelere selamlar.
insert komutu ile eklenmiş satırlara ve alanlara ubdate komutu ile veri atmaya çalışıyordum.
biyerden sonra komutlar hata vermeye başladı.
Yardım ederseniz memnun olurum teşekkürler.

HATALI SATIR AŞAĞIDA KIRMIZI YAZININ ALTINDAKİ TÜM SATIRLAR

Private Sub Komut33_Click()
DoCmd.SetWarnings False
'AKTARMAKOMUTSATIRI
 DoCmd.RunSQL "UPDATE [Terfi_hsp] SET [E_K_drc] = E_K_drc1 where[TrfTrh]>= metin1 and [TrfTrh]<= metin2 and [Forms]![AnaFormEkranı]![sub]![id]=Terfi_hsp.kisi_id"
 DoCmd.RunSQL "UPDATE [Terfi_hsp] SET [E_K_gost] = E_K_gost1 where[TrfTrh]>= metin1 and [TrfTrh]<= metin2 and [Forms]![AnaFormEkranı]![sub]![id]=Terfi_hsp.kisi_id"
 DoCmd.RunSQL "UPDATE [Terfi_hsp] SET [E_K_ekgostP] = E_K_ekgostP1 where[TrfTrh]>= metin1 and [TrfTrh]<= metin2 and [Forms]![AnaFormEkranı]![sub]![id]=Terfi_hsp.kisi_id"
 DoCmd.RunSQL "UPDATE [Terfi_hsp] SET [E_K_ekgostO] = E_K_ekgostO1 where[TrfTrh]>= metin1 and [TrfTrh]<= metin2 and [Forms]![AnaFormEkranı]![sub]![id]=Terfi_hsp.kisi_id"
 DoCmd.RunSQL "UPDATE [Terfi_hsp] SET [E_E_drc] = E_K_drc1 where[TrfTrh]>= metin1 and [TrfTrh]<= metin2 and [Forms]![AnaFormEkranı]![sub]![id]=Terfi_hsp.kisi_id"
 DoCmd.RunSQL "UPDATE [Terfi_hsp] SET [E_E_gost] = E_K_gost1 where[TrfTrh]>= metin1 and [TrfTrh]<= metin2 and [Forms]![AnaFormEkranı]![sub]![id]=Terfi_hsp.kisi_id"
 DoCmd.RunSQL "UPDATE [Terfi_hsp] SET [E_E_ekgostP] = E_K_ekgostP1 where[TrfTrh]>= metin1 and [TrfTrh]<= metin2 and [Forms]![AnaFormEkranı]![sub]![id]=Terfi_hsp.kisi_id"
 DoCmd.RunSQL "UPDATE [Terfi_hsp] SET [E_E_ekgostO] = E_K_ekgostO1 where[TrfTrh]>= metin1 and [TrfTrh]<= metin2 and [Forms]![AnaFormEkranı]![sub]![id]=Terfi_hsp.kisi_id"
 DoCmd.RunSQL "UPDATE [Terfi_hsp] SET [E_kidem] = E_kidem1 where[TrfTrh]>= metin1 and [TrfTrh]<= metin2 and [Forms]![AnaFormEkranı]![sub]![id]=Terfi_hsp.kisi_id"
    DoCmd.RunSQL "UPDATE [Terfi_hsp] SET [Y_K_drc] = Y_K_drc1 where[TrfTrh]>= metin1 and [TrfTrh]<= metin2 and [Forms]![AnaFormEkranı]![sub]![id]=Terfi_hsp.kisi_id"
    DoCmd.RunSQL "UPDATE [Terfi_hsp] SET [Y_K_gost] = Y_K_gost1 where[TrfTrh]>= metin1 and [TrfTrh]<= metin2 and [Forms]![AnaFormEkranı]![sub]![id]=Terfi_hsp.kisi_id"
    DoCmd.RunSQL "UPDATE [Terfi_hsp] SET [Y_K_ekgostP] = Y_K_ekgostP1 where[TrfTrh]>= metin1 and [TrfTrh]<= metin2 and [Forms]![AnaFormEkranı]![sub]![id]=Terfi_hsp.kisi_id"
    DoCmd.RunSQL "UPDATE [Terfi_hsp] SET [Y_K_ekgostO] = Y_K_ekgostO1 where[TrfTrh]>= metin1 and [TrfTrh]<= metin2 and [Forms]![AnaFormEkranı]![sub]![id]=Terfi_hsp.kisi_id"
    DoCmd.RunSQL "UPDATE [Terfi_hsp] SET [Y_E_drc] = Y_K_drc1 where[TrfTrh]>= metin1 and [TrfTrh]<= metin2 and [Forms]![AnaFormEkranı]![sub]![id]=Terfi_hsp.kisi_id"
    DoCmd.RunSQL "UPDATE [Terfi_hsp] SET [Y_E_gost] = Y_K_gost1 where[TrfTrh]>= metin1 and [TrfTrh]<= metin2 and [Forms]![AnaFormEkranı]![sub]![id]=Terfi_hsp.kisi_id"
    DoCmd.RunSQL "UPDATE [Terfi_hsp] SET [Y_E_ekgostP] = Y_K_ekgostP1 where[TrfTrh]>= metin1 and [TrfTrh]<= metin2 and [Forms]![AnaFormEkranı]![sub]![id]=Terfi_hsp.kisi_id"
    DoCmd.RunSQL "UPDATE [Terfi_hsp] SET [Y_E_ekgostO] = Y_K_ekgostO1 where[TrfTrh]>= metin1 and [TrfTrh]<= metin2 and [Forms]![AnaFormEkranı]![sub]![id]=Terfi_hsp.kisi_id"
    DoCmd.RunSQL "UPDATE [Terfi_hsp] SET [Y_kidem] = Y_kidem1 where[TrfTrh]>= metin1 and [TrfTrh]<= metin2 and [Forms]![AnaFormEkranı]![sub]![id]=Terfi_hsp.kisi_id"

TAM BURADA YARDIM LAZIM
*******'HESAPLAMALIAKRATMAKOMUTSATIRI**(katsay isimli tablodan;aykat,yankat ve tabkat isimli alanlarıtanımadığındankomutuiptalettim

'DoCmd.RunSQL "UPDATE [Terfi_hsp] SET[EKgost_tut] = [E_K_gost] * [katsay]![aykat]  where[TrfTrh]>= metin1 and [TrfTrh]<= metin2 and [Forms]![AnaFormEkranı]![sub]![id]=Terfi_hsp.kisi_id"
'DoCmd.RunSQL "UPDATE [Terfi_hsp] SET[EKekgost_tut] = [E_K_ekgostO] * [katsay]![aykat]  where[TrfTrh]>= metin1 and [TrfTrh]<= metin2 and [Forms]![AnaFormEkranı]![sub]![id]=Terfi_hsp.kisi_id"
'DoCmd.RunSQL "UPDATE [Terfi_hsp] SET[Ekidemtut] = [E_kidem] * [katsay]![aykat]  * 20 where[TrfTrh]>= metin1 and [TrfTrh]<= metin2 and [Forms]![AnaFormEkranı]![sub]![id]=Terfi_hsp.kisi_id"
'DoCmd.RunSQL "UPDATE [Terfi_hsp] SET[EEgost_tut] = [E_E_gost] * [katsay]![aykat]  where[TrfTrh]>= metin1 and [TrfTrh]<= metin2 and [Forms]![AnaFormEkranı]![sub]![id]=Terfi_hsp.kisi_id"
'DoCmd.RunSQL "UPDATE [Terfi_hsp] SET[EEekgost_tut] = [E_E_ekgostO] * [katsay]![aykat]  where[TrfTrh]>= metin1 and [TrfTrh]<= metin2 and [Forms]![AnaFormEkranı]![sub]![id]=Terfi_hsp.kisi_id"
'DoCmd.RunSQL "UPDATE [Terfi_hsp] SET[YKgost_tut] = [Y_K_gost] * [katsay]![aykat]  where[TrfTrh]>= metin1 and [TrfTrh]<= metin2 and [Forms]![AnaFormEkranı]![sub]![id]=Terfi_hsp.kisi_id"
'DoCmd.RunSQL "UPDATE [Terfi_hsp] SET[YKekgost_tut] = [Y_K_ekgostO] *[katsay]![aykat]  where[TrfTrh]>= metin1 and [TrfTrh]<= metin2 and [Forms]![AnaFormEkranı]![sub]![id]=Terfi_hsp.kisi_id"
'DoCmd.RunSQL "UPDATE [Terfi_hsp] SET[Ykidemtut] = [Y_kidem] * [katsay]![aykat]  * 20 where[TrfTrh]>= metin1 and [TrfTrh]<= metin2 and [Forms]![AnaFormEkranı]![sub]![id]=Terfi_hsp.kisi_id"
'DoCmd.RunSQL "UPDATE [Terfi_hsp] SET[YEgost_tut] = [Y_E_gost] * [katsay]![aykat] where[TrfTrh]>= metin1 and [TrfTrh]<= metin2 and [Forms]![AnaFormEkranı]![sub]![id]=Terfi_hsp.kisi_id"
'DoCmd.RunSQL "UPDATE [Terfi_hsp] SET[YEekgost_tut] = [Y_E_ekgostO] * [katsay]![aykat]  where[TrfTrh]>= metin1 and [TrfTrh]<= metin2 and [Forms]![AnaFormEkranı]![sub]![id]=Terfi_hsp.kisi_id"
'DoCmd.RunSQL "UPDATE [Terfi_hsp] SET[gostfark] = [YKgost_tut] - [EKgost_tut] where[TrfTrh]>= metin1 and [TrfTrh]<= metin2 and [Forms]![AnaFormEkranı]![sub]![id]=Terfi_hsp.kisi_id"
'DoCmd.RunSQL "UPDATE [Terfi_hsp] SET[ekgostfark] = [YKekgost_tut] - [EKekgost_tut] where[TrfTrh]>= metin1 and [TrfTrh]<= metin2 and [Forms]![AnaFormEkranı]![sub]![id]=Terfi_hsp.kisi_id"
'DoCmd.RunSQL "UPDATE [Terfi_hsp] SET[kidemfark] = [Ykidemtut] - [Ekidemtut] where[TrfTrh]>= metin1 and [TrfTrh]<= metin2 and [Forms]![AnaFormEkranı]![sub]![id]=Terfi_hsp.kisi_id"
DoCmd.SetWarnings True
Me.Terfi_hsp_Alt_Form.Requery
End Sub

Cevapla
#2
ilk kısım için tek tek  yapmak yerine 

Kod:
DoCmd.RunSQL " UPDATE [Terfi_hsp] SET [E_K_drc] = E_K_drc1 ,[E_K_gost] = E_K_gost1 , [E_K_ekgostP] = E_K_ekgostP1 , [E_K_ekgostO] = E_K_ekgostO1 , [E_E_drc] = E_K_drc1 , [E_E_gost] = E_K_gost1 , [E_E_ekgostP] = E_K_ekgostP1 , [E_E_ekgostO] = E_K_ekgostO1 , [E_kidem] = E_kidem1 , [Y_K_drc] = Y_K_drc1 , [Y_K_gost] = Y_K_gost1 , [Y_K_ekgostP] = Y_K_ekgostP1 , [Y_K_ekgostO] = Y_K_ekgostO1 , [Y_E_drc] = Y_K_drc1 , [Y_E_gost] = Y_K_gost1 , [Y_E_ekgostP] = Y_K_ekgostP1 , [Y_E_ekgostO] = Y_K_ekgostO1 , [Y_kidem] = Y_kidem1 where [TrfTrh]>= metin1 and [TrfTrh]<= metin2 and [Forms]![AnaFormEkranı]![sub]![id]=Terfi_hsp.kisi_id "

 hatalı kısım için ise değerle farklı tablodan alındığı için o tabloyu tanımlamanız gerek 2 tablo arasında  ortak anahtar bir alan varsa

Kod:
UPDATE güncellenecektabloadı
INNER JOIN '
değerleralınacak tablo ON [güncellenecektabloadı].[ortakalan1] = [değerleralınacak ].[ortakalan1]
SET yeni değerler
WHERE kiriterler

şeklinde bir sorgu oluşturulabilir.
yada 

Kod:
UPDATE [Terfi_hsp]
SET [Terfi_hsp].[alan1]= (SELECT [katsay].[alan1] FROM [katsay].WHERE kriterler)
WHERE kriterler;

gibi...

Cevapla
...........
#3
üstadım:
UPDATE güncellenecektabloadı INNER JOIN 'değerleralınacak tablo ON [güncellenecektabloadı].[ortakalan1] = [değerleralınacak ].[ortakalan1] SET yeni değerler WHERE  kiriterler

DoCmd.RunSQL "Update [Terfi_hsp] INNER Join [katsay] ON [Terfi_hsp].[trftrh] = [katsay ].[gunayyil]SET [Terfi_hsp].[A]=[katsay].[aykat] where[TrfTrh]>= metin1 and [TrfTrh]<= metin2 and [Forms]![AnaFormEkranı]![sub]![id]=Terfi_hsp.kisi_id"
söz dizimi hatası verdi

Cevapla
#4
O sadece kaba taslak bir kalıp tablolarınızı yada formu görmeden çözüm üretmem zor.
Açıkçası  seviyem çözmeye yetmez çalışmanızı görmeden

Cevapla
...........
#5
proje yi ekledim

.rar BoşProje.rar (Dosya Boyutu: 197,63 KB | İndirme Sayısı: 2)
Cevapla
#6
sorun galiba 
(12/03/2019 18:28)fkilic76 Adlı Kullanıcıdan Alıntı: [katsay ].[gunayyil] SET 
buradaki "[katsay ]" alanında fazladan bir boşluktan kaynaklanmış, "[katsay]" yaparsanız sorun düzelebilir.
göndermiş olduğunuz dosyada da boşluğu silince hata vermedi.

aşağıdaki kodu dener misiniz?

Kod:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 DoCmd.RunSQL " UPDATE Terfi_hsp INNER JOIN katsay ON Terfi_hsp.TrfTrh = katsay.gunayyil SET " & _
              " [EKgost_tut] = [Terfi_hsp]![E_K_gost] * [katsay]![aykat]    ," & _
              " [EKekgost_tut] = [Terfi_hsp]![E_K_ekgostO] * [katsay]![aykat]  ," & _
              " [Ekidemtut] = [Terfi_hsp]![E_kidem] * [katsay]![aykat] * 20  ," & _
              " [EEgost_tut] = [Terfi_hsp]![E_E_gost] * [katsay]![aykat]    ," & _
              " [EEekgost_tut] = [Terfi_hsp]![E_E_ekgostO] * [katsay]![aykat]  ," & _
              " [YKgost_tut] = [Terfi_hsp]![Y_K_gost] * [katsay]![aykat]    ," & _
              " [YKekgost_tut] = [Terfi_hsp]![Y_K_ekgostO] *[katsay]![aykat]  ," & _
              " [Ykidemtut] = [Terfi_hsp]![Y_kidem] * [katsay]![aykat] * 20  ," & _
              " [YEgost_tut] = [Terfi_hsp]![Y_E_gost] * [katsay]![aykat]    ," & _
              " [YEekgost_tut] = [Terfi_hsp]![Y_E_ekgostO] * [katsay]![aykat]  ," & _
              " [gostfark] = [Terfi_hsp]![YKgost_tut] - [EKgost_tut]    ," & _
              " [ekgostfark] = [Terfi_hsp]![YKekgost_tut] - [EKekgost_tut]   ," & _
              " [KidemFark] = [Terfi_hsp]![Ykidemtut] - [Ekidemtut]" & _
              " where [TrfTrh]>= metin1 and [TrfTrh]<= metin2 and [Forms]![Terfiyap]![id]=Terfi_hsp.kisi_id "

Cevapla
...........

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

Yorum yapmak için üye olmanız gerekiyor

ya da