Find and Delete specific record

[gobyg]

Hello,

Table Name: Admin
Field Name: userid, admin (Y/N), Password, ConPw, PasswordReset (Y/n), Createdby

Trying to run a vba to find and delete records that was "createdby" the current user. Enviorn("username")

Any help please

 

[CJ_London]

try

currentdb.execute("DELETE * FROM ADMIN WHERE CreatedBy='" & Environ("UserName") & "'")

 

[JANR]

Warning deleting records are FINAL!!

Just execute a delete query with a Where-Clause that specify which records are to be deleted.

CurrentDb.Execute "Delete From Admin Where Createdby = '" & Environ("username") & "'", dbFailOnError

JR