AccessTr.neT

Form içinde, sorgudan veri alan liste kutusundaki 5 kolonluk verileri tıklama ile, formun alt formunu aktaran, yine alt forma formdan gelen 3 alanı ekleyerek, altformdaki 8 kolonluk verilerin bir tabloya yazılması konusunda sizlerin oluşturduğu örneklerden yararlanarak yaptığım form,

Run-time error '3061: çok az parametre, 1 bekleniyor hatası veriyor.

Nasıl çözebilirim?

gerial butonun kodunu aşağıdaki gibi düzenleyip dener misiniz

Dim Kmt As String

Kriter = ""

 For Each Secim In ListeAl.ItemsSelected

 Kriter = Kriter & "," & ListeAl.Column(0, Secim)

 Next Secim



If Len(Kriter) > 0 Then Kriter = " AND ((TSebil.ID) In ( " & Mid(Kriter, 2) & "))"

Kmt = "INSERT INTO TSebilGeriAl ( SeriNo, Marka, DIrsNo, DIrsTrh, StokYeri, Musteri, TEvrak ) " & _

      "SELECT TSebil.SeriNo, TSebil.Marka, TSebil.DIrsNo, TSebil.DIrsTrh, 'Depoda' , '' , '' " & _

      "FROM TSebil " & _

      "WHERE (((TSebil.StokYeri)='Müşteride') AND ((TSebil.Musteri)='" & Me.[MusteriAdı] & "'))" & Kriter & " ;"



CurrentDb.Execute Kmt

Teşekkürler.

volkan.gulbahar

berduş

volkan.gulbahar