AccessTr.neT

Tam Versiyon: Run-time Error '3061: Çok Az Parametre, 1 Bekleniyor Hatası.
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
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.