Search results

Glad you found something. There's a number of ways you can protect your database. Putting a password on your code is a good start, also deploying your database as a .mde/.accde instead of .mdb/.accdb stops people from being able to change most objects. You could also alter the code you posted...

Keith: You can also use single quotes inside the string, like this sql = "UPDATE tblMemberBranch SET tblMemberBranch.Test = '" & res & _ "' WHERE (([tblMemberBranch].[MemberBranchID]= " & OpenArgs & " ));"

I stringly doubt it does make a difference. Have you tried to search for a solution? I have found a few different threads on this forum that deal with this subject - This looks like a helpful one. http://www.access-programmers.co.uk/forums/showthread.php?t=151711

Hi Aziz, It looks as though this code only disables the shift key, which only stops someone opening the database in Admin mode. This does not hide the navigation pane in 2010 as it did in earlier versions. I have found another thread on this message board that deals with hiding the navigation...

Doh yes. I added my own NZ function and also moved the LogErr procedure out of class module and into a regular module as I started to wonder whether it needed to be in a class at all. I think that was what was driving the overall problem as it seems to compile fine now. Thanks all for help.

Hi, Just to be clear, this IS my error handling procedure. My error handling looks something like this: On error goto Err_Handle .... procedure code ... Err_Exit: Exit sub Err_Handle: LogErr "Procedure", True resume Err_Exit As you can see, I am not concerned with the error...

I thought had already added a reference to DAO 3.6, but I've just double checked it and the reference is definitely there. Code still bugs at the compile stage when I try to call the function...

Sorry, I thought it was maybe something pretty critical I was missing. I have the below procedure in my excel class: Option Explicit Private myDesc As String Private myNumber As Long Private mySource As String Private myMethod As String Private myUser As String Private myTime As String...

Hi All, I have just imported a class with an Error Handling sub in it from an Access Database into Excel. I tweaked the code a little so that it works in Excel, then tried to use that Error Handling sub and now am getting a comile error "Sub or Function not defined". I have checked for silly...

Of course! Silly me. Thank you very much for your help!

Ok. Sorry, I didn't make myself clear - I would normally set it using the control source property in the properties box, but I'm not sure I can use that method for a specific column of a control. The only other way I can think of doing this is programmatically. If you are suggesting I do this...

Thanks - that makes sense. How would I do this? Normally I would bind a control by using the control source property, but this obviously wouldn't work for the hidden column...

Sure - I'll do my best! I have a set of four data entry forms, which users will use to complete 1 record over several sessions. Each combo drops a numerical value into a field-bound invisible text box, so when they re-open the record, I have SQL to put the 'user friendly' text values back into...

Hi there, I'm currently writing a procedure which opens a form and then performs certain changes to it, based on that procedure's arguments. I want this procedure to wait for the form's 'load' process to complete before it continues. Is there any way I can easily indicate this? Thanks

Thanks for your responses - very much appreciated. vbaInet: I may be wrong, but I think the 'for each' loop I've given above actually loops though *all* controls, then tests to see whether its either control type. There are quite a lot of controls that doesn't fit into that criteria, therefore...

All the controls are already prefixed with a 3 character control type, but I'm not sure how this is any different to ctl.controltype = acTextbox, etc.... What I'm not sure of is how to tell it to only loop through those controls.

Hi all, I currently have a procedure that goes something like: NullString = "" For Each ctl In Me.Detail.Controls If ctl.ControlType = acTextBox Or ctl.ControlType = acComboBox Then If ctl.Tag Like "*" And IsNull(ctl.Value) Then NullString =...

Thanks and yes, after thinking more about it, a few more appropriate normalisation changes will make my life easier. Thanks again.

Hi Dave, The problem I am facing is that the data format is driven by spreadsheets! Information needs to be input from spreadsheets, then added to further data within the Db and then output to the same spreadsheet in the same format. Annoying as it is, I've not been involved in any of the...

Hi Smig, Thanks. I'd considered this too, but had decided it may be a bit fiddly/difficult, but considering the other options perhaps it seems simpler in comparison! Thanks again for your suggestion.