I have a table called JB_Jobs, The key field is JB_JobBibNo a text field, it has the key symbol in front of it and in its index property is Yes (no duplicates).
Code to use seek:
Set db = CurrentDb()
Set JBrec = db.OpenRecordset("JB_Jobs", dbOpenTable)
If Not JBrec.BOF And Not JBrec.EOF then...
In an effort to make my code more usable, I shuffeled the order of the procedures in the code module. Now it looks as if code is not finding any of the code modules. I put 'stop' and toggled breakpoints in the formload procedure (formload is now the first procedure after variable declarations)...
I am trying to update data in a subform by modifying the query it is based upon. The query updates however the subform data displayed won't refresh until next time I open the form?
main form = [frmEnter Times]
subform control = TimebyDate
source = EmpTimebyDate a form
EmpTimebyDate record...
I have a form that displays JobTime records in a subform. In the subform I total HbE from the query.
How can I use '=iif(iserror(sum(HbE), 0, sum(HbE))' as the Control Source of the field in the form footer?
I have a subform that pulls employee time records. The subform record source is the time query.
The time query is:
SELECT J.JB_JobBidNo, J.JB_JoborBid, J.JBT_EmpNum, E.EM_FirstName, E.EM_LastName, Sum(J.JBT_WorkHrs) AS HbE, E.EM_Wage, (Sum(J.JBT_WorkHrs)*E.EM_Wage) AS Tot
FROM EM_Emp AS E INNER...
How can I fill a text box in a report with data from a secondary table.
This doesn't work:
Private Sub Report_Open(Cancel As Integer)
Dim selstr As String
Dim db As Database
Dim TRrec As Recordset
MsgBox "Load Tax Rate"
Set db = CurrentDb()
selstr = "Select DistinctRow...
I am using a query in a subform and want to us it in a subreport. table is multiple time sheets by date, subform and subreport show time accumulated by emplyee. So each time is hours summed per employee. In the report footer I want to sum all employees hours into one total. It works in the sub...
I have a time record table and an employee table joined by EMP_No field. I set up an inner join querry to fill a list box. Works fine till I want to restrict it by date value - it just ingores the where clause. I do not get any errors when run just all the records.
Select ET.fields, JBT.fields...
Had a form that was almost working. trying to enter data fields to make a new record in the table. Now any event after user enters data in a text box trigers
"The expression Before Update you entered as the event property setting produced the following error: User-definded type not defined"...
I am triing to find if a record exists in the table. Am using FindNext but keep getting "Run Time Error 3464 - Data Type Mismatch in criteria expression"
on the line
"JBrec.FindNext "JB_JobBidNo = " & strJobNo"
I load string strJobNo with EnterJobNo
"strJobNo = EnterJobNo"
also tried 'strJobNo...
When I edit an entry text box and decide the entry is not correct I blank the text box but am having trouble getting the cursor to be positioned there for the user to reenter data. I can't seem to find how to position cursor in any of my books, though I think I could once do this a couple of...
I use a query to restrict output list to one stock. I sort on date. But when I preview report the dates are not in order? I can also order by date in the report but it comes up with the same wrong order. Data does seem to group by year but the dates within the year ore not in order? Where or how...
I can't seem to find how to reset the tab order or focus back to the same text box after I detect entry in error. I am seting textbox value to null and then want the cursor to be set back to that text box after user clicks OK on the msgbox warning record not found.
I am sure I used to be able to...
Am trying to find a record in a ynaset table "EM_EmpNumber" where EMEmpNo is equal to The text box value 'EnterEmpNo'
I don't understand why these don't work? Got DoCmd from help function Access 97 and the rec.FindFirst from book 'Beging Access 97 VBA Programmong by Smith and Sussman.
Any...
I have a main form "frmJob Form"
it has a tabbed page with a subform "Labor Subform", on the tab page I have a field "LaborCostTot" that is the sum of the labor cost from the subform. I need this totalcost figure on the front tab and to enter it in the Job Table.
How do I copy this cost to the...
I have a subform based on a query of daily time entries by job number. I wish to display each employee’s time for the job selected. I can’t seem to get the employee times to list as one line per employee with the work hours summed and the wage totaled by the wage rate for that employee.
My...
I am trying to display the total hours by employee by job number.
I have a subreport based on a subquery - selected by job number, grouped by EmpNum.
Have one column 'HrsbyEmp:JBT_WorkHrs' Summed.
In a later column I want to display the total for each Emp_Num
coded...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.