Replies

Thanks guys. I will look into the Nav III and IV. Hard to believe people are still using antique browsers.

Got another question. I tried to make a page with just the nav bar and a logo graphic. Then I wanted to insert it into the top of the other pages. Thereby having only one place to go to make changes. But when I inserted it above or below the 2nd page’s tag it didn’t work. Any ideas.

Thank you. Fay

Thank you for responding and your comments about my site.

I have in the past stayed away from frames. The main reason being concerns regarding different browsers handling of frames. Is that a non issue at this time? Should I still be concerned?

Thank you. Fay

unkamunka That did it. Thank you! It is always the little things that get you. I tried sending the file but got a message that it couldn’t be sent.

Happy Holidays. Fay

Thank you Leif for your response. Actually the code I was using was from Dynamic Drive for the Top Navigational Bar II.

I have attached the file. Okay that didn’t go through so I will do the tried and true copy/paste method. Thanks! Fay

 

/*

Top Navigational Bar II (By Mike
Hall)

Last updated: 00/05/08

Permission granted and modified by Dynamicdrive.com to
include script in archive

For this and 100’s more DHTML scripts, visit
http://dynamicdrive.com

*/

 

var myNavBar1 = new NavBar(0);

var dhtmlMenu;

 

//define menu items (first parameter of NavBarMenu specifies
main category width, second specifies sub category width in pixels)

//add more menus simply by adding more “blocks” of
same code below

 

dhtmlMenu = new NavBarMenu(100, 0);

dhtmlMenu.addItem(new NavBarMenuItem(“Home”,
“http://www.awarenessproductions.com.com”));

myNavBar1.addMenu(dhtmlMenu);

 

dhtmlMenu = new NavBarMenu(100, 120);

dhtmlMenu.addItem(new NavBarMenuItem(“Documentation”,
“”));

dhtmlMenu.addItem(new NavBarMenuItem(“Books”,
“http://www.cnn.com”));

dhtmlMenu.addItem(new NavBarMenuItem(“MSNBC”,
“http://msnbc.com”));

dhtmlMenu.addItem(new NavBarMenuItem(“ABCNews”,
“http://www.abcnews.com”));

myNavBar1.addMenu(dhtmlMenu);

 

dhtmlMenu = new NavBarMenu(110, 120);

dhtmlMenu.addItem(new NavBarMenuItem(“Technology”,
“”));

dhtmlMenu.addItem(new NavBarMenuItem(“News.com”,
“http://www.news.com”));

dhtmlMenu.addItem(new NavBarMenuItem(“Techweb”,
“http://www.techweb.com”));

dhtmlMenu.addItem(new NavBarMenuItem(“Wired”,
“http://www.wired.com”));

dhtmlMenu.addItem(new NavBarMenuItem(“Dynamic
Drive”,
“http://www.dynamicdrive.com”));

myNavBar1.addMenu(dhtmlMenu);

 

dhtmlMenu = new NavBarMenu(100, 150);

dhtmlMenu.addItem(new NavBarMenuItem(“Search”,
“”));

dhtmlMenu.addItem(new NavBarMenuItem(“Yahoo”,
“http://www.yahoo.com”));

dhtmlMenu.addItem(new NavBarMenuItem(“Alta
Vista”,
“http://www.altavista.com”));

dhtmlMenu.addItem(new NavBarMenuItem(“Infoseek”,
“http://www.infoseek.com”));

dhtmlMenu.addItem(new NavBarMenuItem(“Excite”,
“http://www.excite.com”));

dhtmlMenu.addItem(new NavBarMenuItem(“HotBot”,
“http://www.hotbot.com”));

myNavBar1.addMenu(dhtmlMenu);

 

dhtmlMenu = new NavBarMenu(100, 150);

dhtmlMenu.addItem(new NavBarMenuItem(“Webmaster”,
“”));

dhtmlMenu.addItem(new NavBarMenuItem(“Dynamic
Drive”,
“http://dynamicdrive.com”));

dhtmlMenu.addItem(new NavBarMenuItem(“Website
Abstraction”, “http://wsabstract.com”));

dhtmlMenu.addItem(new NavBarMenuItem(“Freewarejava.com”,
“http://freewarejava.com”));

dhtmlMenu.addItem(new NavBarMenuItem(“BrainJar”,
“http://brainjar.com”));

myNavBar1.addMenu(dhtmlMenu);

 

//set menu colors

myNavBar1.setColors(“#000000”,
“#000000”, “#C0C0C0”, “#ffffff”, “#666666”,
“#000000”, “#cccccc”, “#ffffff”,
“#000080”)

 

//uncomment below line to center the menu (valid values are
“left”, “center”, and “right”

//myNavBar1.setAlign(“center”)

 

var fullWidth;

 

function init() {

 

Okay I got the report to work, ie displaying input box and input on report. (By the way I can never express my appreciation for your help yesterday, but thanks.) To correct the problem I was having with the tsxtbox receiving the data I had to put the code in On Activation event.

I now have it so the message box comes up when the cmdApril button is clicked on the frmClient. But the data isn’t put into the textbox. I put the code like this

This is within the click command of the cmdApril button
Dim strYrMonth As String
strYrMonth = strMonth

DoCmd.OpenReport “rptJonCombined”
txtMonth = strYrMonth

What I can’t understand is why the code on the report is not activating itself just because we are going through a different route?

Thanks Fay

Good morning Francois

Okay I placed this in Modular 1
Public Function strMonth() As String
‘ Get the Month of the report from the user
strMonth = InputBox(“Type in the month.”, “Month of Year”)
End Function

Then this on a report
Private Sub Report_Open(Cancel As Integer)
Dim strMonth As String
txtMonth = strMonth ‘ This is a textbox
End Sub

It is now saying I can assign a value to this object. I have remove the Dim strMonth As String from the second block and it gives me the same message. PS Shifting gear on this same form I have tried using just a textbox with =[Type out the Month] and get a #Name as results.

Thank you Fay

Francois This is getting scary. I think I actually know what you are saying in the above code. The True False was correct the only thing I had to change was If rst.AprilSet It demanded and !. Scary I figured that out. I think it is coming together but I have to do some more testing.

Thank you for all of your help today. Fay

Yes. The form is not attached to the table with the data I need to check in this situation. PS the fix on the other problem seems to be doing the trick.

As always thanks a lot. Fay

I don’t think I explained myself. The data is in a table tblCompanyFacts in a field called AprilSet.
I need to test the table field AprilSet to see if it is = Year(Now) – 1.

My understanding is that Me only refers to the current object not an external object such as a table.
I think the only missing link is how to reference the table and field.

Thank you. Fay

Ran into a problem. Procedure works great when using the cmdApril button for the end of year row up of reports. But the same report is used monthly and should not display the label. The code we used to make the labels visible for the cmdApril button stops the use of the forms when going through the normal monthly routine.

Thank you. Fay

Okay I admit it I am out of my league and loosing my hair. I have no clue how to test against the table tblCompanyFacts field name cmdAprilSet to set the cmdApril button. If you have any more patience I would appreciate your help

I set the field value at 2000
Here is my attempt on a test form.
Private Sub Form_Open(Cancel As Integer)
If tblCompanyFacts!cmdAprilSet = Year(Now) – 1 Then
Me.cmdApril.Visible = True
Else
Me.cmdApril.Visible = True
End If
End Sub

Thank you Fay

Thanks Francois. I will stay with the query I just was thinking about keeping the number of queries down.

The button worked find. But if I reopen the form it is on and it is still April then the button reappears. How do you set it to not return until the next year?

Thank you. Fay

Thank you Francois that was right on the mark. The folks that frequent this board are great. Thank you for your time. So many of the things needed to get the job done are not always apparent.

Thank you. Fay

Thank you Charlotte and Ricky. It is a major help when you know what the words are that you need to lookup.

Thank you for saving me a lot of time. Fay

I was always told to keep things out of my eye, including charts, fingers, and contacts.

You expression worked well on the query I placed it in front of the original month. When I put it on the report as a chart and used your SortMonth as the column heading it worked great. Now all I have to do is change the labels of 4, 5 etc to April, May etc.

Thank you. Fay