Recent content by mjake13

Thanks Duane. Modified it just a bit to suit, but it worked perfectly. =IIf(IsNull([SSN]),"","XXX-XX-" & Right([SSN],4))

I have a text box on a report that contains a social security number. I want to only display the last four digits and have the remainder show as some type of symbol. I can't get the formatting to work right. Any suggestions?

No, the report is not the issue. I don't know how to code the exit button to set (loop) all of the DestReport check boxes to true if the OutofInventory check box is true for all the records currently displayed by the query. This is done to prevent these items from showing up on future reports.

I have tried searching the forums, but either can't find what I need or I just don't understand the responses, so I'm asking for help. I just can't seem to get the right coding and I'm not real familiar with the whole recordset references I saw before. I have a continuous form based on a query...

Thanks Remou. This helped identify the record sources of all my forms and reports. Now I just need to figure out when and where some of these other queries are being called or used.

I inherited a database with 128 forms and 200 queries in the front end. Is there a way, besides going through each one manually, to check and see what queries are and are not used? I'd like to remove the excess junk if they're not needed.

I forgot to mention this is an Access DB. Thanks for the input though.

I inherited a database with 128 forms and 200 queries in the front end. Is there a way, besides going through each one manually, to check and see what queries are and are not used? I'd like to remove the excess junk if they're not needed.

The problem is that each of these textboxes could contain the information I want. I would like to set it up so that when I click the command button, it pulls the info from the page that has the focus into my popup. I can't seem to get the coding right.

Can't seem to get this right...so I turn to you guys and gals for help. I have a form with several tabbed pages on it. On each of the pages is a textbox that stores the location of a file. I have a command button on a popup form which I use to copy the location from the main form. I can copy...

I actually couldn't agree more with you Ace! But it was done at the customer request. He wanted his invoices to have a higher starting number. I guess he wanted to look a bit more professional. Thanks for the input.

Unfortunately, I'm aware of that issue with a multi-user environment. Fortunately, this is a single user database someone needs. Thanks for the headsup though.

Spoke to soon. Ran into a problem with possible duplicate numbers. I found a bit of help and now use this code. Private Sub btnInvoiceNo_Click() Dim vartemp As String Dim vartempa As String Me.InvoiceNo = NextNumber vartemp = Nz(DLookup("[InvoiceNo]", "Customers"...

I finally got it figured out. I put this code on the button to generate the new invoice number: Private Sub btnInvoiceNo_Click() Dim vartemp As String Me.InvoiceNo = NextNumber vartemp = Nz(DLookup("[InvoiceNo]", "Customers", "[InvoiceNo] =...

I am trying to generate an invoice number using the following code. It gets the number just fine, but I want to check the number generated against the table to make sure there are no duplicates, and if there is I want the number to increase by 1. Private Function NextNumber() As String Dim...