Private Sub subBuildcredits ()
Dim db As DAO.Database
Dim rs1 As DAO.Recordset
Dim rs2 As DAO.Recordset
Dim rs3 As DAO.Recordset
Dim rs4 As DAO.Recordset
Dim intClock As Integer
Dim Sql4 As String
Sql4 = "DELETE tblPerfectAtten d4.* FROM tblPerfectAtten d4;" ' Clear credit data filedata file
DoCmd.RunSQL Sql4 ' clear tblPerfectAtten d4 before
Set db = CurrentDb...
JH001A
Last Activity: Apr 4 '08, 09:36 PM
Joined: Oct 16 '06
Location: Illinois
-
-
mmccarthy,
Thanks for the help, I got it working.
jh001aLeave a comment:
-
OK, Thanks for your help..Leave a comment:
-
The report is a list of employees four columns wide on 8.5 by 11 report, each column is 1.5 wide. Employees are listed in seq by name down the column then across. I use a label report to obtain this. Because the label for is only 1.5 wide I need to put another report 8.5 inches wide ahead of the label report. I want the two to come out as one report.
Hope this helps.
Thank you for your reply.Leave a comment:
-
aaaaaaaaaaaaaaLeave a comment:
-
Add header to report using labels for detail of report
I have a report of selected employees printed using a label report four columns wide. The label report width is 1.5 inches. How can I merge a report header ahead of the labels?
Thank you for any suggestions.
JH001A -
I got it, but thanks for looking.
JH001ALeave a comment:
-
runtime error 3061 - too few parmeters, expected 1
ACCESS 2003 VBA in the code below set.rs3, gets the error when I try using a parm for input to the where clause. If I use a number like the one comented out it works.
Thanks for your help.
Private Sub subBuildcredits ()
Dim db As DAO.Database
Dim rs1 As DAO.Recordset
Dim rs2 As DAO.Recordset
Dim rs3 As DAO.Recordset
Dim rs4 As DAO.Recordset
Dim intClock As Integer
... -
^^^^^^^^^^^^^^^ ^^^^^^^^^^^^^^^ ^
Thanks for the reply.
^^^^^^^^^^^^^^^ ^^^^^^^^^^^^^^^ ^...Leave a comment:
-
That one got it... Many many thanks for yout help. Guess the datepart function dosen't like DSum......Leave a comment:
-
Still has "#Error" What is [/QUOTE]?...Leave a comment:
-
Still has "#Error"...Leave a comment:
-
Now it dispalys "#Error"...Leave a comment:
-
Get YTD totals on a form selecting from a table not in the form
I have a form with a text box for YTD totals on an employee which is selected from a combo box, the YTD total displays #name? when I run the form. The control source is "=(SELECT Sum(tblPosting. Occurance) FROM tblPosting WHERE (((DatePart("yy yy",[tblPosting].[strdate]))=DatePart("yy yy",[me].[cbodate])))
GROUP BY tblPosting.MstC lock
HAVING (((tblPosting.M stClock)=[me].[empid]));)".
If I put this... -
Retrieve User ID
How can I retrieve the user id of the user signed on in access. I would like to use this to mark records added or changed by user. -
move a text field to an array - search one element at a time
I need to search a text field for dates and move them to date fields. I am sure I have done this in the past using arrays but can't remember how I did it. here is a sample text fields.
"perfect attendance 2nd qtr, remove 1 occurrence (08/09/05 & 1/2 of 10/14/05)"
"Perfect Attendance 1st Qtr, remove 1 occurrence (09/12/05)"
Thanks to anyone woh can help.
JH001A.
No activity results to display
Leave a comment: