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)
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
endifSELECT 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 -1case 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)
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
endifSELECT 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 -1case 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 ?
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
endifSELECT 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 -1case 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)
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
endifSELECT 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 -1case 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 ?
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
endifSELECT 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 -1case 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)
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
endifSELECT 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 -1case 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 ?
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
endifSELECT 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 -1case 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)
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
endifSELECT 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 -1case 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 ?
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
endifSELECT 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 -1case 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)
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
endifSELECT 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 -1case 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)