Search results

>> using a query where you choose "Unique Values" from the Query Properties sheet. You seem to have functions/properties I don't have. I'm still using Access 97 which maybe doesn't have these or they are well hidden. However, I think I may have found a workaround: Created a query which will...

Actually this table is just a simplified example to illustrate/test the problem, the 'real' table is much more complex and doesn't have any questionable field names. I am sure this is not the problem. My work involves inspecting certain inspectable items (analogy:books) which are located in...

Example:I have a table with 3 fields: Name,Book,NumBooks Each Name can have more than one book. I want to count the number of books each name has and put it in the NumBooks field. ie: Update 'NumBooks' to equal count 'Book' for 'Name' = 'Name'. Setting up a Query Update Name to Count(Book)...

Worked like a charm. Thanks very much.

Using modules is new to me, how do I call this module from a VBA routine so that I can do something like: Select Case Resolution Case 800x600 MoveSize the form to location xy Case 1024x768 MoveSize the form to location xy etc Thanks

How Do I find out what the screen resolution setting is? I am using MoveSize to position a form (used as a control box) on another form but if I position it correctly for a 1024x768 monitor is is irretrievably pushed off screen on an 800x600 monitor.

What is the VBA code equivalent to an append query? Query SQL is: INSERT INTO Table1 ( NBR ) SELECT Table2.NBR FROM Table2; Thanks

How do I make an 'announcement box' like a message box but with no OK buttons? eg screen box says "I'm busy doing something" which doesn't have to be acknowledged & can be closed when the task is completed. I have tried to use a form which would just display a string sent to it as open...

Ignore last post. I hit the wrong key & it posted before I was finished. I have two forms. How do I do the following?: Sub: Event dbl click Open the 2nd form Transfer control to the 2nd form so that the user can select a record WITHOUT finishing this routine. ie suspend execution of this...

I have two forms. I want to do the following: Event.double click

Problem with using a combo box is that it does not show up in Datasheet view. I am not trying to update data in this table. The records are addresses. The use selects the record desired, then double clicks on the Address_Code number field, then I want a dialog box to pop up which offers the...

Probably what you want is to create a query which filters the data to a single client then base your report on the query not on the main table.

OpenForm method is the code commands for opening a form from within another form, usually triggered by an event such as a double click. Syntax etc is in the Help files.

I have a form open in datasheet view, the user is to select the record wanted & double click. On double click I want to pop up a box like a message box which gives the user a choice of three or four options similar to an option group box. The form is open in datasheet view so I can't use an...

Got this to work. Thanks for all the help. Set dbs = CurrentDb Set recset = dbs.OpenRecordset( _ "SELECT Num, Name " & _ "FROM List ORDER BY Num", _ dbOpenSnapshot) strSearch = "Num = ' " & Me.Num & " ' " With recset ' Populate recordset...

I was trying to avoid creating a permanent query. Aside from having the code creating multitudes of queries, it also gives problems with each time the script is run, it will again try to recreate a query & will upchuck on finding one already there. I have also tried the method shown in the help...

That's exactly how I did it. and I'm still getting the error message.

Tried it. Still getting the original 'Too few parameters' error. You are right about it being something to do with the parameter. If I leave out the 'where' statement it doesn't give any error. (but I seem to get an empty recordset.)

Tried it: With qdf .SQL = "SELECT Name FROM List WHERE List.Num = " & Me.Num & " ;" qdf.[Me.Num]=Me.Num Set rstName = .OpenRecordset() End With also tried With qdf .SQL = "SELECT Name FROM List WHERE List.Num = " & Me.Num & " ;" .[Me.Num]=Me.Num Set rstName =...

Use the criteia build wizard to create the criteria: TableName!FieldName = Yes OR TableName!FieldName = Fail