Solved

Redirect from Page_Load Event

Posted on 2004-08-13
4
282 Views
Last Modified: 2006-11-17
I am attempting to use the page load event to choose which aspx page a user finally receives.  I know roles based asp.net is desgned to handle this process but I think I can do it this way much easier.  

I have a field in the User table called Role.  There are two roles admin and user.  On Page_Load I want to take the Users Role information and use that to redirect the user to a particular aspx page.   Following is the present code in the page-load event.

How will I edit that code to allow the redirect?

Sub Page_Load(Source as Object, E as EventArgs)
if not Page.IsPostBack then

      Dim strConn as string = "server=(local);database=BCA;Trusted_Connection=yes"
      Dim sql as string = "SELECT UserName, FirstName, LastName, Phone, Extension, Email, Company FROM Users WHERE

(UserName = '" + Session("Username") +"')"
      Dim conn as New SQLConnection(strConn)
      Dim Cmd as New SQLCommand(sql, conn)
      Dim objDR as SQLDataReader
      conn.Open()
      objDR=Cmd.ExecuteReader(system.data.CommandBehavior.CloseConnection)
      While objDR.Read()
         intID=objDR("UserName")
         strFirst=objDR("Company")
         strLast=objDR("Email")
         NameFirst=objDR("FirstName")
           NameLast=objDR("LastName")
         strPhone=objDR("Phone")
         strExtension=objDR("Extension")
         strRole=objDR("Role")
         End While
      page.databind()
      conn.Close()

(What would the code look like and where would I put the code that says something like:
If strRole=Admin
redirect to Admin.aspx
else
load the code that follows)

 IncidentProduct.Items.Clear()
                     IncidentProduct.Items.Add(New ListItem(""))
                     IncidentProduct.Items.Add(New ListItem("Clinic Management System", "CMS"))
                     IncidentProduct.Items.Add(New ListItem("Electronic Medical Records", "EMR"))
                     IncidentProduct.Items.Add(New ListItem("Managed Care Managed Information System", "MCMIS"))
                     IncidentProduct.Items.Add(New ListItem("Resource Scheduling System", "RSS"))

IncidentStatus.Items.Clear()
                     IncidentStatus.Items.Add(New ListItem("Open"))
                     IncidentStatus.Items.Add(New ListItem("Completed"))

IncidentPriority.Items.Clear()
                 IncidentPriority.Items.Add(New ListItem(""))                    
                 IncidentPriority.Items.Add(New ListItem("Multiple Users Affected"))
                     IncidentPriority.Items.Add(New ListItem("Workaround Indentified, +1 Users Affected"))
                 IncidentPriority.Items.Add(New ListItem("Limited Functionality"))
                 IncidentPriority.Items.Add(New ListItem("Specific Immediate-Need Question"))
                 IncidentPriority.Items.Add(New ListItem("General How-To Question"))

End If
End Sub
0
Comment
Question by:nhorsley
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
4 Comments
 
LVL 25

Expert Comment

by:nauman_ahmed
ID: 11793985
How you validate the user role? If it depends on a Button_Click event then you can use the page redirect in the following way:

Sub_PagLoad(......)
If not Page.IsPostBack then
  'Check if the authentication cookie if you are creating one exist, if exist redirect user to the specific page
 
  'else show the login form
end if

End Sub

Sub Button_Click(....)
 'Validate User
 'If user exist, redirect to specific page
 'else
 'show the login form again

End Sub

Hope this will help, nauman
0
 
LVL 17

Accepted Solution

by:
AerosSaga earned 250 total points
ID: 11794029
Put this after the while in your page load and it will auto redirect based on credentials

if not Page.IsPostBack And strRole=Admin then
Response.Redirect("Admin.aspx")
Else
redirect to wherever or build more user handling.

Regards,

Aeros
0
 
LVL 8

Expert Comment

by:daffodils
ID: 11796725
Modify your Page_Load as ...

Sub Page_Load(Source as Object, E as EventArgs)
if not Page.IsPostBack then

     Dim strConn........
     ...........................
     page.databind()
     conn.Close()
     
     if strRole=Admin then
         Server.Transfer("Admin.aspx")
         ' Response.Redirect("Admin.aspx")
         ' You can use either a Server.Transfer or Response.Redirect..
         ' Server.Transfer saves an extra round-trip to the server.
     else
     ' load the code that follows
     end if

     IncidentProduct.Items.Clear()........
     .............
End If
End Sub
0
 
LVL 1

Author Comment

by:nhorsley
ID: 11796856
Thank you.
0

Featured Post

Announcing the Most Valuable Experts of 2016

MVEs are more concerned with the satisfaction of those they help than with the considerable points they can earn. They are the types of people you feel privileged to call colleagues. Join us in honoring this amazing group of Experts.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

This article discusses the ASP.NET AJAX ModalPopupExtender control. In this article we will show how to use the ModalPopupExtender control, how to display/show/call the ASP.NET AJAX ModalPopupExtender control from javascript, how to show/display/cal…
Problem Hi all,    While many today have fast Internet connection, there are many still who do not, or are connecting through devices with a slower connect, so light web pages and fast load times are still popular.    If your ASP.NET page …
Add bar graphs to Access queries using Unicode block characters. Graphs appear on every record in the color you want. Give life to numbers. Hopes this gives you ideas on visualizing your data in new ways ~ Create a calculated field in a query: …
Do you want to know how to make a graph with Microsoft Access? First, create a query with the data for the chart. Then make a blank form and add a chart control. This video also shows how to change what data is displayed on the graph as well as form…

630 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question