Login Processing problem

[RickyRelouw]

Hello,

I have created a application on a VPS and have developed to the stage of Testing.

Up to now have run the Web Application using developer, decided to move to Application server to handle the web site.

Installed the webserver, and license. All seems to work okay, except the Variable on my login processing page are not working.

E.G.

I can login and acces the main menu page. But vairiables on the Login page are not being created.

Sample of the Login processin page is below, is there anything I'm missing?

<%a5 'dim the variables
Dim pUser as P'-- Used to get info about logged in user (options are guid, email, ulink, etc)

Dim vGUID as c
Dim vUlink as c
Dim Session.__Protected__IsAdministrator as l = .f.
Dim Session.Facility as N = 0
Dim Session.Firstname as c
Dim Session.Lastname as C
Dim Session.Username as c
Dim Session.FacilityName as c
Dim Session.ResidentID as N
Dim Session.ResidnetName as C
Dim Session.SecurityLevel as C
Dim Session.CIMUserID as C 'Used to Grab the Unique USerID for each Login
Dim session.FacilityType as c = " " 'Capture the Facility type
Dim Session.UserAdmin as l ' To capture if usre has Admin access.


'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 user Unique User ID for the record stored in Login Security settings.
vUlink = a5ws_get_ulink_from_guid(vGUID) 'ULINK is the user ID value

Session.SecurityLevel = group
Session.CIMUserID = vUlink


'Open the named concetion
Dim cn as SQL::Connection
Dim flagResult as l
flagResult = cn.open("::Name::CIMSQLCONNECTION")
cn.PortableSQLEnabled = .t.
dim sqlstatement as c

' Get logged in users state , we will use this for filtering grids, lists etc.
table = "Employee"
filter = "EmployeID = '" + vUlink +"'"
result = "FacilityID"
result2 = "Lastname"
result3 = "Firstname"
Result6 = "Admin"
Session.Facility = sql_lookup(cn, table, filter, result)
Session.Lastname = sql_lookup(cn, table, filter, result2)
Session.Firstname = sql_lookup(cn, table, filter, result3)
Session.UserAdmin = sql_lookup(cn, table, filter, result6)

'Concatenate both sesison to get Username.
Session.Username = Session.Firstname + ", " + Session.Lastname

' Get logged in FaciltiyID , we will use this for getting facility name, and maybe filtering lists etc.
Factable = "Facility"
filterFac = "FacilityID = '"+ Session.Facility+"'"
result4 = "Fname"
Result5 = "Type"

Session.FacilityName = sql_lookup(cn, Factable, filterFac, result4)
session.FacilityType = sql_lookup(cn, Factable, filterFac, result5)


'Now Close the Connection
cn.Close()


response.redirect("MainMenu.a5w")


%>

[Davidk]

Re: Login Processing problem

Can you zip and post your login.a5w page?

[Steve Wood]

Re: Login Processing problem

You have to make sure your script only fires after they login. Jf the salcript is not isolated within an IF variable_exists ("submitbtnname") then it will fire before they login.

Also, your syntax is more v10 than v12.

[RickyRelouw]

Re: Login Processing problem

Hello Steve,

Thanks for your reply but, I don't understand your comments??

Yes the script may be old style, I have been learning to build using Alpha training Videos v10. Is there a v12 login processing video tute? I haven't come across one??

I have used the suggestions in videos to try and learn how to get a site up and running. It is working in V12, with the developer no problems. Except not with the application server??

I sorry, but I don't fully understand your comments, re. Jf the salcript is not isolated within an IF variable_exists ("submitbtnname").

Could you post me an example?

Should login processing be done differently in version v12???

I know v12 is focused towards mobile apps, but I am only using for Web application at present..

[RickyRelouw]

Re: Login Processing problem

Hello David,

I have zipped and attached the page. After recent post I guess I'm missing some syntax, but still not sure what it is..

I will keep researching?loginprocessing.zip

thanks.

[Steve Wood]

Re: Login Processing problem

I see now, this is a page that you are hitting after the user logs in, not on the same page as the login dialog itself.

Now, are you sure this post-login page is being hit at all? Maybe place code such as save_to_file("got here","c:\test.txt") on that page to kick out a text file as confirmation it got to that page. I personally set these variables on the same page as the login dialog so there is no confusion.

If you do that, they you need to place all of your code in between:

if eval_valid("submitbutton")
if eval_valid("userid")
...your code...
end if
end if

that means the code will ONLY fire after they click the login button.

[RickyRelouw]

Re: Login Processing problem

Hello Steve,

Thanks for your reply,

I am sure the login processing page is being hit, when using the developeer as the variables are created... Just not happening when I use the Application server???
My Security setting are to send the sucessfull login user to the processing page. Having said that, I would like to try your suggestions to put the script on the login page. as you suggested to do..

Not sure where this goes? Do you mean this code goes on the HTML page , or is it added to the Component properties??

I have looked at both and cant find the code??? Or where to place it???
Cant find
if eval_valid("submitbutton")
if eval_valid("userid")
...your code...
end if
end if

anywhere on the webpage or in the login component.

Sorry if I am not understanding, just need a little bit more help to get it right.