Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Mike Lewis on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Enabling Back Button in IE

Status
Not open for further replies.

Videla

Programmer
Jul 28, 2005
98
US
Hi All,
I am using ASP.NET 2.0 to build my web pages. In my web page I am displaying a Crystal report to the users using Crystal report viewer control.

Let me give you an example what i am trying to achieve here.

My Home web page will have a list of drop downs and users has to choose their options then they will click "SUBMIT" button to get the report in a new window.
My report has drilldown like
Planet --> Level1
Country --> Level2
State --> Level3
City --> Level4
For drill downs I am using the hyperlink property of text object which is available in Crystal report. On clicking the link, the same page will be refreshed to second level of the report and this goes on till last level. My problem is: User should have the option to go back to previous level just by clicking the back button available in Internet Explorer. Currently in my web page, I am abale to go to previous 1 level only.
For example:
If I am in level 3, I should be able to goto Level 1 but now I am able to go to level 2 only.
After reaching previous 1 level, the back button is disabled automatically.
Please help me in enabling the back button.

Other Details
Crystal report Ver XI
ASP.NET 2.0
Code Behind: VB.NET

Here is my code in Page load
if not page.ispostback then
Dim mySessionMgr As SessionMgr = New SessionMgr
Dim myEnterpriseSession As EnterpriseSession = mySessionMgr.Logon(uname, pwd, servername, "secEnterprise")
Dim myEnterpriseService As EnterpriseService = myEnterpriseSession.GetService("InfoStore")
Dim myInfoStore As InfoStore = New InfoStore(myEnterpriseService)
myEnterpriseService = myEnterpriseSession.GetService("PSReportFactory")
Dim psrfObject As Object = myEnterpriseService.Interface
Dim myPSReportFactory As PSReportFactory = CType(psrfObject, PSReportFactory)
Dim queryString As String = "Select SI_ID, SI_NAME, SI_PARENTID From CI_INFOOBJECTS " _
& "Where SI_KIND='CrystalReport' and SI_INSTANCE=0 " _
& "And SI_NAME = 'Product_Mix_BD'"
Dim myInfoObjects As InfoObjects = myInfoStore.Query(queryString)
Dim myInfoObject As InfoObject = myInfoObjects(1)
Dim myReportSource As ReportSource = myPSReportFactory.OpenReportSource(myInfoObject.ID)

' Binding parameters to Crystal report Viewer
'cv_ezinfo is my Crystal report Viewer

cv_ezinfo.EnableDatabaseLogonPrompt = False
cv_ezinfo.DisplayBottomToolbar = True
cv_ezinfo.DisplayToolbar = True
cv_ezinfo.DisplayGroupTree = False
cv_ezinfo.HasCrystalLogo = False
cv_ezinfo.HasToggleGroupTreeButton = False
Session("my_rptsrc") = myReportSource
cv_ezinfo.ReportSource = myReportSource
temp = DateTime.Now
else
cv_ezinfo.EnableDatabaseLogonPrompt = False
cv_ezinfo.DisplayBottomToolbar = True
cv_ezinfo.DisplayToolbar = True
cv_ezinfo.DisplayGroupTree = False
cv_ezinfo.HasCrystalLogo = False
cv_ezinfo.HasToggleGroupTreeButton = False
cv_ezinfo.ReportSource = CType(Session("my_rptsrc"), ReportSource)
End If
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top