RoleAuth makes your job and rejects other connection:
[TRoleAuth('ModuleAdmin')]
TAdmin = class(TBaseServerClass)
but this doesn't work. Why?
[TRoleAuth('ModuleAdmin')]
TDataModuleEmployee = class(TDSServerModule)
Asked
Active
Viewed 392 times
1
Alexey Gorozhanov
- 706
- 10
- 20
Liger
- 37
- 1
- 6
-
Are you sure you're not hitting http://stackoverflow.com/questions/5354812/delphi-datasnap-authorization-not-repecting-troleauth-attribute ? i.e. not having `DSAuth` in the uses clause for the interface of the module – Anya Shenanigans Sep 11 '12 at 14:13
-
uses WinApi.Windows, System.SysUtils, System.Classes, Datasnap.DSServer, DSAuth, Data.FMTBcd, Data.DB, Data.SqlExpr, Datasnap.DSClientMetadata,Datasnap.DSReflect,DSService, Datasnap.Provider,Datasnap.DBClient,DBXCommon,DataSnap.DSCommonServer,Datasnap.DataBkr; type {$METHODINFO ON} TDataModuleEmployee = class(TDSServerModule) – Liger Sep 11 '12 at 14:24