Replies

I suggest that you always use the full year rather then the last two digits. This article may help shed some light…

http://support.microsoft.com/default.aspx?…b;en-us;Q208339

hth,
Jack

DoCmd.OpenReport “ReportName”, acPreview
DoCmd.RunCommand acCmdZoom150

When you put in the RunCommand you can choose your magnifcation….

hth,
Jack

Try putting this all on one line –

DoCmd.OpenForm “frmParticipantsInWorkshops”, , , “ParticipantID = ” & ParticipantID, , acDialog

Just a guess on my part because you are not using the Continuation underscore and & properly….

hth,
Jack

I would suggest that you look into Rick Fishers Find and Replace program. The price is certainly right and it is in indispensible tool in my opinion. Go to http://www.rickworld.com to download a trial version…

hth,
Jack

I think I now understand what you are saying. What is happening is that the first form comes up with the right student but when you click on a command button to go to another form it shows all students with the last name that was selected the first time round. If you look at the code in the button that opens the next form it probably says something like: DoCmd.OpenForm “FormNameHere”, , , “[LastName]= ‘” & Me![LastName] & “‘”. You need to change that so it reads like this:

“[LastName]= ‘” & Me![LastName] & “‘ And [FirstName] = ‘” & Me.FirstName & “‘”

The quotes are a bit hard to read so here it is again with extra spaces… (Don’t use the extra spaces)

“[LastName]= ‘ ” & Me![LastName] & ” ‘ And [FirstName] = ‘ ” & Me.FirstName & ” ‘ ”

Let us know if we are on the right track for you….

Jack

I am not sure how you are going about your search. Are you are using combo boxes to list last and first names? Text boxes? Do you have a query that gets its criteria from the combo or text boxes? If you are using combo boxes or text boxes and you have criteria something like this in the Criteria field of your query: [Forms]![YourFormName]![YourTextBoxName] then be sure that they are on the same line so that the query is doing an AND search. For example LastName = Smith AND FirstName = Robert. This way you will only find the Robert Smith’s but no Amanda’s….

A bit more detail on how you are selecting and looking for your records will help someone here to give you a more complete and accurate answer.

Jack

I am sorry but I don’t have an answer for your first question. As for your second question it is a bit hard to give you an answer but here is a start. The Option button returns either Yes or No. How you use that is the tricky part. This code will tell you what the user has selected and would be put in the After Update event of the Option button.

Select Case OptionButtonName
Case 0
Me.ATextBox = “No”
Case -1
Me.ATextBox = “Yes”
End Select

Within this Select Case you can replace the Me.ATextBox with your code to put whatever it is in the unbound text box on your form. Also, you MAY need to put code like this in the On Current event of the form to be sure that the data in your unbound field is properly updated depending on the state of the Option button.

If you can give a specific example of what you are trying to do I a sure that someone here can give you a much more specific answer.

hth,
Jack

If you have an unbound text box named Text1 on your form then code like this in the After Update event of the text box will fill the rest of the fields on the form with the correct data:

Dim rs As Object

Set rs = Me.Recordset.Clone
rs.FindFirst “[AcctID] = ” & Me.Text1
Me.Bookmark = rs.Bookmark

Change the AcctID to the actual field your are looking for and change Text1 to the actual name of your unbound text box. In this code I have assumed that AcctID is numerical and NOT text. If it is text then the second line should read: rs.FindFirst “[AcctID] = ‘”& Me.Text1& “‘”. (Here I have added extra spaces so you can see the proper syntax: rs.FindFirst “[AcctID] = ‘ ” & Me.Text1& ” ‘ “. Do not add the extra spaces.)

hth,
Jack

Are you saying that you do NOT want to select the information from a combo box but type it in to a text box instead? Look at the code created by the combo box that does what you want and modify that code to use the name of the text box instead as that will probably be the easiest way to do it. My only comment would be that I suggest you stick with the combo box as this will show only existing records and avoid any typos, etc., but it is your call….

hth,
Jack

Access2000 has a database that comes with it called “Inventory Control”. You should be able to find this with the first dialog box that opens when you open Access. The first dialog box has a choice of ‘Access database wizards, pages and project’. Select that radio button and then click ‘OK’ and you will see the sample databases. I think if you look at this database it will at least give you a start. Good luck!

hth,
Jack

Do you make selections from one or more of the List boxes? If so then I would suggest that you take a look at this article for information on how to create a dynamic query.

http://support.microsoft.com/support/kb/ar…_SRCH&SPR=ACC97

Next, since you are selecting muliple items from the List boxes you will need to use the In() statment in your query and this article will help you with that.

http://support.microsoft.com/default.aspx?…b;EN-US;Q100131

I do not think that what you want to do is going to be a cake walk, but you can do it!

hth,
Jack

I think you want to use MsgBox. MsgBox = “Bad Entry”. Search help for more details on MsgBox.

hth,
Jack

I am glad you got it to work as that is all that really matters. Continued success!

Jack

I guess we would need to see the code in your Module or tell us what the code is supposed to do. My suggestion is just one way to call code and may not be the correct way in your case.

Jack

If you want to call your function from the On Click event of a command button you would put something similar to this in the On Click event: =YourFunctionName(Arguments).

I haven’t used macros for years so I am not sure how to do what you want.

hth,
Jack