Çalışma zamanı hatası '3346' Başlarken: Sorgu değerleri ve hedef alanların sayısı sütunları ayırmak için bir süre kullanarak orada toplanıyor aynı

Private Sub Command1_Click() 
    Dim strSQL As String 

    strSQL = "INSERT INTO PurchaseOrderDetails ([Supplier], [Item], [Quantity], [Cost/EA], [Total]) SELECT(" & "Me.OrderSelection_subform![Supplier]" & "." & "Me.OrderSelection_subform![Item]" & "." & "Me.OrderSelection_subform![Quantity]" & "." & "Me.OrderSelection_subform![Cost/EA]" & "." & "Me.OrderSelection_subform![Total]" & ");" 

    DoCmd.RunSQL (strSQL) 

End Sub

kaynak

2016-03-24 B.D.

ben var, ama kontrol ettikten olarak hatayı neyin yönlendirdiğini daraltmak için edemedik değerler ve hedef alanlar ve hepsi eşleşiyor gibi görünüyor. –

Hata ayıklayıcınızı kullanın. DoCmd.RunSQL satırında strSQL değerini kopyalayın ve sorun bulmanıza yardımcı olur. –

SELECT ifadesi değildir. Virgül kullanmayı deneyin.

Gönderen:

& "." & "Me.OrderSelection_subform![Item]" & "."

için:

& "," & "Me.OrderSelection_subform![Item]" & ","

Komple:

strSQL = "INSERT INTO PurchaseOrderDetails ([Supplier], [Item], [Quantity], [Cost/EA], [Total]) SELECT(" & "Me.OrderSelection_subform![Supplier]" & "," & "Me.OrderSelection_subform![Item]" & ", " & "Me.OrderSelection_subform![Quantity]" & "," & "Me.OrderSelection_subform![Cost/EA]" & "," & "Me.OrderSelection_subform![Total]" & ");"  
DoCmd.RunSQL (strSQL)

kaynak

2016-03-24 18:17:37

Önerilen süreleri virgül olarak değiştirdim ve ayrıca SELECT değerini VALUE olarak değiştirdim ve şimdi parametre değerleri girmemi istiyor. Alt formdaki değerleri nasıl seçerim? –

strSQL'in çalışma zamanında ne olduğunu gösterebilir misiniz? Ayrıca, hangi veritabanı platformunu kullandığınızı belirtmek de yardımcı olur. –

Çalışma zamanı hatası '3346' Başlarken: Sorgu değerleri ve hedef alanların sayısı sütunları ayırmak için bir süre kullanarak orada toplanıyor aynı

cevap

İlgili konular