Search results

Hello everyone, I have a database that populates rooms with occupants for classes or meetings. I have two listboxes, one has the potential occupants and the other the list of already assigned occupants to the room. So far so good. Then I have a button that will move any one selection on the...

Hello Everyone, Mike: Thanks for the suggestion. I did double check and it was pointing to it. i even added a MsgBox to make sure it was working and it was, but any suggestion is appreciated. Pbaldy: I tried your suggestion (Today 08:05 AM) and it worked. I had too much junk in my code...

Hello Everyone, Thank you for responding. Sorry it took so long to respond. i posted yesterday before I went home for the day and I just got in today. Pbaldy: Pub is a string. Basically is the abreviated code for that particular record. ajetrumpet: Thanks, I'll try that and see what...

Hello Everyone, I have the following code that I think is good, but does not seem to work: Dim db As Database Set db = CurrentDb db.Execute ("UPDATE PubStatus SET [PubCode]='" & PUB & "' WHERE [PubStatusID]=" & 1 & ";") db.Execute ("UPDATE PubStatus SET [PubCode]='" & AUX & "' WHERE...

Here's the code that worked for me for if someone is looking at a later date: Dim varItem As Variant Dim count As Integer Dim found As Boolean Dim rsCM As Object For Each varItem In Me.lstAfuera.ItemsSelected count = count + 1 Next varItem If...

Hello Tony, Thanks for responding. I did do what you suggested. I found different code that worked fine. I digged into a project that I had done about a year ago and it had code that worked for me. Thanks for your response.

Hello Everyone, I'm working with this code (same as earlier post), bur different error: Dim rst As DAO.Recordset Dim db As DAO.Database Dim ctl As Control Dim varItem As Variant 'On Error GoTo Err_btnAceptar Set db = CurrentDb()...

Tony Thanks! Yes that fixed the issue! Now it gives me a different error: "3265 item not found on this Collection" Off to figure that one now! Thanks for your help!

Hi Tony and Bob, you mean I need to insert this line earlier on the code?: Set ctl = Me.lstAfuera I'll comment out the error handler...and try. Thanks!

What I would do is the following: Just to confirm the textboxes are "unbound" correct? If they are, then in the textbox enter the following code: =[ListBoxName].[Column](#) Make sure to replace the # with the Column Number in the List Box that has the data you want.

Hello Everyone, I'm having an issue with this code: Dim rst As DAO.Recordset Dim db As DAO.Database Dim ctl As Control Dim varItem As Variant On Error GoTo Err_btnAceptar Set db = CurrentDb() Set rst =...

This is my view: I believe in God. I do think that there is a Supreme Being that has created us. I have not been convinced otherwise. Some see a BIRD and claim that it's the result of evolution and not of creation...But if you tried to convince that same person that an airplane was the...

I see that 5 people have downloaded the database. Any suggestions or recommendations? All comments are appreaciated. Thanks! René

I just realized that you will have to relink the tables to the back end. I think this happend when I reset all password to password. So if you re-link all tables you should be good to go.

Hello All, I'm currently working on a database for a friend. The database is for a Club Membership. It's not complete yet, but this is what I have so far. I had to remove the graphics to comply with the upload size. I was wondering if anyone would like to take a look at it and let me know...

Hello pbaldy, I like your recomendation, (about balance on th fly). It would be the best way I think. The thing is that the math is done in a different table than the main form that has the Customer information (which is the one that populates the main form), where the employee would read...

Maybe I'm going all wrong about it. What I'm trying to do with this command (rsCM2!MemberID = InvoiceList.Column(0, varitem)) is to "find" that record and then change the field on this: rsCM2!DuesBal=rsCM!NewBal. Thats what I pretend to do. Am I doing it wrong? I thought I would explain a...

Thanks for that tip about commenting out the error code. OK this is where it stops: rsCM2!MemberID = InvoiceList.Column(0, varitem) rsCM2!MemberID is AutoNumber and InvoiceList.Column(0, varitem) is Number. So I think that's where it fails to go on. How can I resolve that? Is there a...

Hello Pbaldy, Thanks for bringing up the above discussed code. I have corrected the code to reflect this. It got me even further! Now it actually posted (partially) what I needed into a new record in the right table. But it still gives me an error. The error is : 3421 Data type...

OK, I decided to take another shot at it. here's the code: It gives me the following error: "3164 Field cannot be updated." Any thoughts??