AS400 服务器。提示“Role name [新增] not found”
系统AS400 .原本在window中运行正常.
代码段.
Set acl = pDatabase.ACL
Set entry = acl.GetEntry(pDocument.dispAclUser(0))
Forall r In acl.Roles
If r<>"" Then
If Not entry Is Nothing Then
If entry.IsRoleEnabled( r ) Then
提示最后一错.
问题应该不是出在角色上.如果把这个角色删除或改名,又会说下一个角色出错.
请高手指点.