Fill a text box with the result of Form.RecordSource

[abolos]

Hi,

I have an unbounded form with an unbounded text box. In the event On Open I have this code: Form.RecordSour ce"select last(kmprice) from tblmilageprice" .

The question is: How can I fill the text box with the result of thid code?

Thanks,
Abolos

[MMcCarthy]

Hi Abolos,

I would put it in the Form Load rather than the Form Open event.

Private Sub Form_Load()

   Me.RecordSource = "SELECT last(kmprice) As LastKmPrice FROM tblmilageprice"
   Me.TextboxName.ControlSource = LastKmPrice

End Sub

Mary

[pks00]

Agree with Mary in that u should use form_load
becuase its unbounded, you may have to read the value or just use DMAX
eg

private sub Form_load()
	Dim rs as dao.recordset
 
	Me.RecordSource = "select last(kmprice) from tblmilageprice"
 
'Option 1
	set rs=me.recordsetclone
	if rs.eof = false then Me.unboundedBox = rs.Fields(0).Value
	rs.close
	set rs=nothing
 
'Option 2
	Me.unboundedBox = DMAX("kmprice","tblmilageprice")
end sub

Im not sure u can use controlsource on a unbounded box

[abolos]

Thanks Mary and pks00 for your reply. Actually the solution that Mary gave didn't work. But the one that pks00 worked. Both options went fine.


Can you please, pks00, explain what is the DMAX used for?

Thanks for both.
Abolos

[pks00]

DMAX is used to determine the maximum value of the specified field in the specified table. Third parameter is optional, u can specify some criteria.

Its just a quick way of getting max value. In access, if u hiliite DMAX then do F1, u will get more info

i.e. taken from help page

You can use the DMin and DMax functions to determine the minimum and maximum values in a specified set of records (a domain). Use the DMin and DMax functions in Visual Basic, a macro, a query expression, or a calculated control.
For example, you could use the DMin and DMax functions in calculated controls on a report to display the smallest and largest order amounts for a particular customer. Or you could use the DMin function in a query expression to display all orders with a discount greater than the minimum possible discount.
DMin(expr, domain, [criteria])
DMax(expr, domain, [criteria])
The DMin and DMax functions have the following arguments.
Argument Description
expr An expression that identifies the field for which you want to find the minimum or maximum value. It can be a string expression identifying a field in a table or query, or it can be an expression that performs a calculation on data in that field. In expr, you can include the name of a field in a table, a control on a form, a constant, or a function. If expr includes a function, it can be either built-in or user-defined, but not another domain aggregate or SQL aggregate function.
domain A string expression identifying the set of records that constitutes the domain. It can be a table name or a query name for a query that does not require a parameter.
criteria An optional string expression used to restrict the range of data on which the DMin or DMax function is performed. For example, criteria is often equivalent to the WHERE clause in an SQL expression, without the word WHERE. If criteria is omitted, the DMin and DMax functions evaluate expr against the entire domain. Any field that is included in criteria must also be a field in domain, otherwise the DMin and DMax functions returns a Null.

Remarks
The DMin and DMax functions return the minimum and maximum values that satisfy criteria. If expr identifies numeric data, the DMin and DMax functions return numeric values. If expr identifies string data, they return the string that is first or last alphabetically.
The DMin and DMax functions ignore Null values in the field referenced by expr. However, if no record satisfies criteria or if domain contains no records, the DMin and DMax functions return a Null.
Whether you use the DMin or DMax function in a macro, module, query expression, or calculated control, you must construct the criteria argument carefully to ensure that it will be evaluated correctly.
You can use the DMin and DMax function to specify criteria in the Criteria row of a query, in a calculated field expression in a query, or in the Update To row of an update query.
Note You can use the DMin and DMax functions or the Min and Max functions in a calculated field expression of a totals query. If you use the DMin or DMax function, values are evaluated before the data is grouped. If you use the Min or Max function, the data is grouped before values in the field expression are evaluated.
Use the DMin or DMax function in a calculated control when you need to specify criteria to restrict the range of data on which the function is performed. For example, to display the maximum freight charged for an order shipped to California, set the ControlSource property of a text box to the following expression:
=DMax("[Freight]", "Orders", "[ShipRegion] = 'CA'")

If you simply want to find the minimum or maximum value of all records in domain, use the Min or Max function.
You can use the DMin or DMax function in a module or macro or in a calculated control on a form if the field that you need to display is not in the record source on which your form is based.

Tip
Although you can use the DMin or DMax function to find the minimum or maximum value from a field in a foreign table, it may be more efficient to create a query that contains the fields that you need from both tables and base your form or report on that query.
Note Unsaved changes to records in domain aren't included when you use these functions. If you want the DMax or DMin function to be based on the changed values, you must first save the changes by clicking Save Record on the Records menu, moving the focus to another record, or by using the Update method.

[abolos]

Thank for your explanation pks00,

For me in my situation this will work because in tblmilageprice table i will have one and only one record. But in general this may not be useful for a table with many records.

Anyway, it is fine in my way and thanks again,
Abolos