Search results

Ahh... thanks!

Hi all, I have the following code which works fine and it makes 4 boxes on my form active if the Employee Status value within the form = "Inactive". so if an employee leaves the Reason_For_Leaving comboBox is available to be selected... This works fine when I change the value within the form...

wow... great stuff... thanks! mandy

Oh.. do you have any brief advice on how to disable the X? No worries if not... I do a search on the forums tomorrow otherwise! Thanks, Mandy

No worries, I guess as I immediately close the form anyway it will make no long-term difference!! Thanks so much for your help! I have to present a proto-type of this tomorrow at 10am to some much more senior bods than myself and there was no way I would have made this deadline without your...

Sis you get my earlier post that the Record_Date does update, but not when I click, but when I re-size the window? So I drag it to make it smaller or larger? "Ti quite strange... when I resize the window the values in the REcord_Date field update...." Oh and so I will call the button something...

Ti quite strange... when I resize the window the values in the REcord_Date field update.... I have checked, and I have no code in ANY of teh events except "on-Open" Could anything else be causing this? Mandy

Thanks Mike, How do I go about inserting now() before closing the form? I have tried several of the event proceedures (on-dirty, on-change) etc... none have worked. is there any code I can use to do this? Also - you make a good point... how do I stop a user from clicking x to close the form...

Is it possible to get a macro event to run a piece of code that I have saved as a public module?

The first two did not work... the third however..... when I created a button and attached the following code: Private Sub Command182_Click() Forms![frmStaffDetails_ComboBox]!Record_Date = "" Forms![frmStaffDetails_ComboBox]!Record_Date = Now() End Sub It works! So I set it to null first and...

No joy.... Can anone online help me plz? I have a field in a form that is bound to a field in a table.... The field in the form is called Hid_DAT and this is bound to the Record_Date field in the table On opening the form the Record_Date field displays the date when the field was last...

It gives me the following error message when I use the code in the Form_Close event... "Run-Time errer '2448' You cant assign a value to this object" Is this because the field is bound to a table? Tnx, Mandy

Hi All, Can anyone help with this please? I have tried several different things... I have tried changing the event from on close to On change.... no luck, although no error! It did not make the change before passing it back to the original table.... I need to update the value in the field...

Hi Namliam, I tried both ways, and still I get errors.... although I do agree that I probably dont need the unbound date... I think the problem is that the code is testing if the relationship is True or false, it is returning false as Me.Hid_DAT =now() is not true. How do I make the code set...

Afternoon All, i have the following code (highlighted below in Blue) within my "Form" properties. The aim of the code is as follows: I would like to open the form and populate it with the values as they appear currently in the form. E.g. Mandy Smith, Employee, (Record_Date: 01/01/2008)...

yeah I know... Im going to have to work on ensuring that the user is FORCED (using whatever means possible!) to select the user they wish to update so that when they filter, they can only possibly select 1 person and update that persons record... So thats my next challenge....! I think I got...

Woweeeee....... Following code works and Im all happeee...... Private Sub Form_Open(Cancel As Integer) Dim DB As DAO.Database Dim RST As DAO.Recordset Set DB = CurrentDb Set RST = DB.OpenRecordset("Tbl_MAIN_Staff_Details_HISTORY") RST.AddNew RST![Staff_Number] =...

Mmm I put it on the Form_Open event.... Private Sub Form_Open(Cancel As Integer) Dim DB As Database Dim RST As Recordset Set DB = CurrentDb Set RST = DB.OpenRecordset("Tbl_MAIN_Staff_Details_HISTORY") RST.AddNew RST![Staff_Number] = Forms![frmStaffDetails_ComboBox]![Staff_Number]...

Namliam, Thanks so much for all of your help, but your post is WAY above my head, I have no idea how to do this.... I did another search on the forums in general and found the following post within the tables forum that may be able to help me out of this problemo...

My append query "qApp_Staff_Details_HISTORY" sql now reads: INSERT INTO Tbl_MAIN_Staff_Details_HISTORY SELECT * FROM frmStaffDetails_ComboBox WHERE me.filter; and on the form properties "on open" reads: Private Sub Form_Open(Cancel As Integer) CurrentDb.Execute qApp_Staff_Details_HISTORY End...