Recent content by brewpedals

Thanks for your help ajetrumpet! That was it. Have a great weekend!

It's Friday and I'm not seeing straight! Can you spot the reason I'm getting this error? I get the error on bold red line in the code. Thanks. Here's my code: Public Function GetCircuitExtInspDatesFromLines() 'Dim x As Integer 'Changed Circuit External Inspection date count. Dim db As Database...

I'm using a Access97 query to rename assets in another database based on a set or criteria. Unfortunately, this criteria creates some duplicates that will need to be corrected manually in the other database. So, I'd like to "mark" the subsequent duplicates by appending the asset name with the...

Ding Ding Ding Ding - We have a winner! That was it Wayne! Thanks. I'll account for those exceptions in my expression. Thanks for your help too Bob!

Thanks again Bob, But when I swapped them like this: CirNo: Left([tbl_IntExt].[ASSETID],InStr(5,"-",[tbl_IntExt].[ASSETID],2)-1) I get "#Error" in the datasheet view. I've also tried Null, 0,1 & 2 for the compare flag with no positive results. It's a pesky little problem. Rick.

Thanks for the quick reply Bob. My first string is the contents of [tbl_IntExt].[ASSETID] My second string is hard to see, it is a dash "-" The one (1) is to return text, 0 is default for binary. CirNo: Left([tbl_IntExt].[ASSETID],InStr(5,[tbl_IntExt].[ASSETID],"-",1)-1)

Hi, I'm attempting to create a foreign key field in a sub-query by using Left() and Instr() to parse the text of my key field and return the characters prior to the second "-". Example: 002-C100-4569 ---> 002-C100 When I build a second query with a relationship between the foreign key field...

Thanks checoturco, Yes, it returns "Run-time Error 3021: No current record." I believe that is because adding double quotes on the nbrSec variable interprets it as text, and it is a Long interger. I believe the problem is my usage of quotes around my strAPI variable. None of the following...

I could use some help. If you could review my code below I would appreciate it. It generates the following error: Run-time Error 3075: Syntax error (missing operator) in query expression '((([tbl_UnitList].[SectionCode]) = & nbrSec & ) And (([tbl_UT].[APICode]) = "));' Notice please that the...

That worked perfectly. Many thanks Paul.

Hi all, I have a sql statement I am using in a VBA sub that I intended to find the maximum value of the last three characters in a text field (JOB_NO) whose values are all in this format - "00L000". Example - "05J123" It works fine when the last three characters represent a 3 digit number like...

Can you please take a look at this code and tell me what I'm doing wrong? Objects on the form are not enabled on new records even if my criteria matches?? This code is on the click event of a "New Record" button that launches lauches a form, creates a new record and puts the userID into the...

That worked, Thanks again! I was faced with a datatype error that was solved by adding a "group by" to my query. sql = "SELECT Count(PC_PCRLog.PCR_No) AS CountOfPCR_No " & _ "FROM PC_PCRLog " & _ "GROUP BY PC_PCRLog.AFE_No " & _ "HAVING (PC_PCRLog.AFE_No)='" &...

Thanks Wayne, Partial success. I took your advise and removed the space from my table name and changed the query accordingly. My problem now is AFE_No is a text field that contains two periods "XX.XXXX.XXXXX" and I get a RunTime 3075 - an illegal use of "."'s Refresh my memory, how do I...

Me too, but don't tell anyone. It'll be our secret :D