FoxInCloud
Updating ActiveWidget
Gravatar is a globally recognized avatar based on your email address. Updating ActiveWidget
  Michele
  thn@foxincloud.com
  Aug 27, 2014 @ 02:16am
How can i make the update of ActiveWidget ?

Gravatar is a globally recognized avatar based on your email address. Re: Updating ActiveWidget
  FoxInCloud Support - Thierry N.
  Michele
  Aug 27, 2014 @ 04:04am
the FAS installation comes with the latest version of ActiveWidget.

as explained in the upgrade notification email, you need to copy ...\ab\aw\scripts\*.* into your site(s) awScripts\, except the _Source\ folder.

To do this easily, we use a synchronization software (eg syncback) where we define as many profiles as we have sites to update.


How can i make the update of ActiveWidget ?


-- thn (FoxInCloud)

Gravatar is a globally recognized avatar based on your email address. How to register a user to FAS
  FoxInCloud Support - Thierry N.
  Michele
  Aug 27, 2014 @ 06:42am
Implement wUserLogin() and wUserLogout() in your login form;
here is a sample code:
PROCEDURE txtpassword.Valid
if m.thisForm.wlHTMLGen && Added by FoxInCloud adaptation assistant (test) on 02/16/2011
return .T. && Process event on server
endif

SELECT USERS
LOCATE FOR .T.;
AND username = Alltrim(this.parent.txtUsername.Value);
AND Password = AllTrim(this.Value)

do case

case Empty(This.parent.txtUsername.value)
thisForm.wMessagebox("Please enter a user name.", 64, "Notify", 2500)
return -1

case Empty(This.Value)
thisForm.wMessagebox("Please enter a password.", 64, "Notify", 2500)

case !Found()
thisForm.wMessagebox("Either User Name or Password is invalid!", 16, "Notify", 2500)

case lInactive
thisForm.wMessagebox("Sorry, this account is now inactive..." + Chr(13) + Chr(13) + "Please use another account or contact STI for assistance.", 64, "Notify")

otherwise
thisForm.iUserID = Users.userID
thisForm.wUserLogin(Users.userID) && just this ...
thisForm.wForm('ip.scx', wlLAN(), Users.userID)

endcase
ENDPROC


How can i make the update of ActiveWidget ?


-- thn (FoxInCloud)

Gravatar is a globally recognized avatar based on your email address. Re: How to register a user to FAS
  Michele
  Thierry Nivelet (FoxInCloud)
  Aug 27, 2014 @ 07:28am
Ok. Now the column Demo is set to "No",,,,,,,but the column "User" is still empty..... What is the second parameter of thisForm.wUserLogin ?


Implement wUserLogin() and wUserLogout() in your login form;
here is a sample code:
PROCEDURE txtpassword.Valid
if m.thisForm.wlHTMLGen && Added by FoxInCloud adaptation assistant (test) on 02/16/2011
return .T. && Process event on server
endif

SELECT USERS
LOCATE FOR .T.;
AND username = Alltrim(this.parent.txtUsername.Value);
AND Password = AllTrim(this.Value)

do case

case Empty(This.parent.txtUsername.value)
thisForm.wMessagebox("Please enter a user name.", 64, "Notify", 2500)
return -1

case Empty(This.Value)
thisForm.wMessagebox("Please enter a password.", 64, "Notify", 2500)

case !Found()
thisForm.wMessagebox("Either User Name or Password is invalid!", 16, "Notify", 2500)

case lInactive
thisForm.wMessagebox("Sorry, this account is now inactive..." + Chr(13) + Chr(13) + "Please use another account or contact STI for assistance.", 64, "Notify")

otherwise
thisForm.iUserID = Users.userID
thisForm.wUserLogin(Users.userID) && just this ...
thisForm.wForm('ip.scx', wlLAN(), Users.userID)

endcase
ENDPROC


How can i make the update of ActiveWidget ?


Gravatar is a globally recognized avatar based on your email address. Re: How to register a user to FAS
  FoxInCloud Support - Thierry N.
  Michele
  Aug 27, 2014 @ 08:27am
to get the user name, you need to implement xxxProcess.wUserName()
you can see a code sample in ...\ab\aw\app\progs\xxxServer.prg


Ok. Now the column Demo is set to "No",,,,,,,but the column "User" is still empty..... What is the second parameter of thisForm.wUserLogin ?


Implement wUserLogin() and wUserLogout() in your login form;
here is a sample code:
PROCEDURE txtpassword.Valid
if m.thisForm.wlHTMLGen && Added by FoxInCloud adaptation assistant (test) on 02/16/2011
return .T. && Process event on server
endif

SELECT USERS
LOCATE FOR .T.;
AND username = Alltrim(this.parent.txtUsername.Value);
AND Password = AllTrim(this.Value)

do case

case Empty(This.parent.txtUsername.value)
thisForm.wMessagebox("Please enter a user name.", 64, "Notify", 2500)
return -1

case Empty(This.Value)
thisForm.wMessagebox("Please enter a password.", 64, "Notify", 2500)

case !Found()
thisForm.wMessagebox("Either User Name or Password is invalid!", 16, "Notify", 2500)

case lInactive
thisForm.wMessagebox("Sorry, this account is now inactive..." + Chr(13) + Chr(13) + "Please use another account or contact STI for assistance.", 64, "Notify")

otherwise
thisForm.iUserID = Users.userID
thisForm.wUserLogin(Users.userID) && just this ...
thisForm.wForm('ip.scx', wlLAN(), Users.userID)

endcase
ENDPROC


How can i make the update of ActiveWidget ?




-- thn (FoxInCloud)

Gravatar is a globally recognized avatar based on your email address. Re: How to register a user to FAS
  Michele
  Thierry Nivelet (FoxInCloud)
  Aug 28, 2014 @ 02:29am
But i wanto set the User not to get it....In the Status page i have no users or User = "N/A"


to get the user name, you need to implement xxxProcess.wUserName()
you can see a code sample in ...\ab\aw\app\progs\xxxServer.prg


Ok. Now the column Demo is set to "No",,,,,,,but the column "User" is still empty..... What is the second parameter of thisForm.wUserLogin ?


Implement wUserLogin() and wUserLogout() in your login form;
here is a sample code:
PROCEDURE txtpassword.Valid
if m.thisForm.wlHTMLGen && Added by FoxInCloud adaptation assistant (test) on 02/16/2011
return .T. && Process event on server
endif

SELECT USERS
LOCATE FOR .T.;
AND username = Alltrim(this.parent.txtUsername.Value);
AND Password = AllTrim(this.Value)

do case

case Empty(This.parent.txtUsername.value)
thisForm.wMessagebox("Please enter a user name.", 64, "Notify", 2500)
return -1

case Empty(This.Value)
thisForm.wMessagebox("Please enter a password.", 64, "Notify", 2500)

case !Found()
thisForm.wMessagebox("Either User Name or Password is invalid!", 16, "Notify", 2500)

case lInactive
thisForm.wMessagebox("Sorry, this account is now inactive..." + Chr(13) + Chr(13) + "Please use another account or contact STI for assistance.", 64, "Notify")

otherwise
thisForm.iUserID = Users.userID
thisForm.wUserLogin(Users.userID) && just this ...
thisForm.wForm('ip.scx', wlLAN(), Users.userID)

endcase
ENDPROC


How can i make the update of ActiveWidget ?




Gravatar is a globally recognized avatar based on your email address. Re: How to register a user to FAS
  FoxInCloud Support - Thierry N.
  Michele
  Aug 28, 2014 @ 03:45am
I meant 'set the user name on the foxincloud status page'


But i wanto set the User not to get it....In the Status page i have no users or User = "N/A"


to get the user name, you need to implement xxxProcess.wUserName()
you can see a code sample in ...\ab\aw\app\progs\xxxServer.prg


Ok. Now the column Demo is set to "No",,,,,,,but the column "User" is still empty..... What is the second parameter of thisForm.wUserLogin ?


Implement wUserLogin() and wUserLogout() in your login form;
here is a sample code:
PROCEDURE txtpassword.Valid
if m.thisForm.wlHTMLGen && Added by FoxInCloud adaptation assistant (test) on 02/16/2011
return .T. && Process event on server
endif

SELECT USERS
LOCATE FOR .T.;
AND username = Alltrim(this.parent.txtUsername.Value);
AND Password = AllTrim(this.Value)

do case

case Empty(This.parent.txtUsername.value)
thisForm.wMessagebox("Please enter a user name.", 64, "Notify", 2500)
return -1

case Empty(This.Value)
thisForm.wMessagebox("Please enter a password.", 64, "Notify", 2500)

case !Found()
thisForm.wMessagebox("Either User Name or Password is invalid!", 16, "Notify", 2500)

case lInactive
thisForm.wMessagebox("Sorry, this account is now inactive..." + Chr(13) + Chr(13) + "Please use another account or contact STI for assistance.", 64, "Notify")

otherwise
thisForm.iUserID = Users.userID
thisForm.wUserLogin(Users.userID) && just this ...
thisForm.wForm('ip.scx', wlLAN(), Users.userID)

endcase
ENDPROC


How can i make the update of ActiveWidget ?






-- thn (FoxInCloud)

Gravatar is a globally recognized avatar based on your email address. Re: How to register a user to FAS
  Michele
  Thierry Nivelet (FoxInCloud)
  Aug 28, 2014 @ 05:06am
I want to set the user of the opened sessions like in the picture below


I meant 'set the user name on the foxincloud status page'


But i wanto set the User not to get it....In the Status page i have no users or User = "N/A"


to get the user name, you need to implement xxxProcess.wUserName()
you can see a code sample in ...\ab\aw\app\progs\xxxServer.prg


Ok. Now the column Demo is set to "No",,,,,,,but the column "User" is still empty..... What is the second parameter of thisForm.wUserLogin ?


Implement wUserLogin() and wUserLogout() in your login form;
here is a sample code:
PROCEDURE txtpassword.Valid
if m.thisForm.wlHTMLGen && Added by FoxInCloud adaptation assistant (test) on 02/16/2011
return .T. && Process event on server
endif

SELECT USERS
LOCATE FOR .T.;
AND username = Alltrim(this.parent.txtUsername.Value);
AND Password = AllTrim(this.Value)

do case

case Empty(This.parent.txtUsername.value)
thisForm.wMessagebox("Please enter a user name.", 64, "Notify", 2500)
return -1

case Empty(This.Value)
thisForm.wMessagebox("Please enter a password.", 64, "Notify", 2500)

case !Found()
thisForm.wMessagebox("Either User Name or Password is invalid!", 16, "Notify", 2500)

case lInactive
thisForm.wMessagebox("Sorry, this account is now inactive..." + Chr(13) + Chr(13) + "Please use another account or contact STI for assistance.", 64, "Notify")

otherwise
thisForm.iUserID = Users.userID
thisForm.wUserLogin(Users.userID) && just this ...
thisForm.wForm('ip.scx', wlLAN(), Users.userID)

endcase
ENDPROC


How can i make the update of ActiveWidget ?






Gravatar is a globally recognized avatar based on your email address. Re: How to register a user to FAS
  FoxInCloud Support - Thierry N.
  Michele
  Aug 28, 2014 @ 05:16am
if you implement xxxProcess.wUserName(), the real names should appear ...


I want to set the user of the opened sessions like in the picture below


I meant 'set the user name on the foxincloud status page'


But i wanto set the User not to get it....In the Status page i have no users or User = "N/A"


to get the user name, you need to implement xxxProcess.wUserName()
you can see a code sample in ...\ab\aw\app\progs\xxxServer.prg


Ok. Now the column Demo is set to "No",,,,,,,but the column "User" is still empty..... What is the second parameter of thisForm.wUserLogin ?


Implement wUserLogin() and wUserLogout() in your login form;
here is a sample code:
PROCEDURE txtpassword.Valid
if m.thisForm.wlHTMLGen && Added by FoxInCloud adaptation assistant (test) on 02/16/2011
return .T. && Process event on server
endif

SELECT USERS
LOCATE FOR .T.;
AND username = Alltrim(this.parent.txtUsername.Value);
AND Password = AllTrim(this.Value)

do case

case Empty(This.parent.txtUsername.value)
thisForm.wMessagebox("Please enter a user name.", 64, "Notify", 2500)
return -1

case Empty(This.Value)
thisForm.wMessagebox("Please enter a password.", 64, "Notify", 2500)

case !Found()
thisForm.wMessagebox("Either User Name or Password is invalid!", 16, "Notify", 2500)

case lInactive
thisForm.wMessagebox("Sorry, this account is now inactive..." + Chr(13) + Chr(13) + "Please use another account or contact STI for assistance.", 64, "Notify")

otherwise
thisForm.iUserID = Users.userID
thisForm.wUserLogin(Users.userID) && just this ...
thisForm.wForm('ip.scx', wlLAN(), Users.userID)

endcase
ENDPROC


How can i make the update of ActiveWidget ?








-- thn (FoxInCloud)

Gravatar is a globally recognized avatar based on your email address. Re: How to register a user to FAS
  Michele
  Thierry Nivelet (FoxInCloud)
  Aug 28, 2014 @ 06:02am
Probably today i am slow to understand........but in my app when a user logs i have a property in my main form where i set the usercode. This is the value i want to see in the user column in ths status page.......In mobserver.prg i added the function awusername(), but i don't understand whic code i have to insert once i have the user code in my login form.....


if you implement xxxProcess.wUserName(), the real names should appear ...


I want to set the user of the opened sessions like in the picture below


I meant 'set the user name on the foxincloud status page'


But i wanto set the User not to get it....In the Status page i have no users or User = "N/A"


to get the user name, you need to implement xxxProcess.wUserName()
you can see a code sample in ...\ab\aw\app\progs\xxxServer.prg


Ok. Now the column Demo is set to "No",,,,,,,but the column "User" is still empty..... What is the second parameter of thisForm.wUserLogin ?


Implement wUserLogin() and wUserLogout() in your login form;
here is a sample code:
PROCEDURE txtpassword.Valid
if m.thisForm.wlHTMLGen && Added by FoxInCloud adaptation assistant (test) on 02/16/2011
return .T. && Process event on server
endif

SELECT USERS
LOCATE FOR .T.;
AND username = Alltrim(this.parent.txtUsername.Value);
AND Password = AllTrim(this.Value)

do case

case Empty(This.parent.txtUsername.value)
thisForm.wMessagebox("Please enter a user name.", 64, "Notify", 2500)
return -1

case Empty(This.Value)
thisForm.wMessagebox("Please enter a password.", 64, "Notify", 2500)

case !Found()
thisForm.wMessagebox("Either User Name or Password is invalid!", 16, "Notify", 2500)

case lInactive
thisForm.wMessagebox("Sorry, this account is now inactive..." + Chr(13) + Chr(13) + "Please use another account or contact STI for assistance.", 64, "Notify")

otherwise
thisForm.iUserID = Users.userID
thisForm.wUserLogin(Users.userID) && just this ...
thisForm.wForm('ip.scx', wlLAN(), Users.userID)

endcase
ENDPROC


How can i make the update of ActiveWidget ?








Gravatar is a globally recognized avatar based on your email address. Re: How to register a user to FAS
  FoxInCloud Support - Thierry N.
  Michele
  Aug 28, 2014 @ 06:10am
it looks like you still have demo = 'yes' on each line
did you implement xxxFrm.wUserLogin()?


Probably today i am slow to understand........but in my app when a user logs i have a property in my main form where i set the usercode. This is the value i want to see in the user column in ths status page.......In mobserver.prg i added the function awusername(), but i don't understand whic code i have to insert once i have the user code in my login form.....


if you implement xxxProcess.wUserName(), the real names should appear ...


I want to set the user of the opened sessions like in the picture below


I meant 'set the user name on the foxincloud status page'


But i wanto set the User not to get it....In the Status page i have no users or User = "N/A"


to get the user name, you need to implement xxxProcess.wUserName()
you can see a code sample in ...\ab\aw\app\progs\xxxServer.prg


Ok. Now the column Demo is set to "No",,,,,,,but the column "User" is still empty..... What is the second parameter of thisForm.wUserLogin ?


Implement wUserLogin() and wUserLogout() in your login form;
here is a sample code:
PROCEDURE txtpassword.Valid
if m.thisForm.wlHTMLGen && Added by FoxInCloud adaptation assistant (test) on 02/16/2011
return .T. && Process event on server
endif

SELECT USERS
LOCATE FOR .T.;
AND username = Alltrim(this.parent.txtUsername.Value);
AND Password = AllTrim(this.Value)

do case

case Empty(This.parent.txtUsername.value)
thisForm.wMessagebox("Please enter a user name.", 64, "Notify", 2500)
return -1

case Empty(This.Value)
thisForm.wMessagebox("Please enter a password.", 64, "Notify", 2500)

case !Found()
thisForm.wMessagebox("Either User Name or Password is invalid!", 16, "Notify", 2500)

case lInactive
thisForm.wMessagebox("Sorry, this account is now inactive..." + Chr(13) + Chr(13) + "Please use another account or contact STI for assistance.", 64, "Notify")

otherwise
thisForm.iUserID = Users.userID
thisForm.wUserLogin(Users.userID) && just this ...
thisForm.wForm('ip.scx', wlLAN(), Users.userID)

endcase
ENDPROC


How can i make the update of ActiveWidget ?










-- thn (FoxInCloud)

Gravatar is a globally recognized avatar based on your email address. Re: How to register a user to FAS
  FoxInCloud Support - Thierry N.
  Michele
  Aug 29, 2014 @ 12:55am
OK, got it
form.wuserget() should return a value consistent with what you pass to .wuserlogin()


Probably today i am slow to understand........but in my app when a user logs i have a property in my main form where i set the usercode. This is the value i want to see in the user column in ths status page.......In mobserver.prg i added the function awusername(), but i don't understand whic code i have to insert once i have the user code in my login form.....


if you implement xxxProcess.wUserName(), the real names should appear ...


I want to set the user of the opened sessions like in the picture below


I meant 'set the user name on the foxincloud status page'


But i wanto set the User not to get it....In the Status page i have no users or User = "N/A"


to get the user name, you need to implement xxxProcess.wUserName()
you can see a code sample in ...\ab\aw\app\progs\xxxServer.prg


Ok. Now the column Demo is set to "No",,,,,,,but the column "User" is still empty..... What is the second parameter of thisForm.wUserLogin ?


Implement wUserLogin() and wUserLogout() in your login form;
here is a sample code:
PROCEDURE txtpassword.Valid
if m.thisForm.wlHTMLGen && Added by FoxInCloud adaptation assistant (test) on 02/16/2011
return .T. && Process event on server
endif

SELECT USERS
LOCATE FOR .T.;
AND username = Alltrim(this.parent.txtUsername.Value);
AND Password = AllTrim(this.Value)

do case

case Empty(This.parent.txtUsername.value)
thisForm.wMessagebox("Please enter a user name.", 64, "Notify", 2500)
return -1

case Empty(This.Value)
thisForm.wMessagebox("Please enter a password.", 64, "Notify", 2500)

case !Found()
thisForm.wMessagebox("Either User Name or Password is invalid!", 16, "Notify", 2500)

case lInactive
thisForm.wMessagebox("Sorry, this account is now inactive..." + Chr(13) + Chr(13) + "Please use another account or contact STI for assistance.", 64, "Notify")

otherwise
thisForm.iUserID = Users.userID
thisForm.wUserLogin(Users.userID) && just this ...
thisForm.wForm('ip.scx', wlLAN(), Users.userID)

endcase
ENDPROC


How can i make the update of ActiveWidget ?










-- thn (FoxInCloud)

© 1996-2024