How to pass information to a redirect page?

[janettan]

Hi,

I hope someone can help me with this:

I have tried the example given in What's new in version 10 --> Grid Component - How To Topics
- How to pass information to a redirect page? as follow, but it doesn't work. I am using MYSQL database, does this cause the problem, the emailaddress did not get populated to the target page.

"First, define an 'AfterInsertRecord' event. In this event, add this code:
e.rtc.mydata.emailaddress = e.datasubmitted.emailaddress

The 'rtc' (short for 'run-time calculation') variable is automatically made available to all of the server-side event handlers. Therefore, if you add you own variable to this dot variable, you can pass information from this event handler to another event handler.

Next, define an 'OnPageRedirect' event handler. Add this code:
e.url = "page2.a5w?emailaddress=" + e.rtc.mydata.emailaddress"

[Keith Hubert]

Re: How to pass information to a redirect page?

Hi Janet,

Try session.__protected__email=e.datasubmitted.emailaddress.

The value in the variable remains for the whole of the session.

[betty]

Re: How to pass information to a redirect page?

Ha! I get to help someone

The command you are looking for is response.redirect("yourpage.a5w"). I got this from the Intro to Web Applications series videos. I have a variable called vUlink which returns the session.__protected__ulink value. In the security users table, each user has an external user id that relates back to the contact table; ie. mine is BHARDIN. In the contact table, my contact ID is also BHARDIN. In the contact table, I have a status field that could contain anything - the important thing is that an active user's status is "active" and an in-active user status might be something else (ie. "Credit Hold", or "In-Active", or "Suspended"). So anyway, I modified this code to read the value of the vUlink and then get the status from the contact table and although the user is able to login, the system displays a message that they are suspended and immediately logs them out.

I am relatively new to the web apps thing - so this might not be the way to go - but I have found that it works for me.

1. In "Web Security > Web Security Configuration > Login Options > redirect page after login" tell it to redirect to a page called login_processing.a5w
2. Create that login_processing.a5w page and use code similar to what I show below



Here's the code:
<%A5

'Login_Process.a5w
'Author: bhardin

'Login Processing is the first page that is executed after the user successfully logs into the system
'If we want to validate additional information about the user or process other information before the user
'truly gets access to our system, we want to put that information here.

'This is an XBasic only page. It does not display and the user will not see it process. This is how we
'execute code without user interaction.

'Security on this page must be set to Authorized login (so that it cannot be accessed outside the system)

'REVISION HISTORY
'20111009 Initial release
'20111010 Add "Check User Status"

'COMMENTS
'On Line 50, I would like to use a message box but find it to be convoluted; waiting for v11 dialog component

'DIM VARIABLES
DIM pUser as P
DIM vGUID as C
DIM vUlink as C
DIM session.__protected__isAdministrator as L = .f.

'GET INFORMATION ABOUT THE CURRENTLY LOGGED IN USER
a5ws_logged_in_user_values(pUser,request,session)
group = a5ws_get_user_assignments(pUser.userid)
vGUID = a5ws_get_guid_from_user(pUser.userid) 'Guid is the security framework UUID
vUlink = a5ws_get_ulink_from_guid(pUser.userid) 'Ulink is the Contacts ID Value from the Contacts table
'

if "Administrators" $ Group then
session.__protected__isAdministrator as L = .t.
response.redirect("Console.a5w")
else

'CHECK USER STATUS
cn = "::name::BBW"
table = "contact"
filter = "locid = '" + vUlink + "'"
result = "status"

user_status = sql_lookup(cn,table,filter,result)

'NOTIFY THE USER THAT THEY ARE SUSPENDED
if user_status <> "Active" then
response.redirect("login_suspended.a5w")
else

'EVERYONE ELSE
response.redirect("Index.a5w")
end if
end if

%>