It’s OK now, I got it to work.
CommandBars("EditView").Controls(11).State = True
I had to move a button that was capable of changing states, like the justification ones, to my custom ToolBar . Then I changed the Button Image and the On Action code. Now it works.
It seems that only...
Doing well, thanks AceMan.
Good idea, but when I tried it, it didn't work. There was no error code, just not highlighted. Do you have to update it after for it to work?
I’m trying to highlight a button on a toolbar using VB based on information on a form.
This would be similar to how the Justification (Left/Center/Right) on the formatting tool bar works, when a field is selected. I have tried SetFocus, but this does not work as it moves the focus to the...
I have a “personnel information” database where an OLE Object field is used to display the picture of the person that the record belongs to.
I use to be able to insert (Create from File) any picture format I wanted (Bmp, Jpg, Tif...) But, now I can only insert GIF files otherwise it is...
hello blakey2
There are are alot of good answers here. So I just wanted to add my bit to it as well.
For starters, no matter what format you have selected for your System date, at one point or another when converting the Date from "text type data" to "date type data", ACCESS will READ the...
Well here is some more for you brain.
In order the Help more, I would need the know more how your report is working For example
Main Report (RecoreSource? , All Records or no records)
|--Sub1 (Link Master/child value, Recordsource)
|-Sub2 (Link Master/child value,Recordsource)...
Hi Ashij
Just to see if i understand correctly, the subform only shows a picture? If not, it should. If there is any other info that is displayed, you should have it in another subreport.
If this is so then you don't need to have code in the subform module making the picture visible. Instead...
in the query that defines you list, edit the query and enter Accending in the field you want to sort by.
the List box Row Source, which is SQL code, would be :
SELECT Table1.Field1 FROM Table1 ORDER BY Table1.Field1;
Dalain
For me, we have a network that is accessable to all parties (16 I think all over the city), for example if the two companies A & B were able to share a network, then all you have to do is place BE that contain the common information in the shared drive. (they then would map the drive to have...
Open the form in design mode then in the Form properties and under Recordsource enter the name of the table(click the down arrow, or click the three dots and create query.
if the form is in normal mode, you can create a table with the field called strRecSource (text type, 255) Enter the name...
For the Main Access window you can change the Application Title from the startup properties under Tools/Startup..., or you can do it using VB by entering the following in a module (this way you can change it a any time)
ChangeProperty "AppTitle", dbText, "Your Caption Here"...
One way to do this is in your BE table create a field called RecChanged (Yes/No)
Then in your FE, have a form's timerval set to 5 sec (5000) then in to onTimer event do a Dlookup on the field. So eevery 5 sec the form will search for a True value. If found, then active the popup message.
This...
It figures, someone like PHV would find a shorter way. I didn't think DateSerial would work if the day value was grater than 31, but it does!![thumbsup2]
Dalain
The form does not nessarly need to be hidden, as long as it cannot be closed without closing access.
On the forms Timer interval Event enter 86400000.
(1000 = 1 sec therfore 24hr = 86400000) then on the OnTimer event of the form
You should also be able to set the time to send the email
For...
If the sub form (frmSub1) is already open elsewere before you open the main form, the subform "frmSub1" will be blank. You must ensure that all forms that contain frmSub1 as a subform and the frmSub1 form are closed first, then when you open the main form you should be able to view frmSub1 and...
try this in the Lost Focus of the field that you enter the julian date.
Private Sub JulianDateFieldName_LostFocus()
me.NewDate = fJtoD(JulianDateFieldName)
End Subin the lost focus field
And the function that goes with it.
Function fJtoD(strJulianDdate As String) As Date
'Convert...
If the Email Address are all in one table you can extract them into one text variable.
Example code.
Dim dbs As Database, rst As DAO.Recordset
Dim strEmailAddress As String
Set dbs = CurrentDb 'Referance the current database
Set rst = dbs.OpenRecordset("YourTableName") '...
Just a clarification.
No matter what format you have selected for your System date, at one point or another ACCESS will READ the Date in a mm/dd/yy format. (Microsoft is a US product. The US default date format is mm/dd/yy)
So it is best to leave it in mm/dd/yy format for your Tables and only...
Take a look at my previous post. If any one is using a format other than mm/dd/yy, access can miss read your date. To solve the problem ensure the system date format is in mm/dd/yy. and whenever you display a date in a report or on the screen, then modify you format to dd/mmm/yy. In an SQL...
Roy-Vidar
Thanks from me as well. I was trying to figure out the syntax for the SetOption. I now have two icons on my form, which allows the user to change the behavior without giving the user access to the Access Options form.
Dalain
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.