Search results

The subform Table also includes the Forms Index no. I have used that and it opens up the first instance of a match. When there there is more than one match I want itto open the others as well. The only way I can think of doing this is to retrieve all the Index nos that relate and put them in a...

So can it refer to a field in the subform's source, as I need it too?

I have a Form/Subform design which shows Returns (Form) and Goods Returned (subform) information. They are based on 2 tables, 'Return records' and 'Goods'. When completed it is possible on the subform, if the information has been provided, to associate the goods with their original assembly...

Thanks Paul

Can someone please guide on this? I have the following line StrProd = Me.certgas_product I want to rewrite this using a String variable, StrTbl inplace of the 'certgas_' StrProd = "Me." & StrTbl & "product" just assigns StrProd to that string, not the underlying value. Thanks

If the existing tables had an extra indexed column, 'DateStamp' added. A date stamping function written and used by all the front ends that can mod the tables. Then a query would find all the records that have changed since the last time. Is that not practical or have I missed the point?? cheers

dave. I came across this in Msofts knowledge base, I guess I must have used it when I originally wrote the code. Specifying Numeric Criteria That Comes from a Field on a Form: If you do not want to specify a particular value in the expression (as in the previous example), use a parameter in...

I think we are saying the same thing. The 'slow pipe' is adding an undesirable overhead to the processing time. My poor choice of words, 'broken rules', not normal practice would be better. I have ben told many times backends are for Tables, though this seems to be an exception. Having re-read...

It shouldn't be. It inherited it when I deleted out some remarks before posting.

For some reason my post does not show up on the summary page! Some kind of intelligence filtering ??? !!!!

Attacment on this post

I see what you mean. My only excuse is I wrote this code a long time ago when I knew less than I do now! However it has been working and still does ?? Please see attachment.

This is a form/subform being opened. 'records' is a variable that will appear in one of the controls on the Form to show how many subform records there are. 'number' is the number of subform records of a certain type 'number1' is the number of subform records of another type. The types are...

I might be a bit out of my depth here but...... The problem as you describe it is down to the volume of data traffic down a slow pipe. Although it seems to break rules running the routine at the Server must be the answer, then the data communicated is minimise and the chance for corruption...

The full code for the form On Current event is: Private Sub Form_Current() On Error GoTo Err_Current Dim records As Integer Dim fieldname As String Dim test As String Dim number1 As Integer Dim number As Integer number = 0 number1 = 0 records = (DCount("[goods_no]", "Goods"...

I have the following in the Current Event of a form to determine some details on the form but it seem to slow down the form so much that there is a noticable delay in moving from one to the next. records = (DCount("[goods_no]", "Goods", "[goods_returnno]=Form.[return_no]")) Me.NoOfItems =...

Dave, thanks for your suggestions. The current code has no errors with the Seek line. It only errors when I change to FindFirst. However I prefer a solution based on Seek as it will be faster as you say. I will now build on that. Thanks again Peter

Magic ! Thanks David Peter

Thanks for the Nz suggestion but it still error, 'Invalid use of Null' [condensing_serialno] is a String Yup a typo, I was trying so highlight the Dlookup line in red for the post. D'oh !

Thanks both. I agree with you Paul however my code is still not trapping and I am getting an 'Invalid use of Null' error from the Dlookup line when there is an empty field being requested. Private Sub BtnRetRec_Click() On Error GoTo Err_BtnRetRec_Click Dim stDocName As String Dim...