Recent content by dwayne dibley

It worked perfect. Thanks alot.

Thanks for ya help. private Sub Member_id_AfterUpdate() Dim LTotal As Long LTotal = DCount("Member_id", "tblloan", "[Member_id] = " & Me.Member_Id & " And [returned_date] is null ") MsgBox (LTotal) This is my current code. It is returning error message:- runtime error 3464 data...

What I need to do is count records based on 2 criteria(member_id and returned date is null). I have set the below code in the after update event on the member_id field and the result will show in a separte unbound text box. Private Sub Member_id_AfterUpdate() Dim LTotal As Long LTotal =...

Thanks, Ive already resolved it. I had a space in the member_id name field which I wasnt aware of. Sorry for wasting your time. Thanks again Chris

It came back:- UPDATE[tblmembers]SET [Tutor_id] = ‘30006’ WHERE [tblemembers].Members_id = ‘1234’; The variables are correct, as selected, and there is obviously a space missing before SET(But I cant change it without making a balls of the ' " '(refs to the txt/combo fields)) Thanks Again.

I still cant get it to work mate and it's probably just me being a total nugget. I''m just going to leave it as I have already spent a silly amount of time trying to get it to work. Unless ya know of another way of being able to update field in a table? Thanks for all of your help, its very...

It will now compile ok, but if I try to run the code it returns a request for paremeter [tbl_members.members_id]. I have checked the names and I cant see why it would request this value?? Private Sub Command7_Click() Dim strSQL As String Dim strtutor As String Dim strmemberid As String...

Na, still no luck mate. I have tried to change a few things in desparation, but with no luck. My code is now:- Private Sub cmbupdate_AfterUpdate() Dim strSQL As String Dim tutor As String Dim memberid As String strTutor = Me.cmbupdate.Column(1) strMemberid = Me.txtmemberid.Value...

Private Sub Command7_Click() DoCmd.RunSQL "UPDATE [Member_table] SET [Tutor_id]= '" & Me.txt_tutor.Value & "';" WHERE Member_table.Member_id ='"& me.member_id.value &"';" End Sub

Thank for that. I have tried what you recommended but I'm still getting error messages " expression: expected" and it highlights ' just before me.member.id. Any ideas??

All I am trying to do is allow the user to input a code into a an unbound text box, which will then be saved to a table field. After the user had retrieved the member's details via the memmber id. As far as I can tell it must be done via SQL and I am using VB to do this. Anyway here is my...

There ya go

Aye, just downloaded it but still not working.

Microsoft 2003 SP3. I think my friend is using access 2007(but I think he used it as a 2000 file or summit)