Stok Rezerve Ve Satış

1 2 3 4 5
20/06/2020, 13:08

mehmetdemiral

Bu arada verilerin aktarımı için alternatif olarak ekleme sorgusu da kullanabilirsiniz. Sorgu tasarımında başka kaynaklardan veriyi eklemek ADO'dan daha kolay olabilir.
22/06/2020, 17:01

magmar

mehmet bey tam işin içinden çıkamadım ne yalan söyleyim. 

alttaki kodu kontrol eder misiniz? 

DoCmd.RunSQL "INSERT INTO tblStocksDetail(Article_ID) SELECT tblPurchaseDetail.Article FROM tblPurchaseDetail  WHERE tblPurchaseDetail.PurchDetail_ID=[Forms]![frmStockEnter]![frmStocksDetail]![PurcDetail_ID]"

burda yapmak istediğim, tblStocksDetail tablosunun Article_ID kısmına tblPurchasedetail tablosundan Article bilgisini al ama PurchDetail_ID ler eşit olsun. 

çok teşekkürler
23/06/2020, 10:23

magmar

merhaba 

alttakini de denedim ama yine sonuç alamadım. 

DoCmd.RunSQL "UPDATE tblStocksDetail SET Article_ID = (SELECT Article FROM tblPurchaseDetail WHERE (([tblStocksDetail].[PurcDetail_ID]) = [(tblPurchaseDetail)].[(PurchaseDetail]))"
23/06/2020, 16:12

magmar

merhaba

alttaki kod ile her satırda tek tek verileri getirebiliyorum. bunu tek seferde her satıra getirmenin bir yolu var mıdır? 

Me.txtArticle_ID = Dlookup ("Article", "tblPurchaseDetail", "PurcDetail_ID =" & [PurcDetail_ID])
23/06/2020, 20:50

magmar

Lütfen yardımcı olur musunuz?
24/06/2020, 10:07

magmar

tekrar merhaba

en son alttaki kodu kullandım. hata vermiyor ama sonuçları da getirmiyor
Private Sub btnArticle_Click()

CurrentDb.Execute "INSERT INTO tblStocksDetail (Article_ID) SELECT 'tblPurchaseDetail.Article' FROM tblPurchaseDetail WHERE((tblPurchaseDetail.PurchaseDetail_ID)=" & Me.txtPurcDetail_ID & ")"

Me.Requery

End Sub


kontrol eder misiniz?
1 2 3 4 5