Recent content by kaveman

Thanks! I'll go to the manual and see what I can find on this topic.

Hi, I am trying to add a barcode to a report of mine that I can then scan in order to escape/close that report. The reason for this is my work station will not have a keyboard. The user will simply scan a work order number, this will bring up a report on screen with work order detail. Then...

Yeah, it was Friday night here too...you caught me working a little late. Thanks for the reminder to get out and have some fun.

I'm still missing something. The changes don't produce the error I was receiving but they also aren't updating the table. I have attached what I have so far. It is pretty basic...for the most part I have my form that runs the clock and calculates total time. I would like this total to then...

This is worker number 1. I am trying to update the total time spent on task for worker number 1. My table is set up like this: Worker_Code - this is the workers employee ID number Worker_Time - this is the total amount of time spent on task Each worker will clock in and then a timer will...

Hello, I'm having a similar issue. Are you able to show me where I have my quotes incorrectly placed? DoCmd.RunSQL "UPDATE [Timers] Set [Worker_Time] =" & Me.TotalTime01 & "WHERE [Timers].[Worker_Code] =" & 1 Thank you very much in advance.

I have come up with something but still need a little more help. I found a stopwatch template on the Microsoft website. I was able to use this to get my running clock and from there the rest was pretty simple. My trouble now is I would like to have two stopwatches on this form. I know it is...

Hello Friends, I am currently working on creating a form that will measure a workers production rate in pieces per hour. Here are my goals for this form: 1. the worker would clock in to begin work. they would clock in using a button on the form that would then begin totaling the amount of...

Hello, I have a button on a form that I am using to print multiple reports at one time, each report is used to summarize department invoices for a specified date range. Here is the code I am using to print the reports: Private Sub cmdFK_Click() On Error GoTo Err_cmdFK_Click Dim stDocName...

I have tried this with no luck. By using an underscore in my control source ([stop_code]&"_"&[locker_num]) I am able to get my data to output to the spreadsheet as 224_0005 which accomplished what I need to happen. For the time being I'll accept the underscore solution but I am still curious...

Here is the code: Private Sub Report_Activate() DoCmd.OutputTo acOutputReport, stDocName, acFormatXLS End Sub I am not doing the string formatting like you mentioned. I am doing this on the actual report where I have a field called txtIDLabel that I have set to control source to equal...

Thanks for the reply selevanm. The data type for the 224 0005 is the combination of two text fields that I have joined together on my report: txtIDLabel = [stop_code]&" "&[locker_num] When this hits the spreadsheet it is formatted as text. I tried changing this to general and number with the...

I'm using OutputTo to turn a report into and excel spreadsheet. Everything translates very nicely except for one of my fields. The field is called ID_Label, here is what is happening: on the report the data returned for this field looks something like this 224 0005 when it is sent into XLS...

Hi Everyone, I am trying to calculate a customers first week worth of revenue using the following on my report: txtRevFirst = DSum("[AMOUNT_DUE]", "[INVOICES]", "[CUSTOMER_CODE]=[txtCustCode] and [STATE]<>4 and [DATE_OF_INVOICE]<#txtFirstWeek#") txtFirstWeek is simply the date of the first...

Here is the entire query I was using the NZ function on the report but if the query is the better place to do this I'll take any pointers you have: SELECT DISTINCT (Select Count([Code]) FROM ACScust_sub1 WHERE TimeLeft>=365) AS NotLastYear, (Select Count([Code]) FROM ACScust_sub1 WHERE TimeLeft...