Search results

I think, to do this, you can make some codes in the Consignment_AfterUpdate event procedure: If [Consignment Size] > 20 Then MaxPasses = 4 ElseIf ... ... End If And, the Form_Current: If [Consignment Size] > 20 Then MaxPasses.DefaultValue = 4 ElseIf ... ... End If

Dear tho28199 If txtCheck.Value = "A" Then _ lblTitle.Caption = "Amended Entries Completed - Change Flag Form" You use the character _ after Then, it says that the statement behind is an element of the If, but break to new line. So the translator do it like an only statement. The error occurs...

In Access, we can make a project file which connect to a SQL Server. So we can inhirit all features of SQL Server. When using project file, we can run a store procedure by: CurrentProject.Connection.Execute "EXEC storeprocedure" or any action query: CurrentProject.Connection.Execute...

This make a form has name of pupil, word content instead of their ID numbers.

You should use the Conditional Formatting to change the background of the controls in the Detail section (but command button). In the table, you add a Yes/No field (named selected or else), default value: 0 In form, add a checkbox (name: selected, control source: selected), select all textboxes...

Dont get a table directly to use as a Source Object of a subform. You make a form (named frmSearchResults or else) that has a RecordSource - query2 (Default View: Datasheet, Allow Additions: No, ...) In formNz, change the Source Object to frmSearchResults. In code, remove...

The easy way: First, modified the current code: On Error Resume Next DoCmd.OpenReport "rptCurrentAll", acViewPreView,, "Section = '" & txtFilter.Value & "'" On Error Goto 0 Second, in the Report_NoData event procedure of the report, you put this code: MsgBox "No record. Report will be closed."...

Check to be sured the fieldnames are correct. The SearchResults form and the FormNz form are yours. I only edit something. Can you send me your newest file?

Here is my work. (see file attached) Hope this helpful for you.

Try to do this way (I'm not sured): In class module of report, you declare a variable named cnt: Dim cnt As Integer In Detail_Print event procedure, you put this: cnt = cnt + 1 In PageHearderSection_Print or PageFooterSection_Print base on you want to show the count of records per page, you...

OK, I know what you want. But, I think you should re-structure your database. We need three tables: Table 1: Sessions SessionID, PupilName, Marks Field Marks is the total correct answers the a test session Table 2: Tests SessionID, WordID, PupilAnswer Table 3: Word Answers WordID, EnglishWord...

You use a form to do this instead of a list box, because in form, you can use a conditional formatting for each record. I dont know that the old day is the same row with the day logged, you can say it clearly, OK?

That form has a recordsource? and the [txt...Calc] have their controlsource? If right, you can make a query, then use it as the form's recordsource. In the query you make a calculate field likes above. In contrast, you set the default value of each in [txt...Calc] to 0. So you can rewrite...

When you change the price of the contract, you need the price has updated to the other table, too. Is this right? To do this, you can write some code for the Form_AfterUpdate event procedure. For example: CurrentDB.Execute "UPDATE tblStoreTable SET Price = " & [txtPrice] & " WHERE CustomerID = "...

Report has an event property named On Open. This occurs when report is called but not be loaded (so not be shown). You can change the report RecordSource propery in the Report_Open event procedure. For example: If callForm = "Form1" Then RecordSource = "query1" ElseIf callForm = "Form2" Then...

Put a text box to the the report header or report footer section, Control source: =Count([name of any text box in the detail section]) Dont put it to the page header or page footer section because it works wrong.

Suppose the Yes/No fields are named like f1, f2, f3, ..., f10 SELECT Site, (IIf(f1, 1, 0) + IIf(f2, 1, 0) + IIf(f3, 1, 0) + IIf(f4, 1, 0) + IIf(f5, 1, 0) + IIf(f6, 1, 0) + IIf(f7, 1, 0) + IIf(f8, 1, 0) + IIf(f9, 1, 0) + IIf(f10, 1, 0))/10 As CorrectPercent FROM QuizResults

I dont know how your query is designed, but when I read your code, I found some problem: DoCmd.OpenQuery will open the window which browsing the resilt of query if it is a select query, or it will run a sql statement if the query is an action query. Your source tables and their fields are not...

DoCmd.OpenReport "rptCurrentAll", acViewPreView,, "Section = '" & txtFilter.Value & "'" Note: txtFilter: text box contains your filter value. If your filter is the caption of the command button, you use CommandButton.Caption instead. Because field "section" has a String (Text) data type, so...

DoCmd.OpenReport "reportname", acViewNormal ... will print your report out to the paper w/o show the Print Preview window. DoCmd.Close acReport, "ReportName" will close your Print Preview window if it is loaded (visible or hide)