31/12/2022, 13:08
Hayırlı günler
Benim Accesste VERİLER diye tablom var
Sorgu1 adında sorgum var
Form1 ve formaltform diye 2 formum var sorum ise
formda açılan kutu ile fatura dönemlerini filtreleyip alt formda gösteriyorum.
Ancak ben aynı sipariş olanlarını SIRA_NU sütununda yan yana yazmasını istiyorum aşağıdaki gibi
SIRA_NU SİPARİŞ_NU MALZEME_ADI FATURA_DÖNEMİ
2022-1, 2022-3 SPRŞ-1 TORMAVİDA Ekim 2022
2022-5, 2022-8, 2022-9 SPRŞ-2 PENSE Ekim 2022
Bir modül oluşturdun ve
Benim Accesste VERİLER diye tablom var
Sorgu1 adında sorgum var
Form1 ve formaltform diye 2 formum var sorum ise
formda açılan kutu ile fatura dönemlerini filtreleyip alt formda gösteriyorum.
Ancak ben aynı sipariş olanlarını SIRA_NU sütununda yan yana yazmasını istiyorum aşağıdaki gibi
SIRA_NU SİPARİŞ_NU MALZEME_ADI FATURA_DÖNEMİ
2022-1, 2022-3 SPRŞ-1 TORMAVİDA Ekim 2022
2022-5, 2022-8, 2022-9 SPRŞ-2 PENSE Ekim 2022
Bir modül oluşturdun ve
xSQL = "select [SIRA_NU] from [Sorgu1] where SİPARİŞ_NU='" & xNU & "'"
Set rs = CurrentProject.Connection.Execute(xSQL)
'recordset.GetString(StringFormat, NumRows, ColumnDelimiter, RowDelimiter, NullExpr)
xGrup = rs.getstring(, , , ", ", "")
xKes = InStrRev(xGrup, ",") - 1
xGrup = Left(xGrup, xKes)
End Function
dediğimde Set rs = CurrentProject.Connection.Execute(xSQL) burada hata veriyor. Modülün kayıt kaynağını tablo yapınca birleştirme işi oluyor ancak Kayıt kaynağı sorgu olunca hata veriyor biraz uzun bir açıklama oldu ama kusura bakmayın. Hayırlı işler diliyorum.
Set rs = CurrentProject.Connection.Execute(xSQL)
'recordset.GetString(StringFormat, NumRows, ColumnDelimiter, RowDelimiter, NullExpr)
xGrup = rs.getstring(, , , ", ", "")
xKes = InStrRev(xGrup, ",") - 1
xGrup = Left(xGrup, xKes)
End Function
dediğimde Set rs = CurrentProject.Connection.Execute(xSQL) burada hata veriyor. Modülün kayıt kaynağını tablo yapınca birleştirme işi oluyor ancak Kayıt kaynağı sorgu olunca hata veriyor biraz uzun bir açıklama oldu ama kusura bakmayın. Hayırlı işler diliyorum.