Delete Command Probelm

[lothos12345]

I have created a program in VB.NET that looks into a Microsoft Access Database table and can delete a record based on what the user inputs into a textbox. An example of my code is below:

 

OleDbDataAdapter1.DeleteCommand.CommandText = "DELETE * FROM Daily WHERE Mainid =" & intmain

 

intmain contains a numeric value which is the primary key in the database the primary key is an Autonumber. Intmain gets its number value from a textbox on the program. The problem lies in the fact that when a user enters a number that is a record in the database it says the record does not exist when it obviously does. Any help would be greatly apprieciated.

[loyal]

try to include single qutation

 

something like this

OleDbDataAdapter1.DeleteCommand.CommandText = "DELETE *

FROM Daily WHERE Mainid =' " & intmain & " ' "

 

 

I hope it works

[Volte]

That wouldn't work, assuming Mainid is a number. Single quotes are for strings.

 

I suggest putting the following line about the conflicting line:

System.Diagnostics.Debug.WriteLine "DELETE * FROM Daily WHERE Mainid = " & intmain

And see what it prints in the debug window.

[Robby]

Why not just issue an ExecuteNonQuery command?

 

The problem with OleDbDataAdapter1.DeleteCommand.CommandText = "Delete..." is that at the time of assigning this command the variable intmain may not have the expected value.

 

Folow Volte's example but do so at the same place that you assign the DeleteCommand.