[AccessD] RecordSet question...

Darryl Collins Darryl.Collins at coles.com.au
Mon May 26 23:37:14 CDT 2008



Sorry for all the easy ones today (heh, at least I hope they are easy).

ok..

When I run the following code in the SQL query window I get 11 records returned - which is what I want and expect for the given input variables.

' ----- CODE START --------
iYEAR_VAR = iYEAR1
sSQL = ""
sSQL = "SELECT tbl_FY.FY_ID, tbl_FY_Period.FY_P "
sSQL = sSQL & "FROM tbl_FY INNER JOIN tbl_FY_Period ON tbl_FY.FY_ID = tbl_FY_Period.FY "
sSQL = sSQL & "WHERE (((tbl_FY.FY_ID)=" & iYEAR_VAR & "));"

Set rs1 = db.OpenRecordset(sSQL)

iRSCount = rs1.RecordCount
' ----- CODE END --------

However the rs1.RecordCount is returning 1, not 11, which doesn't seem correct to me(?).  Also what I want to do is this:

Find out how many records are in the RS (there should always be 12, except for FY08 where there is 11 - don't ask).
Loop Thru all the records and return the data in field "FYP" as a variable and then write the value to a label in a report.

The bit I am stuck on is looping thru the recordset.  or is there a better way altogether.  There are so many ways to make Access do stuff, sometimes I think I choose one that is a fashion of the day for me and flog it, not realising there is a much better/easier way.

regards
Darryl.
	

This email and any attachments may contain privileged and confidential information and are intended for the named addressee only. If you have received this e-mail in error, please notify the sender and delete this e-mail immediately. Any confidentiality, privilege or copyright is not waived or lost because this e-mail has been sent to you in error. It is your responsibility to check this e-mail and any attachments for viruses.  No warranty is made that this material is free from computer virus or any other defect or error.  Any loss/damage incurred by using this material is not the sender's responsibility.  The sender's entire liability will be limited to resupplying the material.




More information about the AccessD mailing list