SQL語法錯誤，找不到

-3

我正在爲一個學校項目製作一個應用程序。不斷當我嘗試執行存儲過程時，我收到一條錯誤消息，提示語法無效。SQL語法錯誤，找不到

這是從VBA我的代碼和存儲proceduer

CREATE PROCEDURE spVeranderPrijs 
(
@ArtikelNr integer, 
@WijzigingsDatum Date, 
@NieuwePrijs integer 
) 
AS 
BEGIN Transaction 

Select * from artikelprijs 
where artikelnr = @ArtikelNr 
and einddatum = '2099-01-01' 

    if @@ERROR <> 0 

    update ArtikelPrijs set einddatum = @Wijzigingsdatum 

    INSERT INTO Artikelprijs 
    VALUES (@ArtikelNr, @NieuwePrijs, @WijzigingsDatum, '2099-01-01'); 

    BEGIN 

    ROLLBACK 
    RAISERROR ('Error tijdens het uitvoeren', 16 , 1) 
    RETURN 
    END 
Commit 

GO

而且我在VBA

Private Sub Command6_Click() 

Dim conn As ADODB.Connection 
Dim rs As ADODB.Recordset 
Dim sConnString As String 
sConnString = "Provider=SQLOLEDB;Data Source=.\SQLEXPRESS;" & _ 
    "Initial Catalog=KlantArtikelApp;" & _ 
    "Integrated Security=SSPI;" 

Set conn = New ADODB.Connection 
Set rs = New ADODB.Recordset 

conn.Open sConnString 
Set rs = conn.Execute("EXEC spVeranderprijs '" & TxTArtikelNr & "', '" & TxTWijzigingsDatum & "' '" & TxTPrijs & "'") 


End Sub

代碼，我似乎無法得到它的工作，任何人都可以幫忙嗎？

來源

2016-09-30 Martijn Dekkers

顯示完整的錯誤訊息 – Jens

'35'（這是我輸入到TxTPrijs的輸入）附近的語法不正確 –

[如何在VBA中調試動態SQL]（http://stackoverflow.com/questions/418960/managing- and-debugging-sql-queries-in-ms-access/1099570＃1099570）。一個簡單的'Debug.Print <你想運行的EXEC字符串>'會顯示你的錯誤。 – Andre

CREATE PROCEDURE spVeranderPrijs 
(
DECLARE @ArtikelNr integer, 
@WijzigingsDatum Date, 
@NieuwePrijs integer 
) 
AS 
BEGIN Transaction 

Select * from artikelprijs 
where artikelnr = @ArtikelNr 
and einddatum = '2099-01-01' 

    if @@ERROR <> 0 

    update ArtikelPrijs set einddatum = @Wijzigingsdatum 

    INSERT INTO Artikelprijs 
    VALUES (@ArtikelNr, @NieuwePrijs, @WijzigingsDatum, '2099-01-01'); 

    BEGIN 

    ROLLBACK 
    RAISERROR ('Error tijdens het uitvoeren', 16 , 1) 
    RETURN 
    END 
Commit 

GO

我剛添加了聲明語句。也許這就是爲什麼你得到一個無效的錯誤消息

來源

2016-09-30 10:29:36 mfredy

在這一行：

conn.Execute("EXEC spVeranderprijs '" & TxTArtikelNr & "', '" & TxTWijzigingsDatum & "' '" & TxTPrijs & "'")

你逝去的TxTArtikelNr和TxTPrijs單引號內。你的存儲過程需要對這些參數的integer，所以從線失去了單引號，並通過像這樣（我還添加了您的最後兩個參數之間缺少逗號）：

conn.Execute("EXEC spVeranderprijs " & TxTArtikelNr & ", '" & TxTWijzigingsDatum & "', " & TxTPrijs)

來源

2016-09-30 10:36:32 Dave

你的存儲過程需要3個參數。所以你在TxTWijzigingsDatum後缺少一個逗號。

Set rs = conn.Execute("EXEC spVeranderprijs " & TxTArtikelNr & ", '" & TxTWijzigingsDatum & "' ," & TxTPrijs)

沒有必要引用整數值。只有日期或字符串。

這種類型的編碼應該避免。如果您使用此代碼插入包含單引號（'）的字符串，它們將打破您的查詢。您必須轉義它們或更好地使用參數化查詢。

來源

2016-09-30 10:37:18 Anonymous

SQL語法錯誤，找不到

回答

相關問題