Search results

Found another way, define the colors as public constants. Works fine. Public Const B1 As Long = 6894592 ' Dark Blue RGB 0 52 105 and then private sub setlabel() me.label1.forecolor = B1 end sub Works fine.

Cool, that makes a lot of sense. But then I need to have one for Forecolor, one for backcolor etc... right?

:confused:Hi, I have one color scheme I want to use all through the database I am developing. The next examples have just one color defined, to make it simpler (a dark blue, that I would call B1) If I define the color inside the sub, it's ok (see below). private sub setlabel() Dim B1 B1 = RGB...

Hi, Thanks... tried something similar to you suggestion and worked If resMsg = 6 Then Soundex (strOrg) End If Was the (strOrg) missing as an argument. Thanks

Hi, I have a after update event that will match the written record with any exist record in a table in the field "OrgName". If it doesn't find exact match, will call a function with a "soundex" algorithm to see if there is only a misspelling or another name altogether. In the afterupdate...

I kind of solved the problem by writing some code in the "close database button" ensuring the main form closes before the database (probably happened that it closed the log in form and then the main form), and by building a trap for the error. but have no idea of what is going on there.

Hi all, Just having an annoying problem and have no idea what it can be...:banghead: I have a log in form, where the user logs into the database. After logging in, this form is minimized not to be seen again. This form has the user credentials and user name, that give permission to different...

Hi, I've looked for this around and didn't find. Wonder if someone can answer. I've developed a database that is working fine, however, even when I have the Shift bypass key disabled, when the database is open, I can press Alt+F11 and will open all the code... so anyone can change it. How...

Ok, thanks anyway. I will see if anyone else knows what is going on. I'm just afraid this will happen when the application is running. Cheers,

Hi Mihail, thanks, I just put the debug print as you suggested (see code bellow). This morning the code was working fine (without me making any changes), however can't still can't make much sense of the fact that never is writen the A1 suffix NewFileName = prjID & Format(FileNumber, "000") &...

Hi, I'm having sporadic problems with a code to copy and rename photos. This code is supposed to loop around a directory of photos (named after a project), and then copy a new photos (from another directory) to this folder, numbering them and the logging them in a table tphotos. The first...

Thanks, very good page to give the right basis.

Hi, I’m trying to devise the best structure for a database. I have firstly a list of around 300 location (for a start), each location will be evaluated according to a list of 200 indicators. Each indicator can be Yes or No and can have several attachments and/or hyperlinks, contact and memo...

Thanks, After I wrote the line Debug.Print strDonId it started working... thanks (all criteria where coming right as they should, but that happened also before, as I could see it when I was in debugging mode) What happened here?

Hi, I've tried with brackets, quotation marks, straight brackets, etc... and doesn't work. Thanks for the code tag tip. Any other sugestion? thanks Private Sub fltDonor_Click() Dim ctlSource As Control Dim strDonId As String Dim intCurrentRow As Integer Set ctlSource = Me.lDonFil For...

Hi, I'm trying to get a report filtered and displayed inside a navigationform, using docmd.browseto to open the report. This report's recordset is a query and has a filed named donID (the ID number of a donor) to sort several donors. I'm using a listbox "lDonFil" to choose one or many donors...

Right on spot! Was exactly that. I have as default printer a network printer, but I am not connected to the network currently. Changed the default printer to the XPS printer, and the reports open normally. Thanks a lot Pat Hartman

Hi, Not sure if anyone can help with this one. I'm designing a database, and currently I'm designing reports. The DB has been working completely fine, however, when loading and working with reports, has become extremely slow. And only is slow when has to open anything containing a report. The...

Ok, got it. In the end is like this: [Forms]![Nmain]![nmainsub].[Form]![naddproject].[Form]![prjid] Being naddproject the subform in the nprojects navigation form, I thought this naddproject was just specific to another tab, but is obviously general to all tabs inside nprojects. So in the...

Still didn't manage to make it work, and tried in all possible ways I can devise. [Forms]![nmain]![nmainsub]![nProjects]![naddproject].[Form]![Text4] and [Forms]![nmain]![nmainsub].[form]![nProjects]![naddproject].[Form]![Text4] When I have (only) the subform nprojects open, the expression...