473,327 Members | 2,012 Online
Bytes | Software Development & Data Engineering Community
Post Job

Home Posts Topics Members FAQ

Join Bytes to post your question to a community of 473,327 software developers and data experts.

Fill a text box with the result of Form.RecordSource

65
Hi,

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

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

Thanks,
Abolos
Apr 27 '07 #1
5 7613
MMcCarthy
14,534 Expert Mod 8TB
Hi Abolos,

I would put it in the Form Load rather than the Form Open event.
Expand|Select|Wrap|Line Numbers
  1. Private Sub Form_Load()
  2.  
  3.    Me.RecordSource = "SELECT last(kmprice) As LastKmPrice FROM tblmilageprice"
  4.    Me.TextboxName.ControlSource = LastKmPrice
  5.  
  6. End Sub
  7.  
Mary
Apr 27 '07 #2
pks00
280 Expert 100+
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

Expand|Select|Wrap|Line Numbers
  1. private sub Form_load()
  2.     Dim rs as dao.recordset
  3.  
  4.     Me.RecordSource = "select last(kmprice) from tblmilageprice"
  5.  
  6. 'Option 1
  7.     set rs=me.recordsetclone
  8.     if rs.eof = false then Me.unboundedBox = rs.Fields(0).Value
  9.     rs.close
  10.     set rs=nothing
  11.  
  12. 'Option 2
  13.     Me.unboundedBox = DMAX("kmprice","tblmilageprice")
  14. end sub
  15.  


Im not sure u can use controlsource on a unbounded box
Apr 27 '07 #3
abolos
65
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
Apr 27 '07 #4
pks00
280 Expert 100+
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.
Apr 28 '07 #5
abolos
65
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
May 5 '07 #6

Sign in to post your reply or Sign up for a free account.

Similar topics

2
by: Sandra Setz | last post by:
Hello, I have made a view in SQL Server, that consists of a join with another view and a table. That other view In Access, I have linked the view as a linked table. When I view the result...
2
by: Xiphias | last post by:
Hi, Im trying to change the color of a text box on a report that im printing from a form. On the form I got a check box that has to tricker the color of that textbox on the printed report....
12
by: deko | last post by:
I have a form that I do *not* want the user to be able to use the PageUp/PageDown keys *unless* the cursor is in a particular text box. I'm using this code: Private Sub Form_KeyDown(KeyCode As...
4
by: Paul | last post by:
I have a basic form. On it are two sub forms. The top sub form has a list of records. When a user clicks on a new row within the top sub form. I want the RecordSource of the bottom sub form to...
9
by: Lyn | last post by:
Hi, I have a form which is opened from a button on another form. The form is used to display a list of records from a recordset in Continuous Mode. It is sized vertically to display about 25...
7
by: Stu | last post by:
Hi, I have a combobox who's values change the recordsource of the form. Within this form, there is a subform, whos records also need to change pending the value in the combobox. I am able to get...
1
by: Kev | last post by:
Hello I have a form (RosterForm) based on a table - RosterRange RosterRange has 4 fields: RosterRangeID Autonumber RosterStartDate Date RosterEndDate Date (probably...
2
by: David Haskins | last post by:
I have a fairly complex interface screen (form) that is comprised of several subforms that perform different, but related activities. I am designing a search/filter form that should be able to...
0
by: dprjessie | last post by:
Hello, I am a Web programmer and I'm working on my first desktop application as a favor for a friend. I'm sure I have a stupid error here, but there is no error being thrown so I can't figure out...
0
by: DolphinDB | last post by:
Tired of spending countless mintues downsampling your data? Look no further! In this article, you’ll learn how to efficiently downsample 6.48 billion high-frequency records to 61 million...
0
by: ryjfgjl | last post by:
ExcelToDatabase: batch import excel into database automatically...
0
isladogs
by: isladogs | last post by:
The next Access Europe meeting will be on Wednesday 6 Mar 2024 starting at 18:00 UK time (6PM UTC) and finishing at about 19:15 (7.15PM). In this month's session, we are pleased to welcome back...
1
isladogs
by: isladogs | last post by:
The next Access Europe meeting will be on Wednesday 6 Mar 2024 starting at 18:00 UK time (6PM UTC) and finishing at about 19:15 (7.15PM). In this month's session, we are pleased to welcome back...
0
by: Vimpel783 | last post by:
Hello! Guys, I found this code on the Internet, but I need to modify it a little. It works well, the problem is this: Data is sent from only one cell, in this case B5, but it is necessary that data...
0
by: ArrayDB | last post by:
The error message I've encountered is; ERROR:root:Error generating model response: exception: access violation writing 0x0000000000005140, which seems to be indicative of an access violation...
1
by: CloudSolutions | last post by:
Introduction: For many beginners and individual users, requiring a credit card and email registration may pose a barrier when starting to use cloud servers. However, some cloud server providers now...
0
by: af34tf | last post by:
Hi Guys, I have a domain whose name is BytesLimited.com, and I want to sell it. Does anyone know about platforms that allow me to list my domain in auction for free. Thank you
0
isladogs
by: isladogs | last post by:
The next Access Europe User Group meeting will be on Wednesday 3 Apr 2024 starting at 18:00 UK time (6PM UTC+1) and finishing by 19:30 (7.30PM). In this session, we are pleased to welcome former...

By using Bytes.com and it's services, you agree to our Privacy Policy and Terms of Use.

To disable or enable advertisements and analytics tracking please visit the manage ads & tracking page.