Can't delete multiple records from Access Table

[Rankun]

Hope this is an easy one to fix. :) Basically I want to delete all records from the Account_Table that match the User_Name. There are dozens of records that match. I can delete one record using basically the same code if I match by ID. Any help is greatly appreciated. Thanks, Rankun

 

I.E.

 

ID (P-Key) User_Name Date * Action *

001 Jon Doe 09/17/2005 Should be deleted

023 Jon Doe 09/18/2005 Should be deleted

034 Jane Doe 09/17/2005 Should not be deleted

067 Jon Doe 09/23/2005 Should be deleted

 

Here is my code:

 

Private Function DeleteAccount()

 

Dim MyCommand As OleDbCommand

Dim MyConnection As OleDbConnection

Dim connectString As String = "Provider=Microsoft.Jet.OLEDB.4.0;" & Global.DataBaseLoc

 

MyConnection = New OleDbConnection(connectString)

 

 

'cant delete multiple entries from the table with this command

Dim comDelete As String = "DELETE FROM Account_Table WHERE User_Name = " & Global.LoggedUser

 

 

MyCommand = New OleDbCommand(comDelete, MyConnection)

MyCommand.Connection.Open()

MyCommand.ExecuteNonQuery()

MyCommand.Connection.Close()

 

End Function

[Nate Bross]

You may want to try this.

 

Dim comDelete As String = "DELETE * FROM Account_Table WHERE User_Name ='" & Global.LoggedUser & "';"

[Rankun]

Thanks Nate,

Worked like a charm!!! I actually tried it with a *, but left out the ' marks :(

Thanks again, Rankun

[Nate Bross]

SQL can be very nasty, be glad yours fits on a single line, and not several pages...:)

[PlausiblyDamp]

Thats why parameterised queries can be an enourmous help.