My Loggedin Users Page is not populating the Users that and the pages they go to. This works fine locally but when run over the application server it doesn't This is the code in my "logged Users" Page
and this is the code I have on each page the user accesses
When I check my a5ws_login.log file The GUID is not populated
Any reason this maybe occurring?
Rogers
Code:
?"Sessions: " + str(a5_count_websessions()) + "<br>" ?"Current__"+time("0h0mA") + "<br>" fpath = serversetting.document_root + "\session_folders" filelist = filefind.get_recurse(fpath,"loggedin_*.txt",FILE_FIND_NORMAL,"N" + crlf()) dim lst as c = "" for each foo in filelist lst = lst + foo.value + "<br>" next ?lst
and this is the code I have on each page the user accesses
Code:
tbl=table.open("[PathAlias.ADB_Path]\registration.dbf",FILE_RW_SHARED) tbl.change_begin() dim hst as c hst = alltrim(request.host) filename = "loggedin" filename = filename + "__" + time("0h0mA") filename = filename + "__" + alltrim(lookupc("F",alltrim(session.__protected__Puser.Ulink),"User_fname","registration","Employer_Id"))+" "+ alltrim(lookupc("F",alltrim(session.__protected__Puser.Ulink),"User_lname","registration","Employer_Id")) filename = filename + "__" + hst filename=filename+a5_split_url(request.script_name).page filename = stritran(filename,".",".") filename = stritran(filename,":",":") filename = stritran(filename,"@","@") filename = stritran(filename,":","_") filename = filename +".txt" save_to_file("loggedin",session.session_folder + filename) tbl.change_end(.t.) tbl.close()
When I check my a5ws_login.log file The GUID is not populated
Any reason this maybe occurring?
Rogers