Search results

Just a thought... You could the names across the form a few times and set the tab stop property to false... So, every time the first name disappears, the other name is on the right... And when you tab over, it will skip over the names... Again just a thought... Wouldn't be the neatest...

If I'm understanding your question correctly, this should work... Put the following code in the AfterUpdate event of the Text Field... me!TextFieldName = me!TextFieldName & " -- " & date() & " -- " This will concatenate the date at the end... You obviously don't need the " -- " around the...

Thanks, but Mike's idea is actually going pretty well... I already am going through a loop of databases to backup... So I just overwrite a batchfile and run it in the loop.. I'm sure this probably eats up memory, but I only have about 20 databases or so and only run it about once a week...

Okay, when you're building a string, use ampersands(&) and closed quotes to concatenate a string with a variable... If you're using straight text, like 'Not Started', then you don't have to close the quote, just put the text in tick marks(')... Also, when you use AND and Or, you have to repeat...

Sure, you need tick marks(') around string variables... Try this... Myrecordset.FindFirst "[User ID] ='" & CurrentUser() & "'" That should work for you. Doug

You have to open up the database and then open up your recordset in your code.... 'Declare Your Variables... Dim MyDB as database Dim MyRecs as Recordset 'Set Your Variables.... Set MyDB = currentdb set MyRecs = MyDB.openrecordset("RecordSetName") 'Now all you have to do to refer to a field...

You need quotes around the where clause... Try this... DoCmd.OpenForm "FRM_Animations_Main", , , "Creater = '" & strTeam & "'" Hope that helps.... Doug

Set up an Update SQL statement on the click event of your checkbox... dim MyDB as database dim MySQL as string set MyDB = currentdb MySQL = "UPDATE [TableName] Set [TableCheckBoxName]=" if me![CheckBoxName] then MySQL = MySQL & "True" Else MySQL = MySQL & "False" End If 'If there is a where...

Alright, at the top of your code for the undo button, put: on error goto Undo_Click_Error then at the bottom of your code, right above the end sub command, put the following code exit sub Undo_Click_Error: if err.number = xxx then resume next else msgbox err.number & ": " & err.description...

Trap the error... If if the error happens, just have your program resume next or go to an Exit Event. Hope this helps. Doug

Why don't you use a multi-select listbox? That way you can select multiple items and you can have multiple columns... Hope that helps. Doug

A very interesting thought.... I definitely agree with you, bad way to do it, but desperate times call for desperate measures... Thanks for the reply. Doug

just filter the subforms data... me!SubFormName.Form.Filter = "[Packet_Number]='" & me![packet_Number] & "'" me!SubFormName.Form.Filteron = true

What type is the ID field defined to be? Date/Time, String? This could still work... And if you set the default value of the ID textbox in your form to now() and the format to "mmddyyhhnn" then it should automatically populate, and you won't need my previous function... Make sure you have...

You know, Rich makes a good point.. I was too caught up in trying to convert the original way you gave me that I didn't see the simplicity in this. In your table definition, set the ID field to a date/field type and set the format to "mmddyyhhnn". Then in your form, set the ID textbox's...

Pain in the $@%!! Just kidding.. My clients and boss change the specs on me all the time too, I know how it is... This is actually much easier to do than what you were originally looking for... I seperated and commented everything for you so it's a little easier to understand... here goes...

Do you have the Microsoft DAO Object Library Installed??? To get there, go to the modules tab and either go to design view of an existing module or create a new module. Go to the Tools menu and select references. See if one of the checked items up top are Labeled Microsoft DAO x.x Object...

Your problem is your case statement. Select Case True will return the first value that is true... So even if cancel is pushed, it will check the two checkboxes to see if one of them is selected. If so, then it will run that code. You should check to see if cancel is selected before the Select...

Does anyone know of a way to copy a database file that is currently open? The Filecopy command from VB returns an error when you use it on an open file.. but if you copy a file manually through windows if it's currently open, it will work. Any suggestions would be greatly appreciated...

I think your best bet is to run an update query... Update the value to that long cdate(..) function that I gave you. You will need a where clause also, so it doesn't convert anything that has already been converted. I think your best bet is to use a where clause of... mid([ID],3,1)<>"/"...