Login Proses

[falah]

[ASK]

I have Login Proses

<%A5
dim session.current_username as c
dim session.Userid as c


cn = "::Name::Connection"
table = "tbl_user"
filter = "Userid = '" + a5ws_getcurrentuser() + "'"
result = "gender"
session.current_username = sql_lookup(cn, table, filter, result)

session.Userid = a5ws_getcurrentuser()

response.redirect("admin.a5w")  

%>

how its looping. if, that enter the female sex. then the page will go to women.
I have fild Gender.

[falah]

Re: Login Proses

<%A5
dim session.current_username as c
dim session.Userid as c
dim session.gender as c


cn = "::Name::Connection"
table = "tbl_user"
filter = "Userid = '" + a5ws_getcurrentuser() + "'"
result = "gender"
session.current_username = sql_lookup(cn, table, filter, result)

session.Userid = a5ws_getcurrentuser()

if result="Female"
response.redirect("woman/index.a5w")
else
response.redirect("admin.a5w")
end if

%>

I am try to make like this,, but stil not working.

[TheSmitchell]

Re: Login Proses

hmm. Well, I can tell you you're code isn't doing what you think it's doing. Result isn't the "result". It's what field you want to fetch from the table. It won't change. sql_lookup will return that value, which I'm assuming will be either "Male" or "Female". You're assigning this into session.current_username.

When you compare result against "Female", it will always be false because you set it to "gender" just before your sql_lookup call.

You could try this instead. I don't know what you're trying to accomplish with you're session variables, so you're on your own with that:

<%A5
    dim userid as c = a5ws_getcurrentuser()

    dim cn as c = "::Name::Connection"
    dim table as c = "tbl_user"
    dim filter as c = "Userid = :userid"
    [B]dim fieldToGet as c = "gender"[/B]
    dim args as sql::arguments
    args.set("userid",userid)

    [B]result[/B] = sql_lookup(cn, table, filter, [B]fieldToGet[/B], args)

    if ("Female" = result) then
        response.redirect("woman/index.a5w")
    else
        response.redirect("admin.a5w")
    end if
%>

[falah]

Re: Login Proses

thank you, its work.
do you know the website, to learn sourch code Alpha ?

[TheSmitchell]

Re: Login Proses

Your best bet will probably be the wiki: wiki.alphasoftware.com

This is the same documentation you access with the documentation viewer.