Search results

Someone out there must have a working copy of this code I could have a look at. Please help me

Someone out there please help

I have the following code which is inserted into each form to disable the mouse wheel, the problem I am having is that it works fine for the main form but as soon as it is entered into a subform i get the following problems 1) I can't select any fields using the mouse 2) I get an error on...

Why would you want to duplicate data, the reason for having relational database is to cut down on unneeded data, The best solution would to have the Patient Visit Table as a subform on the patient Demographics form, this will show the current patient with all the visits for that patint listed in...

I think this is what you are looking for Me!OutPutDate = Format("31/10/" & DatePart("yyyy", Me!InPutDate), "dd/mm/yy") [This message has been edited by Geoff Codd (edited 04-16-2002).]

I use this to convert the entered date to the last day of the month you should be able to play with this to get what you want Me![End of Month Billing Date] = DateAdd("d", -1, Format("01/" & Format(DateAdd("m", 1, Me![End of Month Billing Date]), "mm/yy"), "dd/mm/yy"))

I've just sent you an example database with an example of how to do it

what tables do you have, do you have one for investment fund Types and One for Invset ment fund interest rates and applicable date that they became effective

the criteria works the sam as if you used an input box, example: if you enter the date 01/04/02, in the field first date on the form Date selection and create an after update event on the date field or create a button to open the query it will automatically open the query with all records for...

I don't think you can, the way I do it is to create a form with a single unbound text box and set it's input mask as Short Date and also include a calender control so the user can select the date from that and ten in the query criteria I enter the following [Forms]![Date Selection]![FirstDate]...

Heres the code I use and it works a treat Private Sub Form_Current() If Me.NewRecord Then Me!lblNavigate.Caption = "New Order" Else With Me.RecordsetClone Me.RecordsetClone.MoveLast .Bookmark = Me.Bookmark Me!lblNavigate.Caption = "Order " & _ Me.CurrentRecord _ & " of " & .RecordCount End With...

you can't back up a database while it's open but you can back up the tables which is what i do, look at transfer text under help, I do it using a macro and backup to csv files

look at DMAX in the help files

if you look at the properties of your combo box you can specify which column is the bound one change that from 1 to 2 and it should work fine

They way i do it is to disable a control until the previous control has been completed look at enable in the help files

Here is some sample sql which i use to count the number of jobs per survey (Number of times the surveyors name appears in the orders table), you should be able to play with this to meet your needs SELECT [GCH Order].[Surv Full Name], Count([GCH Order].[Surv Full Name]) AS [CountOfSurv Full...

i don't think that you can give a label the same name as the combo box

look at the nz function in help, it converts null values to zero for calulations

Look at TopValues Property in the Help Files

Try This Private Sub ABE_Part_AfterUpdate() If Me!ABE_Part = -1 Then Me!AccompABEBeginningBE.Enabled = False Me!AccompABEBeginningLit.Enabled = False Me!AccompABEBeginningLitDate.Enabled = False Me!AccompABEIntermedHi.Enabled = False Me!AccompABEIntermedHiDate.Enabled = False...