Search results

Daniel Pinault has a code module on his website that creates a trusted location. Will have a look at it. I envisage the macro to open a form if not a trusted location , then the user to be prompted to create a trusted location or back out. In the former case I'll run Daniel's code. Any other ideas?

For fear of hijacking this topic. Now that we can establish whether the db is in a trusted location or not. How can i make a trusted location via vba. Particularly as a user may be using runtime & thus not have access to the usual options in regard to creating trusted locations suported by the...

@GPGeorge , thanks. I implemented it basically as you described. If not a trusted location a popup form opens that explains the 'trusted location' issue. On that form is a hyperlink to microsofts 'how to add a trusted location' instructions. Upon closing this form, the database then closes...

@GPGeorge , i came across your autoex macro that checks whether the database is in a trusted location. I like the idea and would like to adapt it to my application where i already use an autoexec to open a log in form. So i glean that if the db is not trusted frmstartup opens, if trusted it...

I got interested in custom switchboards & was playing around. I added in the 'old' switchboard manager to the ribbon. Saved it & for the heck of it had a go at exporting it. Well for some reason it did export!!. I have no Idea of what changed as i performed the same process as I'd done...

Yes, I saw the same report. Haven't scientists got better things to do? How about a male snake with an erection....Would be easy to catch..

All, this is what I came up with; Private Sub bttnGotoPhoto_Click() If DoesRecordExist(Me.HiveID) Then DoCmd.OpenForm "frmHivePhotos", , , "HiveID = " & HiveID, , , Me.[HiveID] ' openargs to pass the hive name to frmHivePhotos Else DoCmd.OpenForm...

Will do. Thanks

On form_load event? Consider that i still need to 'link' a new record to the 'calling' record by the pk which i pass as an openarg. I guess i can still pass the openarg even if the form is not filtered.

So, I have a form containing a subform. That subform is a continuous form including a control to open a popup/modal form to display filtered records, based upon the [HiveID]. The PK of that subform. I use DoCmd.OpenForm "frmHivePhotos", , , "HiveID = " & HiveID, , , Me.[HiveID] on the subform...

All, I got a bit 'chuffed' when I saw this thread referenced in another thread. Got me thinking and I have another tip. Tip- Be careful what project you sign up for! Don't get in over your head and promise something that is beyond your skills, no matter what others may think of your abilities...

A final post, then matter closed. I added a DoEvents after sleep (1000) in the code of post #11. All good now. Thanks to all whom contributed.

One more question if i may. I wish to disable BttnClose after one click only. In testing, if I run my code & click multiple times, I eventually get the "windows is not Responding Message", then options to close, wait etc. I don't wish to see this as it would give the user an optout. I Also...

Gents, 'Sleep' works. I'm sufficiently humiliated!!

I'll try that. Thanks @56414.

All, i now get a different error message "453 Cannot find DLL entry point sleep in Kernel32.dll". Did some googling (again) reinstalled office 365, checked for windows updates (all current), ran chkdsk /r "which reported no problems found''. Then tried running same routine on another PC (32bit...

Friends, i'm embarrassed!. Unsuccessfully played with this routine for hours. My code compiled though so i thought the code was correct. Will make the change and try again. Cheers.

Hi, I wish to introduce a 'sleep' routine into one of my forms as follows. When I run the sleepsec function I get the abovementioned error. I've done some googling and it appears that ' kernel32' is not installed. I ran chkdsk in the hope of refreshing all drivers, but still get same error...

@arnelgp , Just letting you know that I have adapted your code to my application, thank you. I think it's very clever, thanks for sharing. Now back to the main project.....

OK, just to be sure I understand. I clear our any records in table msyscode. Run sub Codegen to populate 20 codes. Then copy each code in turn into Encrypt() then copy the encrypted result into the class module, overwriting existing. I then clear msyscode, run codegen again, then copy each...