Reply to thread

Message: [QUOTE="KenQui, post: 186318, member: 75898"] What is wrong in my code below? How to fix the error? Private Sub AddAdmin() ' ADD PARAMETERS aAccess.AddParam("@admin_no", txtANo.Text) aAccess.AddParam("[USER=26928]@username[/USER]", txtAUsername.Text) aAccess.AddParam("@password", txtAPassword.Text) ' EXECUTE INSERT COMMAND aAccess.ExecQuery("INSERT INTO db_admin (Admin_No,Username,Password) " & _ "VALUES (@admin_no,@username,@password); ") ' REPORT & ABORT ON ERRORS If Not String.IsNullOrEmpty(aAccess.Exception) Then MsgBox(aAccess.Exception) : Exit Sub ' SUCCESS!! MsgBox("The book was added successfully") Me.RefreshGrid() End Sub [/QUOTE]