20/06/2020, 13:08
Stok Rezerve Ve Satış
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
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]))"
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])
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?
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?