Tab Menu problems

[bobc]

Hi

Now you have sorted out my previous problem, maybe you can help me with a long term issue which we haven't resolved.

We use the menu function to create a tab page which works very well. We have two problems with it, though.

1 We developed the page using 1024 by 768 pixels resolution. However, many of our users have screens which will only support 800 x 600. Because the menu has to be set in pixels, the 800x600 monitors won't show scroll bars so the pages cannot be viewed properly.

Here is the parameter line we use:

strParams = strParams "|mw=1000|mh=30|dw=1000|dh=450|tabalign=left"

Is there any way round this?

2 When we first developed the page, the speed was fine. As soon as we increased the number of tabs the page started taking a long time for its initial display. Once it displays for a user the first time, subsequent displays have an acceptable speed. It is as though it is compiling the first time it is being displayed, even when there has been no code changes.

Here is the sub we use to show the menu:
sub Menu1()
Dim Menu As New Tornado.Z()
dim strParams as string
dim strdata as string
dim strServer as string = Request.ServerVariables("SERVER_NAME")
strParams="type=3| style=BLUESKY|defaultURL=http://" & strServer & "/easyocis/classlist/"
strParams = strParams & "| FirstPage=ClassListCourseDetails.aspx"
strParams = strParams & "|mw=1000|mh=30|dw=1000|dh=450|tabalign=left"
strData = "la=Details/Actions|u=ClasslistCourseDetails.aspx"
strData = strdata & ",la=Personal Details| u=ClassListPersonalDetails.aspx"
strData = strdata & ",la=Equal Opps|u=ClassListEqualOpps.aspx"
strData = strdata & ",la=Visit List|u=ClassListVisitList.aspx"
strData = strdata & ",la=Screening|u=ClassListScreening.aspx"
strData = strdata & ",la=Diagnostic|u=ClassListDiagnostic.aspx"
strData = strdata & ",la=Essential Skills|u=ClassListEssentialSkills.aspx"
strData = strdata & ",la=Profiling|u=ClassListProfiling.aspx"
strData = strdata & ",la=Learner Review|u=ClassListActionPlanner.aspx"
strData = strdata & ",la=Learning Styles|u=ClassListLearningStyles.aspx"
strData = strdata & ",la=Photos|u=ClassListPhotos.aspx"
With Menu
.dbMenuParams = strParams
.dbMenuData = strData
Response.Write("<div style='position:absolute;left:-2px;top:92px;padding:0;border:medium none;width:100%'>" & .ASPdbMenu() & "</div>")
End With
end sub

Any help would be appreciated.

Bob

[Frank]

* Can you detect the user resolution or even ask user to pick a resolution upon entry and adjust th eparams accordingly.

* Memu and all other aspx programs are slow in the first load (JIT) if the code is new/changed.

* Make up a NWIND example in order to illustrate the problems.


Frank