What am I doing wrong: Update Record

[Yafuhenk]

Hi

Can anyone tell me why this code gives the error shown below?

Dim SQLString As String
   SQLString = "UPDATE Figures SET Forecast = 1000 WHERE rowid = 20"
   Cursor2 = SQL1.ExecQuery(SQLString)
   SQLString = "SELECT Forecast FROM Figures WHERE rowid = 20"
   Cursor3 = SQL1.ExecNonQuery(SQLString)
   Cursor3.Position = 0
   Log(Cursor3.GetDouble2(0))

Compiling code. Error
Error compiling program.
Error description: Cannot assign void value.
Occurred on line: 58
Cursor3 = SQL1.ExecNonQuery(SQLString)
Word: )

Henk

 

[Harris]

I do not see in your code:
Dim Cursor2, Cursor3 as Cursor

 

[klaus]

SqlString = "SELECT Forecast FROM Figures WHERE rowid = 20"
Cursor3 = SQL1.ExecNonQuery(SqlString)

must be:

SqlString = "SELECT Forecast FROM Figures WHERE rowid = 20"
Cursor3 = SQL1.ExecQuery(SqlString)

Best regards.

 

[Ricky D]

also the UPDATE statement is a NonQuery

INSERT, UPDATE & DELETE are NonQueries

SELECT is a Query

    SQLString = "UPDATE Figures SET Forecast = 1000 WHERE rowid = 20"    
    Cursor2 = SQL1.ExecQuery(SQLString)

should be

    SQLString = "UPDATE Figures SET Forecast = 1000 WHERE rowid = 20"    
    SQL1.ExecNonQuery(SQLString)

 

[Yafuhenk]

Thanks for the replies

Shame on me:signOops:
Mixing up ExecNonQuery and ExecQuery!
I changed it but still get the same error.
Please see the printscreen.

Henk

 

[klaus]

You should read Ricky Ds' post more carafuly, he posted be:

SQL1.ExecNonQuery(SQLString)

and not

Cursor2 = SQL1.ExecNonQuery(SQLString)

Best regards.

 

[Yafuhenk]

Yes that did it!
Thank you all

I am almost 50 years old now and still I go to fast sometimes

Henk