home *** CD-ROM | disk | FTP | other *** search
| Unknown | 2004-05-10 | 29.8 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| file
| data
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 00 00 00 00 00 00 | 48 dd 03 2f 2f 3d 3d 3d |........|H..//===|
|00000010| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000020| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000030| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000040| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000050| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 0d 0a 2f 2f 20 |========|===..// |
|00000060| 20 57 65 62 41 64 6d 69 | 6e 20 68 61 6e 64 6c 65 | WebAdmi|n handle|
|00000070| 72 20 66 6f 72 20 61 63 | 74 69 76 69 74 69 65 73 |r for ac|tivities|
|00000080| 20 72 65 6c 61 74 65 64 | 20 74 6f 20 6d 61 6e 61 | related| to mana|
|00000090| 67 69 6e 67 20 74 68 65 | 20 75 73 65 72 73 20 2f |ging the| users /|
|000000a0| 20 67 72 6f 75 70 73 0d | 0a 2f 2f 09 74 68 61 74 | groups.|.//.that|
|000000b0| 20 61 72 65 20 61 6c 6c | 6f 77 65 64 20 74 6f 20 | are all|owed to |
|000000c0| 6c 6f 67 20 69 6e 74 6f | 20 74 68 65 20 73 65 72 |log into| the ser|
|000000d0| 76 65 72 0d 0a 2f 2f 0d | 0a 2f 2f 20 20 57 72 69 |ver..//.|.// Wri|
|000000e0| 74 74 65 6e 20 62 79 20 | 4d 69 63 68 61 65 6c 20 |tten by |Michael |
|000000f0| 43 6f 6d 65 61 75 0d 0a | 2f 2f 20 20 52 65 76 69 |Comeau..|// Revi|
|00000100| 73 65 64 20 62 79 20 52 | 6f 6e 20 50 72 65 73 74 |sed by R|on Prest|
|00000110| 65 6e 62 61 63 6b 0d 0a | 2f 2f 20 20 a9 20 32 30 |enback..|// . 20|
|00000120| 30 33 2c 32 30 30 34 20 | 45 70 69 63 20 47 61 6d |03,2004 |Epic Gam|
|00000130| 65 73 2c 20 49 6e 63 2e | 20 41 6c 6c 20 52 69 67 |es, Inc.| All Rig|
|00000140| 68 74 73 20 52 65 73 65 | 72 76 65 64 0d 0a 2f 2f |hts Rese|rved..//|
|00000150| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000160| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000170| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000180| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000190| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 0d 0a |========|======..|
|000001a0| 0d 0a 63 6c 61 73 73 20 | 78 57 65 62 51 75 65 72 |..class |xWebQuer|
|000001b0| 79 41 64 6d 69 6e 73 20 | 65 78 74 65 6e 64 73 20 |yAdmins |extends |
|000001c0| 78 57 65 62 51 75 65 72 | 79 48 61 6e 64 6c 65 72 |xWebQuer|yHandler|
|000001d0| 0d 0a 09 63 6f 6e 66 69 | 67 3b 0d 0a 0d 0a 2f 2f |...confi|g;....//|
|000001e0| 20 54 4f 44 4f 3a 0d 0a | 2f 2f 20 46 69 78 20 6c | TODO:..|// Fix l|
|000001f0| 6f 67 20 73 70 61 6d 20 | 69 6e 20 61 64 64 69 6e |og spam |in addin|
|00000200| 67 20 67 72 6f 75 70 73 | 20 66 75 6e 63 74 69 6f |g groups| functio|
|00000210| 6e 0d 0a 0d 0a 73 74 72 | 75 63 74 20 52 6f 77 47 |n....str|uct RowG|
|00000220| 72 6f 75 70 20 7b 20 76 | 61 72 20 61 72 72 61 79 |roup { v|ar array|
|00000230| 3c 73 74 72 69 6e 67 3e | 09 72 6f 77 73 3b 20 7d |<string>|.rows; }|
|00000240| 3b 0d 0a 0d 0a 76 61 72 | 20 63 6f 6e 66 69 67 20 |;....var| config |
|00000250| 73 74 72 69 6e 67 20 41 | 64 6d 69 6e 73 49 6e 64 |string A|dminsInd|
|00000260| 65 78 50 61 67 65 3b 0d | 0a 76 61 72 20 63 6f 6e |exPage;.|.var con|
|00000270| 66 69 67 20 73 74 72 69 | 6e 67 20 55 73 65 72 73 |fig stri|ng Users|
|00000280| 48 6f 6d 65 50 61 67 65 | 3b 0d 0a 76 61 72 20 63 |HomePage|;..var c|
|00000290| 6f 6e 66 69 67 20 73 74 | 72 69 6e 67 20 55 73 65 |onfig st|ring Use|
|000002a0| 72 73 41 63 63 6f 75 6e | 74 50 61 67 65 3b 0d 0a |rsAccoun|tPage;..|
|000002b0| 76 61 72 20 63 6f 6e 66 | 69 67 20 73 74 72 69 6e |var conf|ig strin|
|000002c0| 67 20 55 73 65 72 73 41 | 64 64 50 61 67 65 3b 0d |g UsersA|ddPage;.|
|000002d0| 0a 76 61 72 20 63 6f 6e | 66 69 67 20 73 74 72 69 |.var con|fig stri|
|000002e0| 6e 67 20 55 73 65 72 73 | 42 72 6f 77 73 65 50 61 |ng Users|BrowsePa|
|000002f0| 67 65 3b 0d 0a 76 61 72 | 20 63 6f 6e 66 69 67 20 |ge;..var| config |
|00000300| 73 74 72 69 6e 67 20 55 | 73 65 72 73 45 64 69 74 |string U|sersEdit|
|00000310| 50 61 67 65 3b 0d 0a 76 | 61 72 20 63 6f 6e 66 69 |Page;..v|ar confi|
|00000320| 67 20 73 74 72 69 6e 67 | 20 55 73 65 72 73 47 72 |g string| UsersGr|
|00000330| 6f 75 70 73 50 61 67 65 | 3b 0d 0a 76 61 72 20 63 |oupsPage|;..var c|
|00000340| 6f 6e 66 69 67 20 73 74 | 72 69 6e 67 20 55 73 65 |onfig st|ring Use|
|00000350| 72 73 4d 47 72 6f 75 70 | 73 50 61 67 65 3b 0d 0a |rsMGroup|sPage;..|
|00000360| 76 61 72 20 63 6f 6e 66 | 69 67 20 73 74 72 69 6e |var conf|ig strin|
|00000370| 67 20 47 72 6f 75 70 73 | 41 64 64 50 61 67 65 3b |g Groups|AddPage;|
|00000380| 0d 0a 76 61 72 20 63 6f | 6e 66 69 67 20 73 74 72 |..var co|nfig str|
|00000390| 69 6e 67 20 47 72 6f 75 | 70 73 42 72 6f 77 73 65 |ing Grou|psBrowse|
|000003a0| 50 61 67 65 3b 0d 0a 76 | 61 72 20 63 6f 6e 66 69 |Page;..v|ar confi|
|000003b0| 67 20 73 74 72 69 6e 67 | 20 47 72 6f 75 70 73 45 |g string| GroupsE|
|000003c0| 64 69 74 50 61 67 65 3b | 0d 0a 0d 0a 76 61 72 20 |ditPage;|....var |
|000003d0| 63 6f 6e 66 69 67 20 73 | 74 72 69 6e 67 20 50 72 |config s|tring Pr|
|000003e0| 69 76 69 6c 65 67 65 54 | 61 62 6c 65 3b 0d 0a 0d |ivilegeT|able;...|
|000003f0| 0a 2f 2f 20 4c 6f 63 61 | 6c 69 7a 61 74 69 6f 6e |.// Loca|lization|
|00000400| 0d 0a 76 61 72 20 6c 6f | 63 61 6c 69 7a 65 64 20 |..var lo|calized |
|00000410| 73 74 72 69 6e 67 20 4e | 6f 74 65 55 73 65 72 48 |string N|oteUserH|
|00000420| 6f 6d 65 50 61 67 65 3b | 0d 0a 76 61 72 20 6c 6f |omePage;|..var lo|
|00000430| 63 61 6c 69 7a 65 64 20 | 73 74 72 69 6e 67 20 4e |calized |string N|
|00000440| 6f 74 65 41 63 63 6f 75 | 6e 74 50 61 67 65 3b 0d |oteAccou|ntPage;.|
|00000450| 0a 76 61 72 20 6c 6f 63 | 61 6c 69 7a 65 64 20 73 |.var loc|alized s|
|00000460| 74 72 69 6e 67 20 4e 6f | 74 65 55 73 65 72 41 64 |tring No|teUserAd|
|00000470| 64 50 61 67 65 3b 0d 0a | 76 61 72 20 6c 6f 63 61 |dPage;..|var loca|
|00000480| 6c 69 7a 65 64 20 73 74 | 72 69 6e 67 20 4e 6f 74 |lized st|ring Not|
|00000490| 65 55 73 65 72 45 64 69 | 74 50 61 67 65 3b 0d 0a |eUserEdi|tPage;..|
|000004a0| 76 61 72 20 6c 6f 63 61 | 6c 69 7a 65 64 20 73 74 |var loca|lized st|
|000004b0| 72 69 6e 67 20 4e 6f 74 | 65 55 73 65 72 73 42 72 |ring Not|eUsersBr|
|000004c0| 6f 77 73 65 50 61 67 65 | 3b 0d 0a 76 61 72 20 6c |owsePage|;..var l|
|000004d0| 6f 63 61 6c 69 7a 65 64 | 20 73 74 72 69 6e 67 20 |ocalized| string |
|000004e0| 4e 6f 74 65 47 72 6f 75 | 70 41 64 64 50 61 67 65 |NoteGrou|pAddPage|
|000004f0| 3b 0d 0a 76 61 72 20 6c | 6f 63 61 6c 69 7a 65 64 |;..var l|ocalized|
|00000500| 20 73 74 72 69 6e 67 20 | 4e 6f 74 65 47 72 6f 75 | string |NoteGrou|
|00000510| 70 45 64 69 74 50 61 67 | 65 3b 0d 0a 76 61 72 20 |pEditPag|e;..var |
|00000520| 6c 6f 63 61 6c 69 7a 65 | 64 20 73 74 72 69 6e 67 |localize|d string|
|00000530| 20 4e 6f 74 65 47 72 6f | 75 70 73 42 72 6f 77 73 | NoteGro|upsBrows|
|00000540| 65 50 61 67 65 3b 0d 0a | 76 61 72 20 6c 6f 63 61 |ePage;..|var loca|
|00000550| 6c 69 7a 65 64 20 73 74 | 72 69 6e 67 20 4e 6f 74 |lized st|ring Not|
|00000560| 65 47 72 6f 75 70 41 63 | 63 65 73 73 50 61 67 65 |eGroupAc|cessPage|
|00000570| 3b 0d 0a 76 61 72 20 6c | 6f 63 61 6c 69 7a 65 64 |;..var l|ocalized|
|00000580| 20 73 74 72 69 6e 67 20 | 4e 6f 74 65 4d 47 72 6f | string |NoteMGro|
|00000590| 75 70 41 63 63 65 73 73 | 50 61 67 65 3b 0d 0a 0d |upAccess|Page;...|
|000005a0| 0a 2f 2f 20 53 69 6e 67 | 6c 65 20 77 6f 72 64 73 |.// Sing|le words|
|000005b0| 0d 0a 76 61 72 20 6c 6f | 63 61 6c 69 7a 65 64 20 |..var lo|calized |
|000005c0| 73 74 72 69 6e 67 20 4e | 61 6d 65 54 65 78 74 3b |string N|ameText;|
|000005d0| 0d 0a 76 61 72 20 6c 6f | 63 61 6c 69 7a 65 64 20 |..var lo|calized |
|000005e0| 73 74 72 69 6e 67 20 44 | 65 6c 65 74 69 6e 67 3b |string D|eleting;|
|000005f0| 0d 0a 76 61 72 20 6c 6f | 63 61 6c 69 7a 65 64 20 |..var lo|calized |
|00000600| 73 74 72 69 6e 67 20 47 | 72 6f 75 70 3b 0d 0a 76 |string G|roup;..v|
|00000610| 61 72 20 6c 6f 63 61 6c | 69 7a 65 64 20 73 74 72 |ar local|ized str|
|00000620| 69 6e 67 20 47 72 6f 75 | 70 73 3b 0d 0a 76 61 72 |ing Grou|ps;..var|
|00000630| 20 6c 6f 63 61 6c 69 7a | 65 64 20 73 74 72 69 6e | localiz|ed strin|
|00000640| 67 20 55 73 65 72 3b 0d | 0a 76 61 72 20 6c 6f 63 |g User;.|.var loc|
|00000650| 61 6c 69 7a 65 64 20 73 | 74 72 69 6e 67 20 4d 6f |alized s|tring Mo|
|00000660| 64 69 66 79 3b 0d 0a 76 | 61 72 20 6c 6f 63 61 6c |dify;..v|ar local|
|00000670| 69 7a 65 64 20 73 74 72 | 69 6e 67 20 4d 61 6e 61 |ized str|ing Mana|
|00000680| 67 65 64 3b 0d 0a 76 61 | 72 20 6c 6f 63 61 6c 69 |ged;..va|r locali|
|00000690| 7a 65 64 20 73 74 72 69 | 6e 67 20 50 72 69 76 69 |zed stri|ng Privi|
|000006a0| 6c 65 67 65 73 3b 0d 0a | 76 61 72 20 6c 6f 63 61 |leges;..|var loca|
|000006b0| 6c 69 7a 65 64 20 73 74 | 72 69 6e 67 20 53 65 63 |lized st|ring Sec|
|000006c0| 75 72 69 74 79 4c 65 76 | 65 6c 3b 0d 0a 0d 0a 2f |urityLev|el;..../|
|000006d0| 2f 20 54 69 74 6c 65 20 | 26 20 53 65 63 74 69 6f |/ Title |& Sectio|
|000006e0| 6e 20 4e 61 6d 65 73 0d | 0a 76 61 72 20 6c 6f 63 |n Names.|.var loc|
|000006f0| 61 6c 69 7a 65 64 20 73 | 74 72 69 6e 67 20 41 64 |alized s|tring Ad|
|00000700| 6d 69 6e 50 61 67 65 54 | 69 74 6c 65 3b 0d 0a 76 |minPageT|itle;..v|
|00000710| 61 72 20 6c 6f 63 61 6c | 69 7a 65 64 20 73 74 72 |ar local|ized str|
|00000720| 69 6e 67 20 41 64 6d 69 | 6e 48 6f 6d 65 54 69 74 |ing Admi|nHomeTit|
|00000730| 6c 65 3b 0d 0a 76 61 72 | 20 6c 6f 63 61 6c 69 7a |le;..var| localiz|
|00000740| 65 64 20 73 74 72 69 6e | 67 20 41 64 6d 69 6e 41 |ed strin|g AdminA|
|00000750| 63 63 6f 75 6e 74 54 69 | 74 6c 65 3b 0d 0a 76 61 |ccountTi|tle;..va|
|00000760| 72 20 6c 6f 63 61 6c 69 | 7a 65 64 20 73 74 72 69 |r locali|zed stri|
|00000770| 6e 67 20 42 72 6f 77 73 | 65 55 73 65 72 73 54 69 |ng Brows|eUsersTi|
|00000780| 74 6c 65 3b 0d 0a 76 61 | 72 20 6c 6f 63 61 6c 69 |tle;..va|r locali|
|00000790| 7a 65 64 20 73 74 72 69 | 6e 67 20 42 72 6f 77 73 |zed stri|ng Brows|
|000007a0| 65 47 72 6f 75 70 73 54 | 69 74 6c 65 3b 0d 0a 76 |eGroupsT|itle;..v|
|000007b0| 61 72 20 6c 6f 63 61 6c | 69 7a 65 64 20 73 74 72 |ar local|ized str|
|000007c0| 69 6e 67 20 41 64 64 55 | 73 65 72 54 69 74 6c 65 |ing AddU|serTitle|
|000007d0| 3b 0d 0a 76 61 72 20 6c | 6f 63 61 6c 69 7a 65 64 |;..var l|ocalized|
|000007e0| 20 73 74 72 69 6e 67 20 | 41 64 64 55 73 65 72 42 | string |AddUserB|
|000007f0| 75 74 74 6f 6e 3b 0d 0a | 76 61 72 20 6c 6f 63 61 |utton;..|var loca|
|00000800| 6c 69 7a 65 64 20 73 74 | 72 69 6e 67 20 41 64 64 |lized st|ring Add|
|00000810| 47 72 6f 75 70 54 69 74 | 6c 65 3b 0d 0a 76 61 72 |GroupTit|le;..var|
|00000820| 20 6c 6f 63 61 6c 69 7a | 65 64 20 73 74 72 69 6e | localiz|ed strin|
|00000830| 67 20 41 64 64 47 72 6f | 75 70 42 75 74 74 6f 6e |g AddGro|upButton|
|00000840| 3b 0d 0a 76 61 72 20 6c | 6f 63 61 6c 69 7a 65 64 |;..var l|ocalized|
|00000850| 20 73 74 72 69 6e 67 20 | 45 64 69 74 55 73 65 72 | string |EditUser|
|00000860| 54 69 74 6c 65 3b 0d 0a | 76 61 72 20 6c 6f 63 61 |Title;..|var loca|
|00000870| 6c 69 7a 65 64 20 73 74 | 72 69 6e 67 20 45 64 69 |lized st|ring Edi|
|00000880| 74 55 73 65 72 42 75 74 | 74 6f 6e 3b 0d 0a 76 61 |tUserBut|ton;..va|
|00000890| 72 20 6c 6f 63 61 6c 69 | 7a 65 64 20 73 74 72 69 |r locali|zed stri|
|000008a0| 6e 67 20 45 64 69 74 47 | 72 6f 75 70 54 69 74 6c |ng EditG|roupTitl|
|000008b0| 65 3b 0d 0a 76 61 72 20 | 6c 6f 63 61 6c 69 7a 65 |e;..var |localize|
|000008c0| 64 20 73 74 72 69 6e 67 | 20 45 64 69 74 47 72 6f |d string| EditGro|
|000008d0| 75 70 42 75 74 74 6f 6e | 3b 0d 0a 76 61 72 20 6c |upButton|;..var l|
|000008e0| 6f 63 61 6c 69 7a 65 64 | 20 73 74 72 69 6e 67 20 |ocalized| string |
|000008f0| 4d 6f 64 69 66 79 55 73 | 65 72 47 72 6f 75 70 3b |ModifyUs|erGroup;|
|00000900| 0d 0a 76 61 72 20 6c 6f | 63 61 6c 69 7a 65 64 20 |..var lo|calized |
|00000910| 73 74 72 69 6e 67 20 4d | 6f 64 69 66 79 4d 55 73 |string M|odifyMUs|
|00000920| 65 72 47 72 6f 75 70 3b | 0d 0a 0d 0a 2f 2f 20 53 |erGroup;|....// S|
|00000930| 74 61 74 75 73 20 6d 65 | 73 73 61 67 65 73 0d 0a |tatus me|ssages..|
|00000940| 76 61 72 20 6c 6f 63 61 | 6c 69 7a 65 64 20 73 74 |var loca|lized st|
|00000950| 72 69 6e 67 20 55 73 65 | 72 52 65 6d 6f 76 65 64 |ring Use|rRemoved|
|00000960| 3b 0d 0a 76 61 72 20 6c | 6f 63 61 6c 69 7a 65 64 |;..var l|ocalized|
|00000970| 20 73 74 72 69 6e 67 20 | 47 72 6f 75 70 52 65 6d | string |GroupRem|
|00000980| 6f 76 65 64 3b 0d 0a 0d | 0a 0d 0a 2f 2f 20 45 72 |oved;...|...// Er|
|00000990| 72 6f 72 20 4d 65 73 73 | 61 67 65 73 0d 0a 76 61 |ror Mess|ages..va|
|000009a0| 72 20 6c 6f 63 61 6c 69 | 7a 65 64 20 73 74 72 69 |r locali|zed stri|
|000009b0| 6e 67 20 41 64 6d 69 6e | 4e 6f 74 46 6f 75 6e 64 |ng Admin|NotFound|
|000009c0| 3b 0d 0a 76 61 72 20 6c | 6f 63 61 6c 69 7a 65 64 |;..var l|ocalized|
|000009d0| 20 73 74 72 69 6e 67 20 | 47 72 6f 75 70 4e 6f 74 | string |GroupNot|
|000009e0| 46 6f 75 6e 64 3b 0d 0a | 76 61 72 20 6c 6f 63 61 |Found;..|var loca|
|000009f0| 6c 69 7a 65 64 20 73 74 | 72 69 6e 67 20 50 72 69 |lized st|ring Pri|
|00000a00| 76 54 69 74 6c 65 3b 0d | 0a 0d 0a 76 61 72 20 6c |vTitle;.|...var l|
|00000a10| 6f 63 61 6c 69 7a 65 64 | 20 73 74 72 69 6e 67 20 |ocalized| string |
|00000a20| 4e 6f 6e 65 54 65 78 74 | 3b 0d 0a 76 61 72 20 6c |NoneText|;..var l|
|00000a30| 6f 63 61 6c 69 7a 65 64 | 20 73 74 72 69 6e 67 20 |ocalized| string |
|00000a40| 4e 6f 6e 65 49 74 65 6d | 54 65 78 74 3b 0d 0a 76 |NoneItem|Text;..v|
|00000a50| 61 72 20 6c 6f 63 61 6c | 69 7a 65 64 20 73 74 72 |ar local|ized str|
|00000a60| 69 6e 67 20 50 61 73 73 | 77 6f 72 64 45 72 72 6f |ing Pass|wordErro|
|00000a70| 72 3b 0d 0a 76 61 72 20 | 6c 6f 63 61 6c 69 7a 65 |r;..var |localize|
|00000a80| 64 20 73 74 72 69 6e 67 | 20 49 6e 73 75 66 66 69 |d string| Insuffi|
|00000a90| 63 69 65 6e 74 50 72 69 | 76 73 3b 0d 0a 76 61 72 |cientPri|vs;..var|
|00000aa0| 20 6c 6f 63 61 6c 69 7a | 65 64 20 73 74 72 69 6e | localiz|ed strin|
|00000ab0| 67 20 49 6e 76 61 6c 69 | 64 49 74 65 6d 3b 0d 0a |g Invali|dItem;..|
|00000ac0| 76 61 72 20 6c 6f 63 61 | 6c 69 7a 65 64 20 73 74 |var loca|lized st|
|00000ad0| 72 69 6e 67 20 49 6e 76 | 61 6c 69 64 43 68 61 72 |ring Inv|alidChar|
|00000ae0| 61 63 74 65 72 73 3b 0d | 0a 76 61 72 20 6c 6f 63 |acters;.|.var loc|
|00000af0| 61 6c 69 7a 65 64 20 73 | 74 72 69 6e 67 20 4e 61 |alized s|tring Na|
|00000b00| 6d 65 45 78 69 73 74 73 | 3b 0d 0a 76 61 72 20 6c |meExists|;..var l|
|00000b10| 6f 63 61 6c 69 7a 65 64 | 20 73 74 72 69 6e 67 20 |ocalized| string |
|00000b20| 59 6f 75 4d 75 73 74 53 | 65 6c 65 63 74 3b 0d 0a |YouMustS|elect;..|
|00000b30| 76 61 72 20 6c 6f 63 61 | 6c 69 7a 65 64 20 73 74 |var loca|lized st|
|00000b40| 72 69 6e 67 20 44 6f 65 | 73 4e 6f 74 45 78 69 73 |ring Doe|sNotExis|
|00000b50| 74 3b 0d 0a 76 61 72 20 | 6c 6f 63 61 6c 69 7a 65 |t;..var |localize|
|00000b60| 64 20 73 74 72 69 6e 67 | 20 43 6f 75 6c 64 4e 6f |d string| CouldNo|
|00000b70| 74 43 72 65 61 74 65 3b | 0d 0a 76 61 72 20 6c 6f |tCreate;|..var lo|
|00000b80| 63 61 6c 69 7a 65 64 20 | 73 74 72 69 6e 67 20 4e |calized |string N|
|00000b90| 65 67 53 65 63 4c 65 76 | 65 6c 3b 0d 0a 76 61 72 |egSecLev|el;..var|
|00000ba0| 20 6c 6f 63 61 6c 69 7a | 65 64 20 73 74 72 69 6e | localiz|ed strin|
|00000bb0| 67 20 43 61 6e 6e 6f 74 | 41 73 73 69 67 6e 48 69 |g Cannot|AssignHi|
|00000bc0| 67 68 65 72 3b 0d 0a 76 | 61 72 20 6c 6f 63 61 6c |gher;..v|ar local|
|00000bd0| 69 7a 65 64 20 73 74 72 | 69 6e 67 20 43 61 6e 6e |ized str|ing Cann|
|00000be0| 6f 74 41 73 73 69 67 6e | 50 72 69 76 73 3b 0d 0a |otAssign|Privs;..|
|00000bf0| 0d 0a 66 75 6e 63 74 69 | 6f 6e 20 62 6f 6f 6c 20 |..functi|on bool |
|00000c00| 51 75 65 72 79 28 57 65 | 62 52 65 71 75 65 73 74 |Query(We|bRequest|
|00000c10| 20 52 65 71 75 65 73 74 | 2c 20 57 65 62 52 65 73 | Request|, WebRes|
|00000c20| 70 6f 6e 73 65 20 52 65 | 73 70 6f 6e 73 65 29 0d |ponse Re|sponse).|
|00000c30| 0a 7b 0d 0a 09 69 66 20 | 28 21 43 61 6e 50 65 72 |.{...if |(!CanPer|
|00000c40| 66 6f 72 6d 28 4e 65 65 | 64 65 64 50 72 69 76 73 |form(Nee|dedPrivs|
|00000c50| 29 29 0d 0a 09 09 72 65 | 74 75 72 6e 20 66 61 6c |))....re|turn fal|
|00000c60| 73 65 3b 0d 0a 0d 0a 09 | 73 77 69 74 63 68 20 28 |se;.....|switch (|
|00000c70| 4d 69 64 28 52 65 71 75 | 65 73 74 2e 55 52 49 2c |Mid(Requ|est.URI,|
|00000c80| 20 31 29 29 0d 0a 09 7b | 0d 0a 09 63 61 73 65 20 | 1))...{|...case |
|00000c90| 44 65 66 61 75 6c 74 50 | 61 67 65 3a 09 09 51 75 |DefaultP|age:..Qu|
|00000ca0| 65 72 79 41 64 6d 69 6e | 73 46 72 61 6d 65 28 52 |eryAdmin|sFrame(R|
|00000cb0| 65 71 75 65 73 74 2c 20 | 52 65 73 70 6f 6e 73 65 |equest, |Response|
|00000cc0| 29 3b 20 72 65 74 75 72 | 6e 20 74 72 75 65 3b 0d |); retur|n true;.|
|00000cd0| 0a 09 63 61 73 65 20 41 | 64 6d 69 6e 73 49 6e 64 |..case A|dminsInd|
|00000ce0| 65 78 50 61 67 65 3a 09 | 51 75 65 72 79 41 64 6d |exPage:.|QueryAdm|
|00000cf0| 69 6e 73 4d 65 6e 75 28 | 52 65 71 75 65 73 74 2c |insMenu(|Request,|
|00000d00| 20 52 65 73 70 6f 6e 73 | 65 29 3b 20 72 65 74 75 | Respons|e); retu|
|00000d10| 72 6e 20 74 72 75 65 3b | 0d 0a 0d 0a 09 63 61 73 |rn true;|.....cas|
|00000d20| 65 20 55 73 65 72 73 48 | 6f 6d 65 50 61 67 65 3a |e UsersH|omePage:|
|00000d30| 09 09 69 66 20 28 21 4d | 61 70 49 73 43 68 61 6e |..if (!M|apIsChan|
|00000d40| 67 69 6e 67 28 29 29 20 | 51 75 65 72 79 55 73 65 |ging()) |QueryUse|
|00000d50| 72 73 48 6f 6d 65 50 61 | 67 65 28 52 65 71 75 65 |rsHomePa|ge(Reque|
|00000d60| 73 74 2c 20 52 65 73 70 | 6f 6e 73 65 29 3b 20 72 |st, Resp|onse); r|
|00000d70| 65 74 75 72 6e 20 74 72 | 75 65 3b 0d 0a 09 63 61 |eturn tr|ue;...ca|
|00000d80| 73 65 20 55 73 65 72 73 | 41 63 63 6f 75 6e 74 50 |se Users|AccountP|
|00000d90| 61 67 65 3a 09 69 66 20 | 28 21 4d 61 70 49 73 43 |age:.if |(!MapIsC|
|00000da0| 68 61 6e 67 69 6e 67 28 | 29 29 20 51 75 65 72 79 |hanging(|)) Query|
|00000db0| 55 73 65 72 41 63 63 6f | 75 6e 74 50 61 67 65 28 |UserAcco|untPage(|
|00000dc0| 52 65 71 75 65 73 74 2c | 20 52 65 73 70 6f 6e 73 |Request,| Respons|
|00000dd0| 65 29 3b 20 72 65 74 75 | 72 6e 20 74 72 75 65 3b |e); retu|rn true;|
|00000de0| 0d 0a 09 63 61 73 65 20 | 55 73 65 72 73 42 72 6f |...case |UsersBro|
|00000df0| 77 73 65 50 61 67 65 3a | 09 69 66 20 28 21 4d 61 |wsePage:|.if (!Ma|
|00000e00| 70 49 73 43 68 61 6e 67 | 69 6e 67 28 29 29 20 51 |pIsChang|ing()) Q|
|00000e10| 75 65 72 79 55 73 65 72 | 73 42 72 6f 77 73 65 50 |ueryUser|sBrowseP|
|00000e20| 61 67 65 28 52 65 71 75 | 65 73 74 2c 20 52 65 73 |age(Requ|est, Res|
|00000e30| 70 6f 6e 73 65 29 3b 20 | 72 65 74 75 72 6e 20 74 |ponse); |return t|
|00000e40| 72 75 65 3b 0d 0a 09 63 | 61 73 65 20 55 73 65 72 |rue;...c|ase User|
|00000e50| 73 41 64 64 50 61 67 65 | 3a 09 09 69 66 20 28 21 |sAddPage|:..if (!|
|00000e60| 4d 61 70 49 73 43 68 61 | 6e 67 69 6e 67 28 29 29 |MapIsCha|nging())|
|00000e70| 20 51 75 65 72 79 55 73 | 65 72 73 41 64 64 50 61 | QueryUs|ersAddPa|
|00000e80| 67 65 28 52 65 71 75 65 | 73 74 2c 20 52 65 73 70 |ge(Reque|st, Resp|
|00000e90| 6f 6e 73 65 29 3b 20 72 | 65 74 75 72 6e 20 74 72 |onse); r|eturn tr|
|00000ea0| 75 65 3b 0d 0a 09 63 61 | 73 65 20 55 73 65 72 73 |ue;...ca|se Users|
|00000eb0| 45 64 69 74 50 61 67 65 | 3a 09 09 69 66 20 28 21 |EditPage|:..if (!|
|00000ec0| 4d 61 70 49 73 43 68 61 | 6e 67 69 6e 67 28 29 29 |MapIsCha|nging())|
|00000ed0| 20 51 75 65 72 79 55 73 | 65 72 73 45 64 69 74 50 | QueryUs|ersEditP|
|00000ee0| 61 67 65 28 52 65 71 75 | 65 73 74 2c 20 52 65 73 |age(Requ|est, Res|
|00000ef0| 70 6f 6e 73 65 29 3b 20 | 72 65 74 75 72 6e 20 74 |ponse); |return t|
|00000f00| 72 75 65 3b 0d 0a 09 63 | 61 73 65 20 55 73 65 72 |rue;...c|ase User|
|00000f10| 73 47 72 6f 75 70 73 50 | 61 67 65 3a 09 69 66 20 |sGroupsP|age:.if |
|00000f20| 28 21 4d 61 70 49 73 43 | 68 61 6e 67 69 6e 67 28 |(!MapIsC|hanging(|
|00000f30| 29 29 20 51 75 65 72 79 | 55 73 65 72 73 47 72 6f |)) Query|UsersGro|
|00000f40| 75 70 73 50 61 67 65 28 | 52 65 71 75 65 73 74 2c |upsPage(|Request,|
|00000f50| 20 52 65 73 70 6f 6e 73 | 65 29 3b 20 72 65 74 75 | Respons|e); retu|
|00000f60| 72 6e 20 74 72 75 65 3b | 0d 0a 09 63 61 73 65 20 |rn true;|...case |
|00000f70| 55 73 65 72 73 4d 47 72 | 6f 75 70 73 50 61 67 65 |UsersMGr|oupsPage|
|00000f80| 3a 09 69 66 20 28 21 4d | 61 70 49 73 43 68 61 6e |:.if (!M|apIsChan|
|00000f90| 67 69 6e 67 28 29 29 20 | 51 75 65 72 79 55 73 65 |ging()) |QueryUse|
|00000fa0| 72 73 4d 47 72 6f 75 70 | 73 50 61 67 65 28 52 65 |rsMGroup|sPage(Re|
|00000fb0| 71 75 65 73 74 2c 20 52 | 65 73 70 6f 6e 73 65 29 |quest, R|esponse)|
|00000fc0| 3b 20 72 65 74 75 72 6e | 20 74 72 75 65 3b 0d 0a |; return| true;..|
|00000fd0| 09 63 61 73 65 20 47 72 | 6f 75 70 73 42 72 6f 77 |.case Gr|oupsBrow|
|00000fe0| 73 65 50 61 67 65 3a 09 | 69 66 20 28 21 4d 61 70 |sePage:.|if (!Map|
|00000ff0| 49 73 43 68 61 6e 67 69 | 6e 67 28 29 29 20 51 75 |IsChangi|ng()) Qu|
|00001000| 65 72 79 47 72 6f 75 70 | 73 42 72 6f 77 73 65 50 |eryGroup|sBrowseP|
|00001010| 61 67 65 28 52 65 71 75 | 65 73 74 2c 20 52 65 73 |age(Requ|est, Res|
|00001020| 70 6f 6e 73 65 29 3b 20 | 72 65 74 75 72 6e 20 74 |ponse); |return t|
|00001030| 72 75 65 3b 0d 0a 09 63 | 61 73 65 20 47 72 6f 75 |rue;...c|ase Grou|
|00001040| 70 73 41 64 64 50 61 67 | 65 3a 09 09 69 66 20 28 |psAddPag|e:..if (|
|00001050| 21 4d 61 70 49 73 43 68 | 61 6e 67 69 6e 67 28 29 |!MapIsCh|anging()|
|00001060| 29 20 51 75 65 72 79 47 | 72 6f 75 70 73 41 64 64 |) QueryG|roupsAdd|
|00001070| 50 61 67 65 28 52 65 71 | 75 65 73 74 2c 20 52 65 |Page(Req|uest, Re|
|00001080| 73 70 6f 6e 73 65 29 3b | 20 72 65 74 75 72 6e 20 |sponse);| return |
|00001090| 74 72 75 65 3b 0d 0a 09 | 63 61 73 65 20 47 72 6f |true;...|case Gro|
|000010a0| 75 70 73 45 64 69 74 50 | 61 67 65 3a 09 69 66 20 |upsEditP|age:.if |
|000010b0| 28 21 4d 61 70 49 73 43 | 68 61 6e 67 69 6e 67 28 |(!MapIsC|hanging(|
|000010c0| 29 29 20 51 75 65 72 79 | 47 72 6f 75 70 73 45 64 |)) Query|GroupsEd|
|000010d0| 69 74 50 61 67 65 28 52 | 65 71 75 65 73 74 2c 20 |itPage(R|equest, |
|000010e0| 52 65 73 70 6f 6e 73 65 | 29 3b 20 72 65 74 75 72 |Response|); retur|
|000010f0| 6e 20 74 72 75 65 3b 0d | 0a 09 7d 0d 0a 09 72 65 |n true;.|..}...re|
|00001100| 74 75 72 6e 20 66 61 6c | 73 65 3b 0d 0a 7d 0d 0a |turn fal|se;..}..|
|00001110| 0d 0a 66 75 6e 63 74 69 | 6f 6e 20 51 75 65 72 79 |..functi|on Query|
|00001120| 41 64 6d 69 6e 73 46 72 | 61 6d 65 28 57 65 62 52 |AdminsFr|ame(WebR|
|00001130| 65 71 75 65 73 74 20 52 | 65 71 75 65 73 74 2c 20 |equest R|equest, |
|00001140| 57 65 62 52 65 73 70 6f | 6e 73 65 20 52 65 73 70 |WebRespo|nse Resp|
|00001150| 6f 6e 73 65 29 0d 0a 7b | 0d 0a 6c 6f 63 61 6c 20 |onse)..{|..local |
|00001160| 53 74 72 69 6e 67 20 50 | 61 67 65 3b 0d 0a 0d 0a |String P|age;....|
|00001170| 09 2f 2f 20 69 66 20 6e | 6f 20 70 61 67 65 20 73 |.// if n|o page s|
|00001180| 70 65 63 69 66 69 65 64 | 2c 20 75 73 65 20 74 68 |pecified|, use th|
|00001190| 65 20 64 65 66 61 75 6c | 74 0d 0a 09 50 61 67 65 |e defaul|t...Page|
|000011a0| 20 3d 20 52 65 71 75 65 | 73 74 2e 47 65 74 56 61 | = Reque|st.GetVa|
|000011b0| 72 69 61 62 6c 65 28 22 | 50 61 67 65 22 2c 20 55 |riable("|Page", U|
|000011c0| 73 65 72 73 48 6f 6d 65 | 50 61 67 65 29 3b 0d 0a |sersHome|Page);..|
|000011d0| 0d 0a 09 52 65 73 70 6f | 6e 73 65 2e 53 75 62 73 |...Respo|nse.Subs|
|000011e0| 74 28 22 49 6e 64 65 78 | 55 52 49 22 2c 20 09 41 |t("Index|URI", .A|
|000011f0| 64 6d 69 6e 73 49 6e 64 | 65 78 50 61 67 65 24 22 |dminsInd|exPage$"|
|00001200| 3f 50 61 67 65 3d 22 24 | 50 61 67 65 29 3b 0d 0a |?Page="$|Page);..|
|00001210| 09 52 65 73 70 6f 6e 73 | 65 2e 53 75 62 73 74 28 |.Respons|e.Subst(|
|00001220| 22 4d 61 69 6e 55 52 49 | 22 2c 20 09 50 61 67 65 |"MainURI|", .Page|
|00001230| 29 3b 0d 0a 0d 0a 09 53 | 68 6f 77 50 61 67 65 28 |);.....S|howPage(|
|00001240| 52 65 73 70 6f 6e 73 65 | 2c 20 44 65 66 61 75 6c |Response|, Defaul|
|00001250| 74 50 61 67 65 29 3b 0d | 0a 7d 0d 0a 0d 0a 66 75 |tPage);.|.}....fu|
|00001260| 6e 63 74 69 6f 6e 20 51 | 75 65 72 79 41 64 6d 69 |nction Q|ueryAdmi|
|00001270| 6e 73 4d 65 6e 75 28 57 | 65 62 52 65 71 75 65 73 |nsMenu(W|ebReques|
|00001280| 74 20 52 65 71 75 65 73 | 74 2c 20 57 65 62 52 65 |t Reques|t, WebRe|
|00001290| 73 70 6f 6e 73 65 20 52 | 65 73 70 6f 6e 73 65 29 |sponse R|esponse)|
|000012a0| 0d 0a 7b 0d 0a 09 52 65 | 73 70 6f 6e 73 65 2e 53 |..{...Re|sponse.S|
|000012b0| 75 62 73 74 28 22 54 69 | 74 6c 65 22 2c 20 09 09 |ubst("Ti|tle", ..|
|000012c0| 09 41 64 6d 69 6e 50 61 | 67 65 54 69 74 6c 65 29 |.AdminPa|geTitle)|
|000012d0| 3b 0d 0a 0d 0a 09 52 65 | 73 70 6f 6e 73 65 2e 53 |;.....Re|sponse.S|
|000012e0| 75 62 73 74 28 22 55 73 | 65 72 73 48 6f 6d 65 55 |ubst("Us|ersHomeU|
|000012f0| 52 49 22 2c 20 09 09 55 | 73 65 72 73 48 6f 6d 65 |RI", ..U|sersHome|
|00001300| 50 61 67 65 29 3b 0d 0a | 09 52 65 73 70 6f 6e 73 |Page);..|.Respons|
|00001310| 65 2e 53 75 62 73 74 28 | 22 55 73 65 72 41 63 63 |e.Subst(|"UserAcc|
|00001320| 6f 75 6e 74 55 52 49 22 | 2c 20 09 55 73 65 72 73 |ountURI"|, .Users|
|00001330| 41 63 63 6f 75 6e 74 50 | 61 67 65 29 3b 0d 0a 09 |AccountP|age);...|
|00001340| 52 65 73 70 6f 6e 73 65 | 2e 53 75 62 73 74 28 22 |Response|.Subst("|
|00001350| 55 73 65 72 73 41 64 64 | 55 52 49 22 2c 20 09 09 |UsersAdd|URI", ..|
|00001360| 55 73 65 72 73 41 64 64 | 50 61 67 65 29 3b 0d 0a |UsersAdd|Page);..|
|00001370| 09 52 65 73 70 6f 6e 73 | 65 2e 53 75 62 73 74 28 |.Respons|e.Subst(|
|00001380| 22 47 72 6f 75 70 73 41 | 64 64 55 52 49 22 2c 20 |"GroupsA|ddURI", |
|00001390| 09 09 47 72 6f 75 70 73 | 41 64 64 50 61 67 65 29 |..Groups|AddPage)|
|000013a0| 3b 0d 0a 09 52 65 73 70 | 6f 6e 73 65 2e 53 75 62 |;...Resp|onse.Sub|
|000013b0| 73 74 28 22 55 73 65 72 | 73 42 72 6f 77 73 65 55 |st("User|sBrowseU|
|000013c0| 52 49 22 2c 20 09 55 73 | 65 72 73 42 72 6f 77 73 |RI", .Us|ersBrows|
|000013d0| 65 50 61 67 65 29 3b 0d | 0a 09 52 65 73 70 6f 6e |ePage);.|..Respon|
|000013e0| 73 65 2e 53 75 62 73 74 | 28 22 47 72 6f 75 70 73 |se.Subst|("Groups|
|000013f0| 42 72 6f 77 73 65 55 52 | 49 22 2c 20 09 47 72 6f |BrowseUR|I", .Gro|
|00001400| 75 70 73 42 72 6f 77 73 | 65 50 61 67 65 29 3b 0d |upsBrows|ePage);.|
|00001410| 0a 0d 0a 09 53 68 6f 77 | 50 61 67 65 28 52 65 73 |....Show|Page(Res|
|00001420| 70 6f 6e 73 65 2c 20 41 | 64 6d 69 6e 73 49 6e 64 |ponse, A|dminsInd|
|00001430| 65 78 50 61 67 65 29 3b | 0d 0a 7d 0d 0a 0d 0a 66 |exPage);|..}....f|
|00001440| 75 6e 63 74 69 6f 6e 20 | 51 75 65 72 79 55 73 65 |unction |QueryUse|
|00001450| 72 73 48 6f 6d 65 50 61 | 67 65 28 57 65 62 52 65 |rsHomePa|ge(WebRe|
|00001460| 71 75 65 73 74 20 52 65 | 71 75 65 73 74 2c 20 57 |quest Re|quest, W|
|00001470| 65 62 52 65 73 70 6f 6e | 73 65 20 52 65 73 70 6f |ebRespon|se Respo|
|00001480| 6e 73 65 29 0d 0a 7b 0d | 0a 09 52 65 73 70 6f 6e |nse)..{.|..Respon|
|00001490| 73 65 2e 53 75 62 73 74 | 28 22 41 64 6d 69 6e 4e |se.Subst|("AdminN|
|000014a0| 61 6d 65 22 2c 20 43 75 | 72 41 64 6d 69 6e 2e 55 |ame", Cu|rAdmin.U|
|000014b0| 73 65 72 4e 61 6d 65 29 | 3b 0d 0a 09 52 65 73 70 |serName)|;...Resp|
|000014c0| 6f 6e 73 65 2e 53 75 62 | 73 74 28 22 53 65 63 74 |onse.Sub|st("Sect|
|000014d0| 69 6f 6e 22 2c 20 41 64 | 6d 69 6e 48 6f 6d 65 54 |ion", Ad|minHomeT|
|000014e0| 69 74 6c 65 29 3b 0d 0a | 09 52 65 73 70 6f 6e 73 |itle);..|.Respons|
|000014f0| 65 2e 53 75 62 73 74 28 | 22 50 61 67 65 48 65 6c |e.Subst(|"PageHel|
|00001500| 70 22 2c 20 4e 6f 74 65 | 55 73 65 72 48 6f 6d 65 |p", Note|UserHome|
|00001510| 50 61 67 65 29 3b 0d 0a | 09 53 68 6f 77 50 61 67 |Page);..|.ShowPag|
|00001520| 65 28 52 65 73 70 6f 6e | 73 65 2c 20 55 73 65 72 |e(Respon|se, User|
|00001530| 73 48 6f 6d 65 50 61 67 | 65 29 3b 0d 0a 7d 0d 0a |sHomePag|e);..}..|
|00001540| 0d 0a 66 75 6e 63 74 69 | 6f 6e 20 51 75 65 72 79 |..functi|on Query|
|00001550| 55 73 65 72 41 63 63 6f | 75 6e 74 50 61 67 65 28 |UserAcco|untPage(|
|00001560| 57 65 62 52 65 71 75 65 | 73 74 20 52 65 71 75 65 |WebReque|st Reque|
|00001570| 73 74 2c 20 57 65 62 52 | 65 73 70 6f 6e 73 65 20 |st, WebR|esponse |
|00001580| 52 65 73 70 6f 6e 73 65 | 29 0d 0a 7b 0d 0a 6c 6f |Response|)..{..lo|
|00001590| 63 61 6c 20 73 74 72 69 | 6e 67 20 75 70 61 73 73 |cal stri|ng upass|
|000015a0| 3b 0d 0a 0d 0a 09 52 65 | 73 70 6f 6e 73 65 2e 53 |;.....Re|sponse.S|
|000015b0| 75 62 73 74 28 22 4e 61 | 6d 65 56 61 6c 75 65 22 |ubst("Na|meValue"|
|000015c0| 2c 20 48 74 6d 6c 45 6e | 63 6f 64 65 28 43 75 72 |, HtmlEn|code(Cur|
|000015d0| 41 64 6d 69 6e 2e 55 73 | 65 72 4e 61 6d 65 29 29 |Admin.Us|erName))|
|000015e0| 3b 0d 0a 09 69 66 20 28 | 52 65 71 75 65 73 74 2e |;...if (|Request.|
|000015f0| 47 65 74 56 61 72 69 61 | 62 6c 65 28 22 65 64 69 |GetVaria|ble("edi|
|00001600| 74 22 2c 20 22 22 29 20 | 21 3d 20 22 22 29 0d 0a |t", "") |!= "")..|
|00001610| 09 7b 0d 0a 09 09 2f 2f | 20 43 61 6e 20 6f 6e 6c |.{....//| Can onl|
|00001620| 79 20 63 68 61 6e 67 65 | 20 68 69 73 20 70 61 73 |y change| his pas|
|00001630| 73 77 6f 72 64 0d 0a 09 | 09 75 70 61 73 73 20 3d |sword...|.upass =|
|00001640| 20 52 65 71 75 65 73 74 | 2e 47 65 74 56 61 72 69 | Request|.GetVari|
|00001650| 61 62 6c 65 28 22 50 61 | 73 73 77 6f 72 64 22 2c |able("Pa|ssword",|
|00001660| 20 43 75 72 41 64 6d 69 | 6e 2e 50 61 73 73 77 6f | CurAdmi|n.Passwo|
|00001670| 72 64 29 3b 0d 0a 09 09 | 69 66 20 28 21 43 75 72 |rd);....|if (!Cur|
|00001680| 41 64 6d 69 6e 2e 56 61 | 6c 69 64 50 61 73 73 28 |Admin.Va|lidPass(|
|00001690| 75 70 61 73 73 29 29 0d | 0a 09 09 09 53 74 61 74 |upass)).|....Stat|
|000016a0| 75 73 45 72 72 6f 72 28 | 52 65 73 70 6f 6e 73 65 |usError(|Response|
|000016b0| 2c 20 50 61 73 73 77 6f | 72 64 45 72 72 6f 72 29 |, Passwo|rdError)|
|000016c0| 3b 0d 0a 09 09 65 6c 73 | 65 20 69 66 20 28 75 70 |;....els|e if (up|
|000016d0| 61 73 73 20 21 3d 20 43 | 75 72 41 64 6d 69 6e 2e |ass != C|urAdmin.|
|000016e0| 50 61 73 73 77 6f 72 64 | 29 0d 0a 09 09 7b 0d 0a |Password|)....{..|
|000016f0| 09 09 09 43 75 72 41 64 | 6d 69 6e 2e 50 61 73 73 |...CurAd|min.Pass|
|00001700| 77 6f 72 64 20 3d 20 75 | 70 61 73 73 3b 0d 0a 09 |word = u|pass;...|
|00001710| 09 09 4c 65 76 65 6c 2e | 47 61 6d 65 2e 41 63 63 |..Level.|Game.Acc|
|00001720| 65 73 73 43 6f 6e 74 72 | 6f 6c 2e 53 61 76 65 41 |essContr|ol.SaveA|
|00001730| 64 6d 69 6e 73 28 29 3b | 0d 0a 09 09 7d 0d 0a 09 |dmins();|....}...|
|00001740| 7d 0d 0a 0d 0a 09 52 65 | 73 70 6f 6e 73 65 2e 53 |}.....Re|sponse.S|
|00001750| 75 62 73 74 28 22 50 61 | 73 73 56 61 6c 75 65 22 |ubst("Pa|ssValue"|
|00001760| 2c 20 43 75 72 41 64 6d | 69 6e 2e 50 61 73 73 77 |, CurAdm|in.Passw|
|00001770| 6f 72 64 29 3b 0d 0a 09 | 52 65 73 70 6f 6e 73 65 |ord);...|Response|
|00001780| 2e 53 75 62 73 74 28 22 | 50 72 69 76 54 61 62 6c |.Subst("|PrivTabl|
|00001790| 65 22 2c 20 47 65 74 50 | 72 69 76 73 54 61 62 6c |e", GetP|rivsTabl|
|000017a0| 65 28 43 75 72 41 64 6d | 69 6e 2e 50 72 69 76 69 |e(CurAdm|in.Privi|
|000017b0| 6c 65 67 65 73 2c 20 74 | 72 75 65 29 29 3b 0d 0a |leges, t|rue));..|
|000017c0| 09 52 65 73 70 6f 6e 73 | 65 2e 53 75 62 73 74 28 |.Respons|e.Subst(|
|000017d0| 22 47 72 6f 75 70 4c 69 | 6e 6b 73 22 2c 20 22 22 |"GroupLi|nks", ""|
|000017e0| 29 3b 0d 0a 09 52 65 73 | 70 6f 6e 73 65 2e 53 75 |);...Res|ponse.Su|
|000017f0| 62 73 74 28 22 53 75 62 | 6d 69 74 56 61 6c 75 65 |bst("Sub|mitValue|
|00001800| 22 2c 20 41 63 63 65 70 | 74 29 3b 0d 0a 09 52 65 |", Accep|t);...Re|
|00001810| 73 70 6f 6e 73 65 2e 53 | 75 62 73 74 28 22 50 6f |sponse.S|ubst("Po|
|00001820| 73 74 41 63 74 69 6f 6e | 22 2c 20 55 73 65 72 73 |stAction|", Users|
|00001830| 41 63 63 6f 75 6e 74 50 | 61 67 65 29 3b 0d 0a 09 |AccountP|age);...|
|00001840| 52 65 73 70 6f 6e 73 65 | 2e 53 75 62 73 74 28 22 |Response|.Subst("|
|00001850| 53 65 63 74 69 6f 6e 22 | 2c 20 41 64 6d 69 6e 41 |Section"|, AdminA|
|00001860| 63 63 6f 75 6e 74 54 69 | 74 6c 65 29 3b 0d 0a 09 |ccountTi|tle);...|
|00001870| 52 65 73 70 6f 6e 73 65 | 2e 53 75 62 73 74 28 22 |Response|.Subst("|
|00001880| 50 61 67 65 48 65 6c 70 | 22 2c 20 4e 6f 74 65 41 |PageHelp|", NoteA|
|00001890| 63 63 6f 75 6e 74 50 61 | 67 65 29 3b 0d 0a 09 53 |ccountPa|ge);...S|
|000018a0| 68 6f 77 50 61 67 65 28 | 52 65 73 70 6f 6e 73 65 |howPage(|Response|
|000018b0| 2c 20 55 73 65 72 73 41 | 63 63 6f 75 6e 74 50 61 |, UsersA|ccountPa|
|000018c0| 67 65 29 3b 0d 0a 7d 0d | 0a 0d 0a 66 75 6e 63 74 |ge);..}.|...funct|
|000018d0| 69 6f 6e 20 51 75 65 72 | 79 55 73 65 72 73 42 72 |ion Quer|yUsersBr|
|000018e0| 6f 77 73 65 50 61 67 65 | 28 57 65 62 52 65 71 75 |owsePage|(WebRequ|
|000018f0| 65 73 74 20 52 65 71 75 | 65 73 74 2c 20 57 65 62 |est Requ|est, Web|
|00001900| 52 65 73 70 6f 6e 73 65 | 20 52 65 73 70 6f 6e 73 |Response| Respons|
|00001910| 65 29 0d 0a 7b 0d 0a 6c | 6f 63 61 6c 20 78 41 64 |e)..{..l|ocal xAd|
|00001920| 6d 69 6e 55 73 65 72 20 | 78 55 73 65 72 3b 0d 0a |minUser |xUser;..|
|00001930| 6c 6f 63 61 6c 20 73 74 | 72 69 6e 67 20 74 6d 70 |local st|ring tmp|
|00001940| 3b 0d 0a 0d 0a 09 69 66 | 20 28 43 61 6e 50 65 72 |;.....if| (CanPer|
|00001950| 66 6f 72 6d 28 22 41 6c | 7c 41 61 7c 41 65 7c 41 |form("Al||Aa|Ae|A|
|00001960| 67 7c 41 6d 22 29 29 0d | 0a 09 7b 0d 0a 09 09 2f |g|Am")).|..{..../|
|00001970| 2f 20 44 65 6c 65 74 65 | 20 61 6e 20 41 64 6d 69 |/ Delete| an Admi|
|00001980| 6e 0d 0a 09 09 69 66 20 | 28 52 65 71 75 65 73 74 |n....if |(Request|
|00001990| 2e 47 65 74 56 61 72 69 | 61 62 6c 65 28 22 64 65 |.GetVari|able("de|
|000019a0| 6c 65 74 65 22 29 20 21 | 3d 20 22 22 29 0d 0a 09 |lete") !|= "")...|
|000019b0| 09 7b 0d 0a 09 09 09 2f | 2f 20 44 65 6c 65 74 65 |.{...../|/ Delete|
|000019c0| 20 73 70 65 63 69 66 69 | 65 64 20 41 64 6d 69 6e | specifi|ed Admin|
|000019d0| 20 47 72 6f 75 70 0d 0a | 09 09 09 78 55 73 65 72 | Group..|...xUser|
|000019e0| 20 3d 20 4c 65 76 65 6c | 2e 47 61 6d 65 2e 41 63 | = Level|.Game.Ac|
|000019f0| 63 65 73 73 43 6f 6e 74 | 72 6f 6c 2e 55 73 65 72 |cessCont|rol.User|
|00001a00| 73 2e 46 69 6e 64 42 79 | 4e 61 6d 65 28 52 65 71 |s.FindBy|Name(Req|
|00001a10| 75 65 73 74 2e 47 65 74 | 56 61 72 69 61 62 6c 65 |uest.Get|Variable|
|00001a20| 28 22 64 65 6c 65 74 65 | 22 29 29 3b 0d 0a 09 09 |("delete|"));....|
|00001a30| 09 69 66 20 28 78 55 73 | 65 72 20 21 3d 20 4e 6f |.if (xUs|er != No|
|00001a40| 6e 65 29 0d 0a 09 09 09 | 7b 0d 0a 09 09 09 09 69 |ne).....|{......i|
|00001a50| 66 20 28 43 75 72 41 64 | 6d 69 6e 2e 43 61 6e 4d |f (CurAd|min.CanM|
|00001a60| 61 6e 61 67 65 55 73 65 | 72 28 78 55 73 65 72 29 |anageUse|r(xUser)|
|00001a70| 29 0d 0a 09 09 09 09 7b | 0d 0a 09 09 09 09 09 53 |)......{|.......S|
|00001a80| 74 61 74 75 73 4f 6b 28 | 52 65 73 70 6f 6e 73 65 |tatusOk(|Response|
|00001a90| 2c 20 52 65 70 6c 28 55 | 73 65 72 52 65 6d 6f 76 |, Repl(U|serRemov|
|00001aa0| 65 64 2c 20 22 25 55 73 | 65 72 4e 61 6d 65 25 22 |ed, "%Us|erName%"|
|00001ab0| 2c 20 48 74 6d 6c 45 6e | 63 6f 64 65 28 78 55 73 |, HtmlEn|code(xUs|
|00001ac0| 65 72 2e 55 73 65 72 4e | 61 6d 65 29 29 29 3b 0d |er.UserN|ame)));.|
|00001ad0| 0a 09 09 09 09 09 2f 2f | 20 52 65 6d 6f 76 65 20 |......//| Remove |
|00001ae0| 78 55 73 65 72 0d 0a 09 | 09 09 09 09 78 55 73 65 |xUser...|....xUse|
|00001af0| 72 2e 55 6e 6c 69 6e 6b | 47 72 6f 75 70 73 28 29 |r.Unlink|Groups()|
|00001b00| 3b 0d 0a 09 09 09 09 09 | 4c 65 76 65 6c 2e 47 61 |;.......|Level.Ga|
|00001b10| 6d 65 2e 41 63 63 65 73 | 73 43 6f 6e 74 72 6f 6c |me.Acces|sControl|
|00001b20| 2e 55 73 65 72 73 2e 52 | 65 6d 6f 76 65 28 78 55 |.Users.R|emove(xU|
|00001b30| 73 65 72 29 3b 0d 0a 09 | 09 09 09 09 4c 65 76 65 |ser);...|....Leve|
|00001b40| 6c 2e 47 61 6d 65 2e 41 | 63 63 65 73 73 43 6f 6e |l.Game.A|ccessCon|
|00001b50| 74 72 6f 6c 2e 53 61 76 | 65 41 64 6d 69 6e 73 28 |trol.Sav|eAdmins(|
|00001b60| 29 3b 0d 0a 09 09 09 09 | 7d 0d 0a 09 09 09 09 65 |);......|}......e|
|00001b70| 6c 73 65 0d 0a 09 09 09 | 09 7b 0d 0a 09 09 09 09 |lse.....|.{......|
|00001b80| 09 74 6d 70 20 3d 20 52 | 65 70 6c 28 49 6e 73 75 |.tmp = R|epl(Insu|
|00001b90| 66 66 69 63 69 65 6e 74 | 50 72 69 76 73 2c 20 22 |fficient|Privs, "|
|00001ba0| 25 41 63 74 69 6f 6e 25 | 22 2c 20 44 65 6c 65 74 |%Action%|", Delet|
|00001bb0| 69 6e 67 29 3b 0d 0a 09 | 09 09 09 09 74 6d 70 20 |ing);...|....tmp |
|00001bc0| 3d 20 52 65 70 6c 28 74 | 6d 70 2c 20 22 25 49 74 |= Repl(t|mp, "%It|
|00001bd0| 65 6d 25 22 2c 20 47 72 | 6f 75 70 29 3b 0d 0a 09 |em%", Gr|oup);...|
|00001be0| 09 09 09 09 53 74 61 74 | 75 73 45 72 72 6f 72 28 |....Stat|usError(|
|00001bf0| 52 65 73 70 6f 6e 73 65 | 2c 20 74 6d 70 29 3b 0d |Response|, tmp);.|
|00001c00| 0a 09 09 09 09 7d 0d 0a | 09 09 09 7d 0d 0a 09 09 |.....}..|...}....|
|00001c10| 09 65 6c 73 65 20 53 74 | 61 74 75 73 45 72 72 6f |.else St|atusErro|
|00001c20| 72 28 52 65 73 70 6f 6e | 73 65 2c 20 52 65 70 6c |r(Respon|se, Repl|
|00001c30| 28 49 6e 76 61 6c 69 64 | 49 74 65 6d 2c 20 22 25 |(Invalid|Item, "%|
|00001c40| 49 74 65 6d 25 22 2c 20 | 47 72 6f 75 70 29 29 3b |Item%", |Group));|
|00001c50| 0d 0a 09 09 7d 0d 0a 09 | 09 2f 2f 20 53 68 6f 77 |....}...|.// Show|
|00001c60| 20 74 68 65 20 6c 69 73 | 74 0d 0a 09 09 52 65 73 | the lis|t....Res|
|00001c70| 70 6f 6e 73 65 2e 53 75 | 62 73 74 28 22 42 72 6f |ponse.Su|bst("Bro|
|00001c80| 77 73 65 4c 69 73 74 22 | 2c 20 47 65 74 55 73 65 |wseList"|, GetUse|
|00001c90| 72 73 46 6f 72 42 72 6f | 77 73 65 28 52 65 73 70 |rsForBro|wse(Resp|
|00001ca0| 6f 6e 73 65 29 29 3b 0d | 0a 0d 0a 09 09 52 65 73 |onse));.|.....Res|
|00001cb0| 70 6f 6e 73 65 2e 53 75 | 62 73 74 28 22 53 65 63 |ponse.Su|bst("Sec|
|00001cc0| 74 69 6f 6e 22 2c 20 42 | 72 6f 77 73 65 55 73 65 |tion", B|rowseUse|
|00001cd0| 72 73 54 69 74 6c 65 29 | 3b 0d 0a 09 09 52 65 73 |rsTitle)|;....Res|
|00001ce0| 70 6f 6e 73 65 2e 53 75 | 62 73 74 28 22 50 61 67 |ponse.Su|bst("Pag|
|00001cf0| 65 48 65 6c 70 22 2c 20 | 4e 6f 74 65 55 73 65 72 |eHelp", |NoteUser|
|00001d00| 73 42 72 6f 77 73 65 50 | 61 67 65 29 3b 0d 0a 09 |sBrowseP|age);...|
|00001d10| 09 53 68 6f 77 50 61 67 | 65 28 52 65 73 70 6f 6e |.ShowPag|e(Respon|
|00001d20| 73 65 2c 20 55 73 65 72 | 73 42 72 6f 77 73 65 50 |se, User|sBrowseP|
|00001d30| 61 67 65 29 3b 0d 0a 09 | 7d 0d 0a 09 65 6c 73 65 |age);...|}...else|
|00001d40| 0d 0a 09 09 41 63 63 65 | 73 73 44 65 6e 69 65 64 |....Acce|ssDenied|
|00001d50| 28 52 65 73 70 6f 6e 73 | 65 29 3b 0d 0a 7d 0d 0a |(Respons|e);..}..|
|00001d60| 0d 0a 66 75 6e 63 74 69 | 6f 6e 20 51 75 65 72 79 |..functi|on Query|
|00001d70| 55 73 65 72 73 41 64 64 | 50 61 67 65 28 57 65 62 |UsersAdd|Page(Web|
|00001d80| 52 65 71 75 65 73 74 20 | 52 65 71 75 65 73 74 2c |Request |Request,|
|00001d90| 20 57 65 62 52 65 73 70 | 6f 6e 73 65 20 52 65 73 | WebResp|onse Res|
|00001da0| 70 6f 6e 73 65 29 0d 0a | 7b 0d 0a 6c 6f 63 61 6c |ponse)..|{..local|
|00001db0| 20 78 41 64 6d 69 6e 55 | 73 65 72 20 78 55 73 65 | xAdminU|ser xUse|
|00001dc0| 72 3b 0d 0a 6c 6f 63 61 | 6c 20 78 41 64 6d 69 6e |r;..loca|l xAdmin|
|00001dd0| 47 72 6f 75 70 20 78 47 | 72 6f 75 70 3b 0d 0a 6c |Group xG|roup;..l|
|00001de0| 6f 63 61 6c 20 78 41 64 | 6d 69 6e 47 72 6f 75 70 |ocal xAd|minGroup|
|00001df0| 4c 69 73 74 20 78 47 72 | 6f 75 70 73 3b 0d 0a 6c |List xGr|oups;..l|
|00001e00| 6f 63 61 6c 20 73 74 72 | 69 6e 67 20 75 6e 61 6d |ocal str|ing unam|
|00001e10| 65 2c 20 75 70 61 73 73 | 2c 20 75 70 72 69 76 73 |e, upass|, uprivs|
|00001e20| 2c 20 75 67 72 70 2c 20 | 45 72 72 4d 73 67 3b 0d |, ugrp, |ErrMsg;.|
|00001e30| 0a 0d 0a 09 69 66 20 28 | 43 61 6e 50 65 72 66 6f |....if (|CanPerfo|
|00001e40| 72 6d 28 22 41 61 22 29 | 29 0d 0a 09 7b 0d 0a 09 |rm("Aa")|)...{...|
|00001e50| 09 69 66 20 28 43 75 72 | 41 64 6d 69 6e 2e 62 4d |.if (Cur|Admin.bM|
|00001e60| 61 73 74 65 72 41 64 6d | 69 6e 29 0d 0a 09 09 09 |asterAdm|in).....|
|00001e70| 78 47 72 6f 75 70 73 20 | 3d 20 4c 65 76 65 6c 2e |xGroups |= Level.|
|00001e80| 47 61 6d 65 2e 41 63 63 | 65 73 73 43 6f 6e 74 72 |Game.Acc|essContr|
|00001e90| 6f 6c 2e 47 72 6f 75 70 | 73 3b 0d 0a 09 09 65 6c |ol.Group|s;....el|
|00001ea0| 73 65 0d 0a 09 09 09 78 | 47 72 6f 75 70 73 20 3d |se.....x|Groups =|
|00001eb0| 20 43 75 72 41 64 6d 69 | 6e 2e 4d 61 6e 61 67 65 | CurAdmi|n.Manage|
|00001ec0| 64 47 72 6f 75 70 73 3b | 0d 0a 0d 0a 09 09 69 66 |dGroups;|......if|
|00001ed0| 20 28 52 65 71 75 65 73 | 74 2e 47 65 74 56 61 72 | (Reques|t.GetVar|
|00001ee0| 69 61 62 6c 65 28 22 61 | 64 64 6e 65 77 22 29 20 |iable("a|ddnew") |
|00001ef0| 21 3d 20 22 22 29 0d 0a | 09 09 7b 0d 0a 09 09 09 |!= "")..|..{.....|
|00001f00| 2f 2f 20 48 75 6d 6d 20 | 2e 2e 20 41 64 64 4e 65 |// Humm |.. AddNe|
|00001f10| 77 0d 0a 09 09 09 75 6e | 61 6d 65 20 3d 20 52 65 |w.....un|ame = Re|
|00001f20| 71 75 65 73 74 2e 47 65 | 74 56 61 72 69 61 62 6c |quest.Ge|tVariabl|
|00001f30| 65 28 22 55 73 65 72 6e | 61 6d 65 22 29 3b 0d 0a |e("Usern|ame");..|
|00001f40| 09 09 09 75 70 61 73 73 | 20 3d 20 52 65 71 75 65 |...upass| = Reque|
|00001f50| 73 74 2e 47 65 74 56 61 | 72 69 61 62 6c 65 28 22 |st.GetVa|riable("|
|00001f60| 50 61 73 73 77 6f 72 64 | 22 29 3b 0d 0a 09 09 09 |Password|");.....|
|00001f70| 75 70 72 69 76 73 20 3d | 20 46 69 78 50 72 69 76 |uprivs =| FixPriv|
|00001f80| 73 28 52 65 71 75 65 73 | 74 2c 20 22 22 29 3b 0d |s(Reques|t, "");.|
|00001f90| 0a 09 09 09 75 67 72 70 | 20 3d 20 52 65 71 75 65 |....ugrp| = Reque|
|00001fa0| 73 74 2e 47 65 74 56 61 | 72 69 61 62 6c 65 28 22 |st.GetVa|riable("|
|00001fb0| 55 73 65 72 67 72 6f 75 | 70 22 29 3b 0d 0a 09 09 |Usergrou|p");....|
|00001fc0| 09 78 47 72 6f 75 70 20 | 3d 20 78 47 72 6f 75 70 |.xGroup |= xGroup|
|00001fd0| 73 2e 46 69 6e 64 42 79 | 4e 61 6d 65 28 75 67 72 |s.FindBy|Name(ugr|
|00001fe0| 70 29 3b 0d 0a 0d 0a 09 | 09 09 69 66 20 28 21 43 |p);.....|..if (!C|
|00001ff0| 75 72 41 64 6d 69 6e 2e | 56 61 6c 69 64 4e 61 6d |urAdmin.|ValidNam|
|00002000| 65 28 75 6e 61 6d 65 29 | 29 0d 0a 09 09 09 09 45 |e(uname)|)......E|
|00002010| 72 72 4d 73 67 20 3d 20 | 52 65 70 6c 28 49 6e 76 |rrMsg = |Repl(Inv|
|00002020| 61 6c 69 64 43 68 61 72 | 61 63 74 65 72 73 2c 20 |alidChar|acters, |
|00002030| 22 25 49 74 65 6d 25 22 | 2c 20 55 73 65 72 29 3b |"%Item%"|, User);|
|00002040| 0d 0a 09 09 09 65 6c 73 | 65 20 69 66 20 28 4c 65 |.....els|e if (Le|
|00002050| 76 65 6c 2e 47 61 6d 65 | 2e 41 63 63 65 73 73 43 |vel.Game|.AccessC|
|00002060| 6f 6e 74 72 6f 6c 2e 55 | 73 65 72 73 2e 46 69 6e |ontrol.U|sers.Fin|
|00002070| 64 42 79 4e 61 6d 65 28 | 75 6e 61 6d 65 29 20 21 |dByName(|uname) !|
|00002080| 3d 20 4e 6f 6e 65 29 0d | 0a 09 09 09 09 45 72 72 |= None).|.....Err|
|00002090| 4d 73 67 20 3d 20 4e 61 | 6d 65 45 78 69 73 74 73 |Msg = Na|meExists|
|000020a0| 40 55 73 65 72 3b 0d 0a | 09 09 09 65 6c 73 65 20 |@User;..|...else |
|000020b0| 69 66 20 28 21 43 75 72 | 41 64 6d 69 6e 2e 56 61 |if (!Cur|Admin.Va|
|000020c0| 6c 69 64 50 61 73 73 28 | 75 70 61 73 73 29 29 0d |lidPass(|upass)).|
|000020d0| 0a 09 09 09 09 45 72 72 | 4d 73 67 20 3d 20 50 61 |.....Err|Msg = Pa|
|000020e0| 73 73 77 6f 72 64 45 72 | 72 6f 72 3b 0d 0a 09 09 |sswordEr|ror;....|
|000020f0| 09 65 6c 73 65 20 69 66 | 20 28 75 67 72 70 20 3d |.else if| (ugrp =|
|00002100| 3d 20 22 22 29 0d 0a 09 | 09 09 09 45 72 72 4d 73 |= "")...|...ErrMs|
|00002110| 67 20 3d 20 59 6f 75 4d | 75 73 74 53 65 6c 65 63 |g = YouM|ustSelec|
|00002120| 74 40 47 72 6f 75 70 24 | 22 21 22 3b 0d 0a 09 09 |t@Group$|"!";....|
|00002130| 09 65 6c 73 65 20 69 66 | 20 28 78 47 72 6f 75 70 |.else if| (xGroup|
|00002140| 20 3d 3d 20 4e 6f 6e 65 | 29 0d 0a 09 09 09 09 45 | == None|)......E|
|00002150| 72 72 4d 73 67 20 3d 20 | 52 65 70 6c 28 44 6f 65 |rrMsg = |Repl(Doe|
|00002160| 73 4e 6f 74 45 78 69 73 | 74 2c 20 22 25 49 74 65 |sNotExis|t, "%Ite|
|00002170| 6d 25 22 2c 20 47 72 6f | 75 70 29 3b 0d 0a 0d 0a |m%", Gro|up);....|
|00002180| 09 09 09 52 65 73 70 6f | 6e 73 65 2e 53 75 62 73 |...Respo|nse.Subs|
|00002190| 74 28 22 4e 61 6d 65 56 | 61 6c 75 65 22 2c 20 48 |t("NameV|alue", H|
|000021a0| 74 6d 6c 45 6e 63 6f 64 | 65 28 75 6e 61 6d 65 29 |tmlEncod|e(uname)|
|000021b0| 29 3b 0d 0a 09 09 09 52 | 65 73 70 6f 6e 73 65 2e |);.....R|esponse.|
|000021c0| 53 75 62 73 74 28 22 50 | 61 73 73 56 61 6c 75 65 |Subst("P|assValue|
|000021d0| 22 2c 20 75 70 61 73 73 | 29 3b 0d 0a 09 09 09 52 |", upass|);.....R|
|000021e0| 65 73 70 6f 6e 73 65 2e | 53 75 62 73 74 28 22 50 |esponse.|Subst("P|
|000021f0| 72 69 76 54 61 62 6c 65 | 22 2c 20 47 65 74 50 72 |rivTable|", GetPr|
|00002200| 69 76 73 54 61 62 6c 65 | 28 75 70 72 69 76 73 29 |ivsTable|(uprivs)|
|00002210| 29 3b 0d 0a 0d 0a 09 09 | 09 69 66 20 28 45 72 72 |);......|.if (Err|
|00002220| 4d 73 67 20 3d 3d 20 22 | 22 29 0d 0a 09 09 09 7b |Msg == "|").....{|
|00002230| 0d 0a 09 09 09 09 2f 2f | 20 41 6c 6c 20 73 65 74 |......//| All set|
|00002240| 74 69 6e 67 73 20 61 72 | 65 20 66 69 6e 65 2c 20 |tings ar|e fine, |
|00002250| 63 72 65 61 74 65 20 74 | 68 65 20 6e 65 77 20 47 |create t|he new G|
|00002260| 72 6f 75 70 2e 0d 0a 09 | 09 09 09 78 55 73 65 72 |roup....|...xUser|
|00002270| 20 3d 20 4c 65 76 65 6c | 2e 47 61 6d 65 2e 41 63 | = Level|.Game.Ac|
|00002280| 63 65 73 73 43 6f 6e 74 | 72 6f 6c 2e 55 73 65 72 |cessCont|rol.User|
|00002290| 73 2e 43 72 65 61 74 65 | 28 75 6e 61 6d 65 2c 20 |s.Create|(uname, |
|000022a0| 75 70 61 73 73 2c 20 75 | 70 72 69 76 73 29 3b 0d |upass, u|privs);.|
|000022b0| 0a 09 09 09 09 69 66 20 | 28 78 55 73 65 72 20 21 |.....if |(xUser !|
|000022c0| 3d 20 4e 6f 6e 65 29 0d | 0a 09 09 09 09 7b 0d 0a |= None).|.....{..|
|000022d0| 09 09 09 09 09 78 55 73 | 65 72 2e 41 64 64 47 72 |.....xUs|er.AddGr|
|000022e0| 6f 75 70 28 78 47 72 6f | 75 70 29 3b 0d 0a 09 09 |oup(xGro|up);....|
|000022f0| 09 09 09 4c 65 76 65 6c | 2e 47 61 6d 65 2e 41 63 |...Level|.Game.Ac|
|00002300| 63 65 73 73 43 6f 6e 74 | 72 6f 6c 2e 55 73 65 72 |cessCont|rol.User|
|00002310| 73 2e 41 64 64 28 78 55 | 73 65 72 29 3b 0d 0a 09 |s.Add(xU|ser);...|
|00002320| 09 09 09 09 4c 65 76 65 | 6c 2e 47 61 6d 65 2e 41 |....Leve|l.Game.A|
|00002330| 63 63 65 73 73 43 6f 6e | 74 72 6f 6c 2e 53 61 76 |ccessCon|trol.Sav|
|00002340| 65 41 64 6d 69 6e 73 28 | 29 3b 0d 0a 09 09 09 09 |eAdmins(|);......|
|00002350| 7d 0d 0a 09 09 09 09 65 | 6c 73 65 0d 0a 09 09 09 |}......e|lse.....|
|00002360| 09 7b 0d 0a 09 09 09 09 | 09 2f 2f 20 4f 6e 6c 79 |.{......|.// Only|
|00002370| 20 72 65 2d 61 64 64 20 | 74 68 65 20 44 44 4c 20 | re-add |the DDL |
|00002380| 69 66 20 74 68 65 72 65 | 20 77 61 73 20 61 20 70 |if there| was a p|
|00002390| 72 6f 62 6c 65 6d 2e 0d | 0a 09 09 09 09 09 45 72 |roblem..|......Er|
|000023a0| 72 4d 73 67 20 3d 20 43 | 6f 75 6c 64 4e 6f 74 43 |rMsg = C|ouldNotC|
|000023b0| 72 65 61 74 65 40 55 73 | 65 72 24 22 21 22 3b 0d |reate@Us|er$"!";.|
|000023c0| 0a 09 09 09 09 7d 0d 0a | 09 09 09 7d 0d 0a 0d 0a |.....}..|...}....|
|000023d0| 09 09 09 69 66 20 28 45 | 72 72 4d 73 67 20 21 3d |...if (E|rrMsg !=|
|000023e0| 20 22 22 29 0d 0a 09 09 | 09 09 53 74 61 74 75 73 | "")....|..Status|
|000023f0| 45 72 72 6f 72 28 52 65 | 73 70 6f 6e 73 65 2c 20 |Error(Re|sponse, |
|00002400| 45 72 72 4d 73 67 29 3b | 0d 0a 09 09 7d 0d 0a 09 |ErrMsg);|....}...|
|00002410| 09 65 6c 73 65 0d 0a 09 | 09 09 52 65 73 70 6f 6e |.else...|..Respon|
|00002420| 73 65 2e 53 75 62 73 74 | 28 22 50 72 69 76 54 61 |se.Subst|("PrivTa|
|00002430| 62 6c 65 22 2c 20 47 65 | 74 50 72 69 76 73 54 61 |ble", Ge|tPrivsTa|
|00002440| 62 6c 65 28 22 22 29 29 | 3b 0d 0a 0d 0a 09 09 69 |ble(""))|;......i|
|00002450| 66 20 28 78 55 73 65 72 | 20 21 3d 20 4e 6f 6e 65 |f (xUser| != None|
|00002460| 29 0d 0a 09 09 7b 0d 0a | 09 09 09 52 65 73 70 6f |)....{..|...Respo|
|00002470| 6e 73 65 2e 53 75 62 73 | 74 28 22 50 6f 73 74 41 |nse.Subs|t("PostA|
|00002480| 63 74 69 6f 6e 22 2c 20 | 55 73 65 72 73 45 64 69 |ction", |UsersEdi|
|00002490| 74 50 61 67 65 29 3b 0d | 0a 09 09 09 52 65 73 70 |tPage);.|....Resp|
|000024a0| 6f 6e 73 65 2e 53 75 62 | 73 74 28 22 53 75 62 6d |onse.Sub|st("Subm|
|000024b0| 69 74 4e 61 6d 65 22 2c | 20 22 61 64 64 6e 65 77 |itName",| "addnew|
|000024c0| 22 29 3b 0d 0a 09 09 09 | 52 65 73 70 6f 6e 73 65 |");.....|Response|
|000024d0| 2e 53 75 62 73 74 28 22 | 53 75 62 6d 69 74 56 61 |.Subst("|SubmitVa|
|000024e0| 6c 75 65 22 2c 20 45 64 | 69 74 55 73 65 72 42 75 |lue", Ed|itUserBu|
|000024f0| 74 74 6f 6e 29 3b 0d 0a | 09 09 09 52 65 73 70 6f |tton);..|...Respo|
|00002500| 6e 73 65 2e 53 75 62 73 | 74 28 22 53 65 63 74 69 |nse.Subs|t("Secti|
|00002510| 6f 6e 22 2c 20 45 64 69 | 74 55 73 65 72 54 69 74 |on", Edi|tUserTit|
|00002520| 6c 65 29 3b 0d 0a 09 09 | 09 52 65 73 70 6f 6e 73 |le);....|.Respons|
|00002530| 65 2e 53 75 62 73 74 28 | 22 50 61 67 65 48 65 6c |e.Subst(|"PageHel|
|00002540| 70 22 2c 20 4e 6f 74 65 | 55 73 65 72 45 64 69 74 |p", Note|UserEdit|
|00002550| 50 61 67 65 29 3b 0d 0a | 09 09 09 53 68 6f 77 50 |Page);..|...ShowP|
|00002560| 61 67 65 28 52 65 73 70 | 6f 6e 73 65 2c 20 55 73 |age(Resp|onse, Us|
|00002570| 65 72 73 45 64 69 74 50 | 61 67 65 29 3b 0d 0a 09 |ersEditP|age);...|
|00002580| 09 7d 0d 0a 09 09 65 6c | 73 65 0d 0a 09 09 7b 0d |.}....el|se....{.|
|00002590| 0a 09 09 09 52 65 73 70 | 6f 6e 73 65 2e 53 75 62 |....Resp|onse.Sub|
|000025a0| 73 74 28 22 47 72 6f 75 | 70 73 22 2c 20 47 65 74 |st("Grou|ps", Get|
|000025b0| 47 72 6f 75 70 4f 70 74 | 69 6f 6e 73 28 78 47 72 |GroupOpt|ions(xGr|
|000025c0| 6f 75 70 73 2c 20 75 67 | 72 70 29 29 3b 0d 0a 09 |oups, ug|rp));...|
|000025d0| 09 09 52 65 73 70 6f 6e | 73 65 2e 53 75 62 73 74 |..Respon|se.Subst|
|000025e0| 28 22 50 6f 73 74 41 63 | 74 69 6f 6e 22 2c 20 55 |("PostAc|tion", U|
|000025f0| 73 65 72 73 41 64 64 50 | 61 67 65 29 3b 0d 0a 09 |sersAddP|age);...|
|00002600| 09 09 52 65 73 70 6f 6e | 73 65 2e 53 75 62 73 74 |..Respon|se.Subst|
|00002610| 28 22 53 75 62 6d 69 74 | 4e 61 6d 65 22 2c 20 22 |("Submit|Name", "|
|00002620| 61 64 64 6e 65 77 22 29 | 3b 0d 0a 09 09 09 52 65 |addnew")|;.....Re|
|00002630| 73 70 6f 6e 73 65 2e 53 | 75 62 73 74 28 22 53 75 |sponse.S|ubst("Su|
|00002640| 62 6d 69 74 56 61 6c 75 | 65 22 2c 20 41 64 64 55 |bmitValu|e", AddU|
|00002650| 73 65 72 42 75 74 74 6f | 6e 29 3b 0d 0a 09 09 09 |serButto|n);.....|
|00002660| 52 65 73 70 6f 6e 73 65 | 2e 53 75 62 73 74 28 22 |Response|.Subst("|
|00002670| 53 65 63 74 69 6f 6e 22 | 2c 20 41 64 64 55 73 65 |Section"|, AddUse|
|00002680| 72 54 69 74 6c 65 29 3b | 0d 0a 09 09 09 52 65 73 |rTitle);|.....Res|
|00002690| 70 6f 6e 73 65 2e 53 75 | 62 73 74 28 22 50 61 67 |ponse.Su|bst("Pag|
|000026a0| 65 48 65 6c 70 22 2c 20 | 4e 6f 74 65 55 73 65 72 |eHelp", |NoteUser|
|000026b0| 41 64 64 50 61 67 65 29 | 3b 0d 0a 09 09 09 53 68 |AddPage)|;.....Sh|
|000026c0| 6f 77 50 61 67 65 28 52 | 65 73 70 6f 6e 73 65 2c |owPage(R|esponse,|
|000026d0| 20 55 73 65 72 73 41 64 | 64 50 61 67 65 29 3b 0d | UsersAd|dPage);.|
|000026e0| 0a 09 09 7d 0d 0a 09 7d | 0d 0a 09 65 6c 73 65 0d |...}...}|...else.|
|000026f0| 0a 09 09 41 63 63 65 73 | 73 44 65 6e 69 65 64 28 |...Acces|sDenied(|
|00002700| 52 65 73 70 6f 6e 73 65 | 29 3b 0d 0a 7d 0d 0a 0d |Response|);..}...|
|00002710| 0a 66 75 6e 63 74 69 6f | 6e 20 51 75 65 72 79 55 |.functio|n QueryU|
|00002720| 73 65 72 73 45 64 69 74 | 50 61 67 65 28 57 65 62 |sersEdit|Page(Web|
|00002730| 52 65 71 75 65 73 74 20 | 52 65 71 75 65 73 74 2c |Request |Request,|
|00002740| 20 57 65 62 52 65 73 70 | 6f 6e 73 65 20 52 65 73 | WebResp|onse Res|
|00002750| 70 6f 6e 73 65 29 0d 0a | 7b 0d 0a 6c 6f 63 61 6c |ponse)..|{..local|
|00002760| 20 78 41 64 6d 69 6e 55 | 73 65 72 20 78 55 73 65 | xAdminU|ser xUse|
|00002770| 72 3b 0d 0a 6c 6f 63 61 | 6c 20 73 74 72 69 6e 67 |r;..loca|l string|
|00002780| 20 75 6e 61 6d 65 2c 20 | 75 70 61 73 73 2c 20 70 | uname, |upass, p|
|00002790| 72 69 76 73 2c 20 45 72 | 72 4d 73 67 3b 0d 0a 0d |rivs, Er|rMsg;...|
|000027a0| 0a 09 69 66 20 28 43 61 | 6e 50 65 72 66 6f 72 6d |..if (Ca|nPerform|
|000027b0| 28 22 41 61 7c 41 65 22 | 29 29 0d 0a 09 7b 0d 0a |("Aa|Ae"|))...{..|
|000027c0| 09 09 45 72 72 4d 73 67 | 20 3d 20 22 22 3b 0d 0a |..ErrMsg| = "";..|
|000027d0| 0d 0a 09 09 52 65 73 70 | 6f 6e 73 65 2e 53 75 62 |....Resp|onse.Sub|
|000027e0| 73 74 28 22 53 65 63 74 | 69 6f 6e 22 2c 20 45 64 |st("Sect|ion", Ed|
|000027f0| 69 74 55 73 65 72 54 69 | 74 6c 65 29 3b 0d 0a 0d |itUserTi|tle);...|
|00002800| 0a 09 09 78 55 73 65 72 | 20 3d 20 4c 65 76 65 6c |...xUser| = Level|
|00002810| 2e 47 61 6d 65 2e 41 63 | 63 65 73 73 43 6f 6e 74 |.Game.Ac|cessCont|
|00002820| 72 6f 6c 2e 47 65 74 55 | 73 65 72 28 52 65 71 75 |rol.GetU|ser(Requ|
|00002830| 65 73 74 2e 47 65 74 56 | 61 72 69 61 62 6c 65 28 |est.GetV|ariable(|
|00002840| 22 65 64 69 74 22 29 29 | 3b 0d 0a 09 09 69 66 20 |"edit"))|;....if |
|00002850| 28 78 55 73 65 72 20 21 | 3d 20 4e 6f 6e 65 29 0d |(xUser !|= None).|
|00002860| 0a 09 09 7b 0d 0a 09 09 | 09 69 66 20 28 43 75 72 |...{....|.if (Cur|
|00002870| 41 64 6d 69 6e 2e 43 61 | 6e 4d 61 6e 61 67 65 55 |Admin.Ca|nManageU|
|00002880| 73 65 72 28 78 55 73 65 | 72 29 29 0d 0a 09 09 09 |ser(xUse|r)).....|
|00002890| 7b 0d 0a 09 09 09 09 2f | 2f 20 4f 70 65 72 61 74 |{....../|/ Operat|
|000028a0| 69 6f 6e 73 0d 0a 09 09 | 09 09 69 66 20 28 52 65 |ions....|..if (Re|
|000028b0| 71 75 65 73 74 2e 47 65 | 74 56 61 72 69 61 62 6c |quest.Ge|tVariabl|
|000028c0| 65 28 22 6d 6f 64 22 29 | 20 21 3d 20 22 22 29 0d |e("mod")| != "").|
|000028d0| 0a 09 09 09 09 7b 0d 0a | 09 09 09 09 09 2f 2f 20 |.....{..|.....// |
|000028e0| 56 61 6c 69 64 61 74 65 | 20 74 68 65 20 63 68 61 |Validate| the cha|
|000028f0| 6e 67 65 73 20 61 6e 64 | 20 6d 6f 64 69 66 79 20 |nges and| modify |
|00002900| 74 68 65 20 75 73 65 72 | 20 69 6e 66 6f 72 6d 61 |the user| informa|
|00002910| 74 69 6f 6e 0d 0a 09 09 | 09 09 09 75 6e 61 6d 65 |tion....|...uname|
|00002920| 20 3d 20 52 65 71 75 65 | 73 74 2e 47 65 74 56 61 | = Reque|st.GetVa|
|00002930| 72 69 61 62 6c 65 28 22 | 55 73 65 72 6e 61 6d 65 |riable("|Username|
|00002940| 22 29 3b 0d 0a 09 09 09 | 09 09 75 70 61 73 73 20 |");.....|..upass |
|00002950| 3d 20 52 65 71 75 65 73 | 74 2e 47 65 74 56 61 72 |= Reques|t.GetVar|
|00002960| 69 61 62 6c 65 28 22 50 | 61 73 73 77 6f 72 64 22 |iable("P|assword"|
|00002970| 29 3b 0d 0a 09 09 09 09 | 09 70 72 69 76 73 20 3d |);......|.privs =|
|00002980| 20 46 69 78 50 72 69 76 | 73 28 52 65 71 75 65 73 | FixPriv|s(Reques|
|00002990| 74 2c 20 78 55 73 65 72 | 2e 50 72 69 76 69 6c 65 |t, xUser|.Privile|
|000029a0| 67 65 73 29 3b 0d 0a 09 | 09 09 09 09 69 66 20 28 |ges);...|....if (|
|000029b0| 75 6e 61 6d 65 20 21 3d | 20 78 55 73 65 72 2e 55 |uname !=| xUser.U|
|000029c0| 73 65 72 4e 61 6d 65 29 | 0d 0a 09 09 09 09 09 7b |serName)|.......{|
|000029d0| 0d 0a 09 09 09 09 09 09 | 69 66 20 28 78 55 73 65 |........|if (xUse|
|000029e0| 72 2e 56 61 6c 69 64 4e | 61 6d 65 28 75 6e 61 6d |r.ValidN|ame(unam|
|000029f0| 65 29 29 0d 0a 09 09 09 | 09 09 09 7b 0d 0a 09 09 |e)).....|...{....|
|00002a00| 09 09 09 09 09 69 66 20 | 28 4c 65 76 65 6c 2e 47 |.....if |(Level.G|
|00002a10| 61 6d 65 2e 41 63 63 65 | 73 73 43 6f 6e 74 72 6f |ame.Acce|ssContro|
|00002a20| 6c 2e 47 65 74 55 73 65 | 72 28 75 6e 61 6d 65 29 |l.GetUse|r(uname)|
|00002a30| 20 3d 3d 20 4e 6f 6e 65 | 29 0d 0a 09 09 09 09 09 | == None|).......|
|00002a40| 09 09 09 78 55 73 65 72 | 2e 55 73 65 72 4e 61 6d |...xUser|.UserNam|
|00002a50| 65 20 3d 20 75 6e 61 6d | 65 3b 0d 0a 09 09 09 09 |e = unam|e;......|
|00002a60| 09 09 09 65 6c 73 65 0d | 0a 09 09 09 09 09 09 09 |...else.|........|
|00002a70| 09 45 72 72 4d 73 67 20 | 3d 20 4e 61 6d 65 45 78 |.ErrMsg |= NameEx|
|00002a80| 69 73 74 73 40 55 73 65 | 72 3b 0d 0a 09 09 09 09 |ists@Use|r;......|
|00002a90| 09 09 7d 0d 0a 09 09 09 | 09 09 09 65 6c 73 65 0d |..}.....|...else.|
|00002aa0| 0a 09 09 09 09 09 09 09 | 45 72 72 4d 73 67 20 3d |........|ErrMsg =|
|00002ab0| 20 52 65 70 6c 28 49 6e | 76 61 6c 69 64 43 68 61 | Repl(In|validCha|
|00002ac0| 72 61 63 74 65 72 73 2c | 20 22 25 49 74 65 6d 25 |racters,| "%Item%|
|00002ad0| 22 2c 20 55 73 65 72 29 | 3b 0d 0a 09 09 09 09 09 |", User)|;.......|
|00002ae0| 7d 0d 0a 0d 0a 09 09 09 | 09 09 69 66 20 28 45 72 |}.......|..if (Er|
|00002af0| 72 4d 73 67 20 3d 3d 20 | 22 22 20 26 26 20 21 28 |rMsg == |"" && !(|
|00002b00| 75 70 61 73 73 20 3d 3d | 20 78 55 73 65 72 2e 50 |upass ==| xUser.P|
|00002b10| 61 73 73 77 6f 72 64 29 | 29 0d 0a 09 09 09 09 09 |assword)|).......|
|00002b20| 7b 0d 0a 09 09 09 09 09 | 09 69 66 20 28 78 55 73 |{.......|.if (xUs|
|00002b30| 65 72 2e 56 61 6c 69 64 | 50 61 73 73 28 75 70 61 |er.Valid|Pass(upa|
|00002b40| 73 73 29 29 0d 0a 09 09 | 09 09 09 09 09 78 55 73 |ss))....|.....xUs|
|00002b50| 65 72 2e 50 61 73 73 77 | 6f 72 64 20 3d 20 75 70 |er.Passw|ord = up|
|00002b60| 61 73 73 3b 0d 0a 09 09 | 09 09 09 09 65 6c 73 65 |ass;....|....else|
|00002b70| 0d 0a 09 09 09 09 09 09 | 09 45 72 72 4d 73 67 20 |........|.ErrMsg |
|00002b80| 3d 20 50 61 73 73 77 6f | 72 64 45 72 72 6f 72 3b |= Passwo|rdError;|
|00002b90| 0d 0a 09 09 09 09 09 7d | 0d 0a 0d 0a 09 09 09 09 |.......}|........|
|00002ba0| 09 69 66 20 28 45 72 72 | 4d 73 67 20 3d 3d 20 22 |.if (Err|Msg == "|
|00002bb0| 22 20 26 26 20 70 72 69 | 76 73 20 21 3d 20 78 55 |" && pri|vs != xU|
|00002bc0| 73 65 72 2e 50 72 69 76 | 69 6c 65 67 65 73 29 0d |ser.Priv|ileges).|
|00002bd0| 0a 09 09 09 09 09 7b 0d | 0a 09 09 09 09 09 09 78 |......{.|.......x|
|00002be0| 55 73 65 72 2e 50 72 69 | 76 69 6c 65 67 65 73 20 |User.Pri|vileges |
|00002bf0| 3d 20 70 72 69 76 73 3b | 0d 0a 09 09 09 09 09 09 |= privs;|........|
|00002c00| 78 55 73 65 72 2e 52 65 | 64 6f 4d 65 72 67 65 64 |xUser.Re|doMerged|
|00002c10| 50 72 69 76 73 28 29 3b | 0d 0a 09 09 09 09 09 7d |Privs();|.......}|
|00002c20| 0d 0a 09 09 09 09 09 69 | 66 20 28 45 72 72 4d 73 |.......i|f (ErrMs|
|00002c30| 67 20 3d 3d 20 22 22 29 | 0d 0a 09 09 09 09 09 09 |g == "")|........|
|00002c40| 4c 65 76 65 6c 2e 47 61 | 6d 65 2e 41 63 63 65 73 |Level.Ga|me.Acces|
|00002c50| 73 43 6f 6e 74 72 6f 6c | 2e 53 61 76 65 41 64 6d |sControl|.SaveAdm|
|00002c60| 69 6e 73 28 29 3b 0d 0a | 09 09 09 09 7d 0d 0a 0d |ins();..|....}...|
|00002c70| 0a 09 09 09 09 69 66 20 | 28 45 72 72 4d 73 67 20 |.....if |(ErrMsg |
|00002c80| 21 3d 20 22 22 29 0d 0a | 09 09 09 09 09 53 74 61 |!= "")..|.....Sta|
|00002c90| 74 75 73 45 72 72 6f 72 | 28 52 65 73 70 6f 6e 73 |tusError|(Respons|
|00002ca0| 65 2c 20 45 72 72 4d 73 | 67 29 3b 0d 0a 0d 0a 09 |e, ErrMs|g);.....|
|00002cb0| 09 09 09 52 65 73 70 6f | 6e 73 65 2e 53 75 62 73 |...Respo|nse.Subs|
|00002cc0| 74 28 22 4e 61 6d 65 56 | 61 6c 75 65 22 2c 20 48 |t("NameV|alue", H|
|00002cd0| 74 6d 6c 45 6e 63 6f 64 | 65 28 78 55 73 65 72 2e |tmlEncod|e(xUser.|
|00002ce0| 55 73 65 72 4e 61 6d 65 | 29 29 3b 0d 0a 09 09 09 |UserName|));.....|
|00002cf0| 09 52 65 73 70 6f 6e 73 | 65 2e 53 75 62 73 74 28 |.Respons|e.Subst(|
|00002d00| 22 50 61 73 73 56 61 6c | 75 65 22 2c 20 48 74 6d |"PassVal|ue", Htm|
|00002d10| 6c 45 6e 63 6f 64 65 28 | 78 55 73 65 72 2e 50 61 |lEncode(|xUser.Pa|
|00002d20| 73 73 77 6f 72 64 29 29 | 3b 0d 0a 09 09 09 09 52 |ssword))|;......R|
|00002d30| 65 73 70 6f 6e 73 65 2e | 53 75 62 73 74 28 22 50 |esponse.|Subst("P|
|00002d40| 72 69 76 54 61 62 6c 65 | 22 2c 20 47 65 74 50 72 |rivTable|", GetPr|
|00002d50| 69 76 73 54 61 62 6c 65 | 28 78 55 73 65 72 2e 50 |ivsTable|(xUser.P|
|00002d60| 72 69 76 69 6c 65 67 65 | 73 29 29 3b 0d 0a 09 09 |rivilege|s));....|
|00002d70| 09 09 52 65 73 70 6f 6e | 73 65 2e 53 75 62 73 74 |..Respon|se.Subst|
|00002d80| 28 22 50 6f 73 74 41 63 | 74 69 6f 6e 22 2c 20 55 |("PostAc|tion", U|
|00002d90| 73 65 72 73 45 64 69 74 | 50 61 67 65 29 3b 0d 0a |sersEdit|Page);..|
|00002da0| 09 09 09 09 52 65 73 70 | 6f 6e 73 65 2e 53 75 62 |....Resp|onse.Sub|
|00002db0| 73 74 28 22 53 75 62 6d | 69 74 4e 61 6d 65 22 2c |st("Subm|itName",|
|00002dc0| 20 22 6d 6f 64 22 29 3b | 0d 0a 09 09 09 09 52 65 | "mod");|......Re|
|00002dd0| 73 70 6f 6e 73 65 2e 53 | 75 62 73 74 28 22 53 75 |sponse.S|ubst("Su|
|00002de0| 62 6d 69 74 56 61 6c 75 | 65 22 2c 20 45 64 69 74 |bmitValu|e", Edit|
|00002df0| 55 73 65 72 42 75 74 74 | 6f 6e 29 3b 0d 0a 09 09 |UserButt|on);....|
|00002e00| 09 09 52 65 73 70 6f 6e | 73 65 2e 53 75 62 73 74 |..Respon|se.Subst|
|00002e10| 28 22 50 61 67 65 48 65 | 6c 70 22 2c 20 4e 6f 74 |("PageHe|lp", Not|
|00002e20| 65 55 73 65 72 45 64 69 | 74 50 61 67 65 29 3b 0d |eUserEdi|tPage);.|
|00002e30| 0a 09 09 09 09 53 68 6f | 77 50 61 67 65 28 52 65 |.....Sho|wPage(Re|
|00002e40| 73 70 6f 6e 73 65 2c 20 | 55 73 65 72 73 45 64 69 |sponse, |UsersEdi|
|00002e50| 74 50 61 67 65 29 3b 0d | 0a 09 09 09 7d 0d 0a 09 |tPage);.|....}...|
|00002e60| 09 09 65 6c 73 65 0d 0a | 09 09 09 7b 0d 0a 09 09 |..else..|...{....|
|00002e70| 09 09 45 72 72 4d 73 67 | 20 3d 20 52 65 70 6c 28 |..ErrMsg| = Repl(|
|00002e80| 49 6e 73 75 66 66 69 63 | 69 65 6e 74 50 72 69 76 |Insuffic|ientPriv|
|00002e90| 73 2c 20 22 25 41 63 74 | 69 6f 6e 25 22 2c 20 4d |s, "%Act|ion%", M|
|00002ea0| 6f 64 69 66 79 29 3b 0d | 0a 09 09 09 09 45 72 72 |odify);.|.....Err|
|00002eb0| 4d 73 67 20 3d 20 52 65 | 70 6c 28 45 72 72 4d 73 |Msg = Re|pl(ErrMs|
|00002ec0| 67 2c 20 22 25 49 74 65 | 6d 25 22 2c 20 55 73 65 |g, "%Ite|m%", Use|
|00002ed0| 72 29 3b 0d 0a 09 09 09 | 09 53 68 6f 77 4d 65 73 |r);.....|.ShowMes|
|00002ee0| 73 61 67 65 28 52 65 73 | 70 6f 6e 73 65 2c 20 50 |sage(Res|ponse, P|
|00002ef0| 72 69 76 54 69 74 6c 65 | 2c 20 45 72 72 4d 73 67 |rivTitle|, ErrMsg|
|00002f00| 29 3b 0d 0a 09 09 09 7d | 0d 0a 09 09 7d 0d 0a 09 |);.....}|....}...|
|00002f10| 09 65 6c 73 65 0d 0a 09 | 09 09 53 68 6f 77 4d 65 |.else...|..ShowMe|
|00002f20| 73 73 61 67 65 28 52 65 | 73 70 6f 6e 73 65 2c 20 |ssage(Re|sponse, |
|00002f30| 41 64 6d 69 6e 4e 6f 74 | 46 6f 75 6e 64 2c 20 52 |AdminNot|Found, R|
|00002f40| 65 70 6c 28 44 6f 65 73 | 4e 6f 74 45 78 69 73 74 |epl(Does|NotExist|
|00002f50| 2c 20 22 25 49 74 65 6d | 25 22 2c 20 55 73 65 72 |, "%Item|%", User|
|00002f60| 29 29 3b 0d 0a 09 7d 0d | 0a 09 65 6c 73 65 0d 0a |));...}.|..else..|
|00002f70| 09 09 41 63 63 65 73 73 | 44 65 6e 69 65 64 28 52 |..Access|Denied(R|
|00002f80| 65 73 70 6f 6e 73 65 29 | 3b 0d 0a 7d 0d 0a 0d 0a |esponse)|;..}....|
|00002f90| 66 75 6e 63 74 69 6f 6e | 20 51 75 65 72 79 55 73 |function| QueryUs|
|00002fa0| 65 72 73 47 72 6f 75 70 | 73 50 61 67 65 28 57 65 |ersGroup|sPage(We|
|00002fb0| 62 52 65 71 75 65 73 74 | 20 52 65 71 75 65 73 74 |bRequest| Request|
|00002fc0| 2c 20 57 65 62 52 65 73 | 70 6f 6e 73 65 20 52 65 |, WebRes|ponse Re|
|00002fd0| 73 70 6f 6e 73 65 29 0d | 0a 7b 0d 0a 6c 6f 63 61 |sponse).|.{..loca|
|00002fe0| 6c 20 78 41 64 6d 69 6e | 55 73 65 72 09 09 78 55 |l xAdmin|User..xU|
|00002ff0| 73 65 72 3b 0d 0a 6c 6f | 63 61 6c 20 78 41 64 6d |ser;..lo|cal xAdm|
|00003000| 69 6e 47 72 6f 75 70 4c | 69 73 74 09 78 47 72 6f |inGroupL|ist.xGro|
|00003010| 75 70 73 3b 0d 0a 6c 6f | 63 61 6c 20 78 41 64 6d |ups;..lo|cal xAdm|
|00003020| 69 6e 47 72 6f 75 70 09 | 09 78 47 72 6f 75 70 3b |inGroup.|.xGroup;|
|00003030| 0d 0a 6c 6f 63 61 6c 20 | 53 74 72 69 6e 67 41 72 |..local |StringAr|
|00003040| 72 61 79 09 20 20 47 72 | 70 4e 61 6d 65 73 3b 0d |ray. Gr|pNames;.|
|00003050| 0a 6c 6f 63 61 6c 20 73 | 74 72 69 6e 67 20 47 72 |.local s|tring Gr|
|00003060| 6f 75 70 52 6f 77 73 2c | 20 47 72 70 4e 61 6d 65 |oupRows,| GrpName|
|00003070| 2c 20 53 74 72 3b 0d 0a | 6c 6f 63 61 6c 20 69 6e |, Str;..|local in|
|00003080| 74 20 69 3b 0d 0a 6c 6f | 63 61 6c 20 62 6f 6f 6c |t i;..lo|cal bool|
|00003090| 20 62 4d 6f 64 69 66 79 | 2c 20 62 43 68 65 63 6b | bModify|, bCheck|
|000030a0| 65 64 3b 0d 0a 0d 0a 09 | 69 66 20 28 43 61 6e 50 |ed;.....|if (CanP|
|000030b0| 65 72 66 6f 72 6d 28 22 | 41 67 22 29 29 0d 0a 09 |erform("|Ag"))...|
|000030c0| 7b 0d 0a 09 09 78 55 73 | 65 72 20 3d 20 4c 65 76 |{....xUs|er = Lev|
|000030d0| 65 6c 2e 47 61 6d 65 2e | 41 63 63 65 73 73 43 6f |el.Game.|AccessCo|
|000030e0| 6e 74 72 6f 6c 2e 55 73 | 65 72 73 2e 46 69 6e 64 |ntrol.Us|ers.Find|
|000030f0| 42 79 4e 61 6d 65 28 52 | 65 71 75 65 73 74 2e 47 |ByName(R|equest.G|
|00003100| 65 74 56 61 72 69 61 62 | 6c 65 28 22 65 64 69 74 |etVariab|le("edit|
|00003110| 22 29 29 3b 0d 0a 09 09 | 69 66 20 28 78 55 73 65 |"));....|if (xUse|
|00003120| 72 20 21 3d 20 4e 6f 6e | 65 29 0d 0a 09 09 7b 0d |r != Non|e)....{.|
|00003130| 0a 09 09 09 69 66 20 28 | 43 75 72 41 64 6d 69 6e |....if (|CurAdmin|
|00003140| 2e 43 61 6e 4d 61 6e 61 | 67 65 55 73 65 72 28 78 |.CanMana|geUser(x|
|00003150| 55 73 65 72 29 29 0d 0a | 09 09 09 7b 0d 0a 09 09 |User))..|...{....|
|00003160| 09 09 69 66 20 28 43 75 | 72 41 64 6d 69 6e 2e 62 |..if (Cu|rAdmin.b|
|00003170| 4d 61 73 74 65 72 41 64 | 6d 69 6e 29 0d 0a 09 09 |MasterAd|min)....|
|00003180| 09 09 09 78 47 72 6f 75 | 70 73 20 3d 20 4c 65 76 |...xGrou|ps = Lev|
|00003190| 65 6c 2e 47 61 6d 65 2e | 41 63 63 65 73 73 43 6f |el.Game.|AccessCo|
|000031a0| 6e 74 72 6f 6c 2e 47 72 | 6f 75 70 73 3b 0d 0a 09 |ntrol.Gr|oups;...|
|000031b0| 09 09 09 65 6c 73 65 0d | 0a 09 09 09 09 09 78 47 |...else.|......xG|
|000031c0| 72 6f 75 70 73 20 3d 20 | 43 75 72 41 64 6d 69 6e |roups = |CurAdmin|
|000031d0| 2e 4d 61 6e 61 67 65 64 | 47 72 6f 75 70 73 3b 0d |.Managed|Groups;.|
|000031e0| 0a 0d 0a 09 09 09 09 2f | 2f 20 57 6f 72 6b 20 77 |......./|/ Work w|
|000031f0| 69 74 68 20 61 20 74 61 | 62 6c 65 20 6f 66 20 63 |ith a ta|ble of c|
|00003200| 68 65 63 6b 62 6f 78 65 | 73 20 6e 6f 77 0d 0a 09 |heckboxe|s now...|
|00003210| 09 09 09 47 72 6f 75 70 | 52 6f 77 73 20 3d 20 22 |...Group|Rows = "|
|00003220| 22 3b 0d 0a 09 09 09 09 | 62 4d 6f 64 69 66 79 20 |";......|bModify |
|00003230| 3d 20 28 52 65 71 75 65 | 73 74 2e 47 65 74 56 61 |= (Reque|st.GetVa|
|00003240| 72 69 61 62 6c 65 28 22 | 73 75 62 6d 69 74 22 29 |riable("|submit")|
|00003250| 20 21 3d 20 22 22 29 3b | 0d 0a 0d 0a 09 09 09 09 | != "");|........|
|00003260| 2f 2f 20 4d 61 6b 65 20 | 61 20 73 6f 72 74 65 64 |// Make |a sorted|
|00003270| 20 6c 69 73 74 20 6f 66 | 20 47 72 6f 75 70 73 0d | list of| Groups.|
|00003280| 0a 09 09 09 09 47 72 70 | 4e 61 6d 65 73 20 3d 20 |.....Grp|Names = |
|00003290| 6e 65 77 28 4e 6f 6e 65 | 29 63 6c 61 73 73 27 53 |new(None|)class'S|
|000032a0| 6f 72 74 65 64 53 74 72 | 69 6e 67 41 72 72 61 79 |ortedStr|ingArray|
|000032b0| 27 3b 0d 0a 09 09 09 09 | 66 6f 72 20 28 69 3d 30 |';......|for (i=0|
|000032c0| 3b 20 69 3c 78 47 72 6f | 75 70 73 2e 43 6f 75 6e |; i<xGro|ups.Coun|
|000032d0| 74 28 29 3b 20 69 2b 2b | 29 0d 0a 09 09 09 09 09 |t(); i++|).......|
|000032e0| 47 72 70 4e 61 6d 65 73 | 2e 41 64 64 28 78 47 72 |GrpNames|.Add(xGr|
|000032f0| 6f 75 70 73 2e 47 65 74 | 28 69 29 2e 47 72 6f 75 |oups.Get|(i).Grou|
|00003300| 70 4e 61 6d 65 2c 20 78 | 47 72 6f 75 70 73 2e 47 |pName, x|Groups.G|
|00003310| 65 74 28 69 29 2e 47 72 | 6f 75 70 4e 61 6d 65 29 |et(i).Gr|oupName)|
|00003320| 3b 0d 0a 0d 0a 09 09 09 | 09 66 6f 72 20 28 69 3d |;.......|.for (i=|
|00003330| 30 3b 20 69 3c 47 72 70 | 4e 61 6d 65 73 2e 43 6f |0; i<Grp|Names.Co|
|00003340| 75 6e 74 28 29 3b 20 69 | 2b 2b 29 0d 0a 09 09 09 |unt(); i|++).....|
|00003350| 09 7b 0d 0a 09 09 09 09 | 09 47 72 70 4e 61 6d 65 |.{......|.GrpName|
|00003360| 20 3d 20 47 72 70 4e 61 | 6d 65 73 2e 47 65 74 49 | = GrpNa|mes.GetI|
|00003370| 74 65 6d 28 69 29 3b 0d | 0a 09 09 09 09 09 78 47 |tem(i);.|......xG|
|00003380| 72 6f 75 70 20 3d 20 78 | 47 72 6f 75 70 73 2e 46 |roup = x|Groups.F|
|00003390| 69 6e 64 42 79 4e 61 6d | 65 28 47 72 70 4e 61 6d |indByNam|e(GrpNam|
|000033a0| 65 29 3b 0d 0a 09 09 09 | 09 09 62 43 68 65 63 6b |e);.....|..bCheck|
|000033b0| 65 64 20 3d 20 52 65 71 | 75 65 73 74 2e 47 65 74 |ed = Req|uest.Get|
|000033c0| 56 61 72 69 61 62 6c 65 | 28 47 72 70 4e 61 6d 65 |Variable|(GrpName|
|000033d0| 29 20 21 3d 20 22 22 3b | 0d 0a 0d 0a 09 09 09 09 |) != "";|........|
|000033e0| 09 69 66 20 28 62 4d 6f | 64 69 66 79 29 0d 0a 09 |.if (bMo|dify)...|
|000033f0| 09 09 09 09 7b 0d 0a 09 | 09 09 09 09 09 69 66 20 |....{...|.....if |
|00003400| 28 78 55 73 65 72 2e 47 | 72 6f 75 70 73 2e 43 6f |(xUser.G|roups.Co|
|00003410| 6e 74 61 69 6e 73 28 78 | 47 72 6f 75 70 29 29 0d |ntains(x|Group)).|
|00003420| 0a 09 09 09 09 09 09 7b | 0d 0a 09 09 09 09 09 09 |.......{|........|
|00003430| 09 69 66 20 28 21 62 43 | 68 65 63 6b 65 64 29 09 |.if (!bC|hecked).|
|00003440| 2f 2f 20 52 65 6d 6f 76 | 65 20 74 68 65 20 78 55 |// Remov|e the xU|
|00003450| 73 65 72 20 66 72 6f 6d | 20 74 68 65 20 67 72 6f |ser from| the gro|
|00003460| 75 70 0d 0a 09 09 09 09 | 09 09 09 09 78 55 73 65 |up......|....xUse|
|00003470| 72 2e 52 65 6d 6f 76 65 | 47 72 6f 75 70 28 78 47 |r.Remove|Group(xG|
|00003480| 72 6f 75 70 29 3b 0d 0a | 09 09 09 09 09 09 7d 0d |roup);..|......}.|
|00003490| 0a 09 09 09 09 09 09 65 | 6c 73 65 0d 0a 09 09 09 |.......e|lse.....|
|000034a0| 09 09 09 7b 0d 0a 09 09 | 09 09 09 09 09 69 66 20 |...{....|.....if |
|000034b0| 28 62 43 68 65 63 6b 65 | 64 29 0d 0a 09 09 09 09 |(bChecke|d)......|
|000034c0| 09 09 09 09 78 55 73 65 | 72 2e 41 64 64 47 72 6f |....xUse|r.AddGro|
|000034d0| 75 70 28 78 47 72 6f 75 | 70 29 3b 0d 0a 09 09 09 |up(xGrou|p);.....|
|000034e0| 09 09 09 7d 0d 0a 09 09 | 09 09 09 7d 0d 0a 09 09 |...}....|...}....|
|000034f0| 09 09 09 52 65 73 70 6f | 6e 73 65 2e 53 75 62 73 |...Respo|nse.Subs|
|00003500| 74 28 22 47 72 6f 75 70 | 4e 61 6d 65 22 2c 20 47 |t("Group|Name", G|
|00003510| 72 70 4e 61 6d 65 29 3b | 0d 0a 0d 0a 09 09 09 09 |rpName);|........|
|00003520| 09 53 74 72 20 3d 20 22 | 22 3b 0d 0a 09 09 09 09 |.Str = "|";......|
|00003530| 09 69 66 20 28 78 55 73 | 65 72 2e 47 72 6f 75 70 |.if (xUs|er.Group|
|00003540| 73 2e 43 6f 6e 74 61 69 | 6e 73 28 78 47 72 6f 75 |s.Contai|ns(xGrou|
|00003550| 70 29 29 0d 0a 09 09 09 | 09 09 09 53 74 72 20 3d |p)).....|...Str =|
|00003560| 20 22 20 63 68 65 63 6b | 65 64 22 3b 0d 0a 09 09 | " check|ed";....|
|00003570| 09 09 09 52 65 73 70 6f | 6e 73 65 2e 53 75 62 73 |...Respo|nse.Subs|
|00003580| 74 28 22 43 68 65 63 6b | 65 64 22 2c 20 53 74 72 |t("Check|ed", Str|
|00003590| 29 3b 0d 0a 09 09 09 09 | 09 47 72 6f 75 70 52 6f |);......|.GroupRo|
|000035a0| 77 73 20 24 3d 20 57 65 | 62 49 6e 63 6c 75 64 65 |ws $= We|bInclude|
|000035b0| 28 22 75 73 65 72 73 5f | 67 72 6f 75 70 73 5f 72 |("users_|groups_r|
|000035c0| 6f 77 22 29 3b 0d 0a 09 | 09 09 09 7d 0d 0a 0d 0a |ow");...|...}....|
|000035d0| 09 09 09 09 69 66 20 28 | 62 4d 6f 64 69 66 79 29 |....if (|bModify)|
|000035e0| 0d 0a 09 09 09 09 09 4c | 65 76 65 6c 2e 47 61 6d |.......L|evel.Gam|
|000035f0| 65 2e 41 63 63 65 73 73 | 43 6f 6e 74 72 6f 6c 2e |e.Access|Control.|
|00003600| 53 61 76 65 41 64 6d 69 | 6e 73 28 29 3b 0d 0a 0d |SaveAdmi|ns();...|
|00003610| 0a 09 09 09 09 2f 2f 20 | 4e 6f 77 20 6a 75 73 74 |.....// |Now just|
|00003620| 20 62 75 69 6c 64 20 75 | 70 20 74 68 65 20 70 61 | build u|p the pa|
|00003630| 67 65 20 61 73 20 61 20 | 74 61 62 6c 65 20 77 69 |ge as a |table wi|
|00003640| 74 68 20 63 68 65 63 6b | 62 6f 78 65 73 0d 0a 09 |th check|boxes...|
|00003650| 09 09 09 52 65 73 70 6f | 6e 73 65 2e 53 75 62 73 |...Respo|nse.Subs|
|00003660| 74 28 22 4e 61 6d 65 56 | 61 6c 75 65 22 2c 20 48 |t("NameV|alue", H|
|00003670| 74 6d 6c 45 6e 63 6f 64 | 65 28 78 55 73 65 72 2e |tmlEncod|e(xUser.|
|00003680| 55 73 65 72 4e 61 6d 65 | 29 29 3b 0d 0a 09 09 09 |UserName|));.....|
|00003690| 09 52 65 73 70 6f 6e 73 | 65 2e 53 75 62 73 74 28 |.Respons|e.Subst(|
|000036a0| 22 47 72 6f 75 70 52 6f | 77 73 22 2c 20 47 72 6f |"GroupRo|ws", Gro|
|000036b0| 75 70 52 6f 77 73 29 3b | 0d 0a 09 09 09 09 52 65 |upRows);|......Re|
|000036c0| 73 70 6f 6e 73 65 2e 53 | 75 62 73 74 28 22 50 6f |sponse.S|ubst("Po|
|000036d0| 73 74 41 63 74 69 6f 6e | 22 2c 20 55 73 65 72 73 |stAction|", Users|
|000036e0| 47 72 6f 75 70 73 50 61 | 67 65 29 3b 0d 0a 09 09 |GroupsPa|ge);....|
|000036f0| 09 09 52 65 73 70 6f 6e | 73 65 2e 53 75 62 73 74 |..Respon|se.Subst|
|00003700| 28 22 53 65 63 74 69 6f | 6e 22 2c 20 4d 6f 64 69 |("Sectio|n", Modi|
|00003710| 66 79 55 73 65 72 47 72 | 6f 75 70 40 48 74 6d 6c |fyUserGr|oup@Html|
|00003720| 45 6e 63 6f 64 65 28 78 | 55 73 65 72 2e 55 73 65 |Encode(x|User.Use|
|00003730| 72 4e 61 6d 65 29 29 3b | 0d 0a 09 09 09 09 52 65 |rName));|......Re|
|00003740| 73 70 6f 6e 73 65 2e 53 | 75 62 73 74 28 22 50 61 |sponse.S|ubst("Pa|
|00003750| 67 65 48 65 6c 70 22 2c | 20 4e 6f 74 65 47 72 6f |geHelp",| NoteGro|
|00003760| 75 70 41 63 63 65 73 73 | 50 61 67 65 29 3b 0d 0a |upAccess|Page);..|
|00003770| 09 09 09 09 53 68 6f 77 | 50 61 67 65 28 52 65 73 |....Show|Page(Res|
|00003780| 70 6f 6e 73 65 2c 20 55 | 73 65 72 73 47 72 6f 75 |ponse, U|sersGrou|
|00003790| 70 73 50 61 67 65 29 3b | 0d 0a 09 09 09 7d 0d 0a |psPage);|.....}..|
|000037a0| 09 09 09 65 6c 73 65 0d | 0a 09 09 09 7b 0d 0a 09 |...else.|....{...|
|000037b0| 09 09 09 53 74 72 20 3d | 20 52 65 70 6c 28 49 6e |...Str =| Repl(In|
|000037c0| 73 75 66 66 69 63 69 65 | 6e 74 50 72 69 76 73 2c |sufficie|ntPrivs,|
|000037d0| 20 22 25 41 63 74 69 6f | 6e 25 22 2c 20 4d 6f 64 | "%Actio|n%", Mod|
|000037e0| 69 66 79 29 3b 0d 0a 09 | 09 09 09 53 74 72 20 3d |ify);...|...Str =|
|000037f0| 20 52 65 70 6c 28 53 74 | 72 2c 20 22 25 49 74 65 | Repl(St|r, "%Ite|
|00003800| 6d 25 22 2c 20 55 73 65 | 72 29 3b 0d 0a 09 09 09 |m%", Use|r);.....|
|00003810| 09 53 68 6f 77 4d 65 73 | 73 61 67 65 28 52 65 73 |.ShowMes|sage(Res|
|00003820| 70 6f 6e 73 65 2c 20 50 | 72 69 76 54 69 74 6c 65 |ponse, P|rivTitle|
|00003830| 2c 20 53 74 72 29 3b 0d | 0a 09 09 09 7d 0d 0a 09 |, Str);.|....}...|
|00003840| 09 7d 0d 0a 09 09 65 6c | 73 65 0d 0a 09 09 09 53 |.}....el|se.....S|
|00003850| 68 6f 77 4d 65 73 73 61 | 67 65 28 52 65 73 70 6f |howMessa|ge(Respo|
|00003860| 6e 73 65 2c 20 41 64 6d | 69 6e 4e 6f 74 46 6f 75 |nse, Adm|inNotFou|
|00003870| 6e 64 2c 20 52 65 70 6c | 28 44 6f 65 73 4e 6f 74 |nd, Repl|(DoesNot|
|00003880| 45 78 69 73 74 2c 20 22 | 25 49 74 65 6d 25 22 2c |Exist, "|%Item%",|
|00003890| 20 55 73 65 72 29 29 3b | 0d 0a 09 7d 0d 0a 09 65 | User));|...}...e|
|000038a0| 6c 73 65 0d 0a 09 09 41 | 63 63 65 73 73 44 65 6e |lse....A|ccessDen|
|000038b0| 69 65 64 28 52 65 73 70 | 6f 6e 73 65 29 3b 0d 0a |ied(Resp|onse);..|
|000038c0| 7d 0d 0a 0d 0a 66 75 6e | 63 74 69 6f 6e 20 51 75 |}....fun|ction Qu|
|000038d0| 65 72 79 55 73 65 72 73 | 4d 47 72 6f 75 70 73 50 |eryUsers|MGroupsP|
|000038e0| 61 67 65 28 57 65 62 52 | 65 71 75 65 73 74 20 52 |age(WebR|equest R|
|000038f0| 65 71 75 65 73 74 2c 20 | 57 65 62 52 65 73 70 6f |equest, |WebRespo|
|00003900| 6e 73 65 20 52 65 73 70 | 6f 6e 73 65 29 0d 0a 7b |nse Resp|onse)..{|
|00003910| 0d 0a 6c 6f 63 61 6c 20 | 78 41 64 6d 69 6e 55 73 |..local |xAdminUs|
|00003920| 65 72 09 09 78 55 73 65 | 72 3b 0d 0a 6c 6f 63 61 |er..xUse|r;..loca|
|00003930| 6c 20 78 41 64 6d 69 6e | 47 72 6f 75 70 4c 69 73 |l xAdmin|GroupLis|
|00003940| 74 09 78 47 72 6f 75 70 | 73 3b 0d 0a 6c 6f 63 61 |t.xGroup|s;..loca|
|00003950| 6c 20 78 41 64 6d 69 6e | 47 72 6f 75 70 09 09 78 |l xAdmin|Group..x|
|00003960| 47 72 6f 75 70 3b 0d 0a | 6c 6f 63 61 6c 20 53 74 |Group;..|local St|
|00003970| 72 69 6e 67 41 72 72 61 | 79 09 20 20 47 72 70 4e |ringArra|y. GrpN|
|00003980| 61 6d 65 73 3b 0d 0a 6c | 6f 63 61 6c 20 73 74 72 |ames;..l|ocal str|
|00003990| 69 6e 67 20 47 72 6f 75 | 70 52 6f 77 73 2c 20 47 |ing Grou|pRows, G|
|000039a0| 72 70 4e 61 6d 65 2c 20 | 53 74 72 3b 0d 0a 6c 6f |rpName, |Str;..lo|
|000039b0| 63 61 6c 20 69 6e 74 20 | 69 3b 0d 0a 6c 6f 63 61 |cal int |i;..loca|
|000039c0| 6c 20 62 6f 6f 6c 20 62 | 4d 6f 64 69 66 79 2c 20 |l bool b|Modify, |
|000039d0| 62 43 68 65 63 6b 65 64 | 3b 0d 0a 0d 0a 09 69 66 |bChecked|;.....if|
|000039e0| 20 28 43 61 6e 50 65 72 | 66 6f 72 6d 28 22 41 6d | (CanPer|form("Am|
|000039f0| 22 29 29 0d 0a 09 7b 0d | 0a 0d 0a 09 09 78 55 73 |"))...{.|.....xUs|
|00003a00| 65 72 20 3d 20 4c 65 76 | 65 6c 2e 47 61 6d 65 2e |er = Lev|el.Game.|
|00003a10| 41 63 63 65 73 73 43 6f | 6e 74 72 6f 6c 2e 55 73 |AccessCo|ntrol.Us|
|00003a20| 65 72 73 2e 46 69 6e 64 | 42 79 4e 61 6d 65 28 52 |ers.Find|ByName(R|
|00003a30| 65 71 75 65 73 74 2e 47 | 65 74 56 61 72 69 61 62 |equest.G|etVariab|
|00003a40| 6c 65 28 22 65 64 69 74 | 22 29 29 3b 0d 0a 09 09 |le("edit|"));....|
|00003a50| 69 66 20 28 78 55 73 65 | 72 20 21 3d 20 4e 6f 6e |if (xUse|r != Non|
|00003a60| 65 29 0d 0a 09 09 7b 0d | 0a 09 09 09 69 66 20 28 |e)....{.|....if (|
|00003a70| 43 75 72 41 64 6d 69 6e | 2e 43 61 6e 4d 61 6e 61 |CurAdmin|.CanMana|
|00003a80| 67 65 55 73 65 72 28 78 | 55 73 65 72 29 29 0d 0a |geUser(x|User))..|
|00003a90| 09 09 09 7b 0d 0a 09 09 | 09 09 69 66 20 28 43 75 |...{....|..if (Cu|
|00003aa0| 72 41 64 6d 69 6e 2e 62 | 4d 61 73 74 65 72 41 64 |rAdmin.b|MasterAd|
|00003ab0| 6d 69 6e 29 0d 0a 09 09 | 09 09 09 78 47 72 6f 75 |min)....|...xGrou|
|00003ac0| 70 73 20 3d 20 4c 65 76 | 65 6c 2e 47 61 6d 65 2e |ps = Lev|el.Game.|
|00003ad0| 41 63 63 65 73 73 43 6f | 6e 74 72 6f 6c 2e 47 72 |AccessCo|ntrol.Gr|
|00003ae0| 6f 75 70 73 3b 0d 0a 09 | 09 09 09 65 6c 73 65 0d |oups;...|...else.|
|00003af0| 0a 09 09 09 09 09 78 47 | 72 6f 75 70 73 20 3d 20 |......xG|roups = |
|00003b00| 43 75 72 41 64 6d 69 6e | 2e 4d 61 6e 61 67 65 64 |CurAdmin|.Managed|
|00003b10| 47 72 6f 75 70 73 3b 0d | 0a 0d 0a 09 09 09 09 2f |Groups;.|......./|
|00003b20| 2f 20 57 6f 72 6b 20 77 | 69 74 68 20 61 20 74 61 |/ Work w|ith a ta|
|00003b30| 62 6c 65 20 6f 66 20 63 | 68 65 63 6b 62 6f 78 65 |ble of c|heckboxe|
|00003b40| 73 20 6e 6f 77 0d 0a 09 | 09 09 09 47 72 6f 75 70 |s now...|...Group|
|00003b50| 52 6f 77 73 20 3d 20 22 | 22 3b 0d 0a 09 09 09 09 |Rows = "|";......|
|00003b60| 62 4d 6f 64 69 66 79 20 | 3d 20 28 52 65 71 75 65 |bModify |= (Reque|
|00003b70| 73 74 2e 47 65 74 56 61 | 72 69 61 62 6c 65 28 22 |st.GetVa|riable("|
|00003b80| 73 75 62 6d 69 74 22 29 | 20 21 3d 20 22 22 29 3b |submit")| != "");|
|00003b90| 0d 0a 0d 0a 09 09 09 09 | 2f 2f 20 4d 61 6b 65 20 |........|// Make |
|00003ba0| 61 20 73 6f 72 74 65 64 | 20 6c 69 73 74 20 6f 66 |a sorted| list of|
|00003bb0| 20 47 72 6f 75 70 73 0d | 0a 09 09 09 09 47 72 70 | Groups.|.....Grp|
|00003bc0| 4e 61 6d 65 73 20 3d 20 | 6e 65 77 28 4e 6f 6e 65 |Names = |new(None|
|00003bd0| 29 63 6c 61 73 73 27 53 | 6f 72 74 65 64 53 74 72 |)class'S|ortedStr|
|00003be0| 69 6e 67 41 72 72 61 79 | 27 3b 0d 0a 09 09 09 09 |ingArray|';......|
|00003bf0| 66 6f 72 20 28 69 3d 30 | 3b 20 69 3c 78 47 72 6f |for (i=0|; i<xGro|
|00003c00| 75 70 73 2e 43 6f 75 6e | 74 28 29 3b 20 69 2b 2b |ups.Coun|t(); i++|
|00003c10| 29 0d 0a 09 09 09 09 09 | 47 72 70 4e 61 6d 65 73 |).......|GrpNames|
|00003c20| 2e 41 64 64 28 78 47 72 | 6f 75 70 73 2e 47 65 74 |.Add(xGr|oups.Get|
|00003c30| 28 69 29 2e 47 72 6f 75 | 70 4e 61 6d 65 2c 20 78 |(i).Grou|pName, x|
|00003c40| 47 72 6f 75 70 73 2e 47 | 65 74 28 69 29 2e 47 72 |Groups.G|et(i).Gr|
|00003c50| 6f 75 70 4e 61 6d 65 29 | 3b 0d 0a 0d 0a 09 09 09 |oupName)|;.......|
|00003c60| 09 66 6f 72 20 28 69 3d | 30 3b 20 69 3c 47 72 70 |.for (i=|0; i<Grp|
|00003c70| 4e 61 6d 65 73 2e 43 6f | 75 6e 74 28 29 3b 20 69 |Names.Co|unt(); i|
|00003c80| 2b 2b 29 0d 0a 09 09 09 | 09 7b 0d 0a 09 09 09 09 |++).....|.{......|
|00003c90| 09 47 72 70 4e 61 6d 65 | 20 3d 20 47 72 70 4e 61 |.GrpName| = GrpNa|
|00003ca0| 6d 65 73 2e 47 65 74 49 | 74 65 6d 28 69 29 3b 0d |mes.GetI|tem(i);.|
|00003cb0| 0a 09 09 09 09 09 78 47 | 72 6f 75 70 20 3d 20 78 |......xG|roup = x|
|00003cc0| 47 72 6f 75 70 73 2e 46 | 69 6e 64 42 79 4e 61 6d |Groups.F|indByNam|
|00003cd0| 65 28 47 72 70 4e 61 6d | 65 29 3b 0d 0a 09 09 09 |e(GrpNam|e);.....|
|00003ce0| 09 09 62 43 68 65 63 6b | 65 64 20 3d 20 52 65 71 |..bCheck|ed = Req|
|00003cf0| 75 65 73 74 2e 47 65 74 | 56 61 72 69 61 62 6c 65 |uest.Get|Variable|
|00003d00| 28 47 72 70 4e 61 6d 65 | 29 20 21 3d 20 22 22 3b |(GrpName|) != "";|
|00003d10| 0d 0a 0d 0a 09 09 09 09 | 09 69 66 20 28 62 4d 6f |........|.if (bMo|
|00003d20| 64 69 66 79 29 0d 0a 09 | 09 09 09 09 7b 0d 0a 09 |dify)...|....{...|
|00003d30| 09 09 09 09 09 69 66 20 | 28 78 55 73 65 72 2e 4d |.....if |(xUser.M|
|00003d40| 61 6e 61 67 65 64 47 72 | 6f 75 70 73 2e 43 6f 6e |anagedGr|oups.Con|
|00003d50| 74 61 69 6e 73 28 78 47 | 72 6f 75 70 29 29 0d 0a |tains(xG|roup))..|
|00003d60| 09 09 09 09 09 09 7b 0d | 0a 09 09 09 09 09 09 09 |......{.|........|
|00003d70| 69 66 20 28 21 62 43 68 | 65 63 6b 65 64 29 09 2f |if (!bCh|ecked)./|
|00003d80| 2f 20 52 65 6d 6f 76 65 | 20 74 68 65 20 75 73 65 |/ Remove| the use|
|00003d90| 72 20 66 72 6f 6d 20 74 | 68 65 20 67 72 6f 75 70 |r from t|he group|
|00003da0| 0d 0a 09 09 09 09 09 09 | 09 09 78 55 73 65 72 2e |........|..xUser.|
|00003db0| 52 65 6d 6f 76 65 4d 61 | 6e 61 67 65 64 47 72 6f |RemoveMa|nagedGro|
|00003dc0| 75 70 28 78 47 72 6f 75 | 70 29 3b 0d 0a 09 09 09 |up(xGrou|p);.....|
|00003dd0| 09 09 09 7d 0d 0a 09 09 | 09 09 09 09 65 6c 73 65 |...}....|....else|
|00003de0| 0d 0a 09 09 09 09 09 09 | 7b 0d 0a 09 09 09 09 09 |........|{.......|
|00003df0| 09 09 69 66 20 28 62 43 | 68 65 63 6b 65 64 29 0d |..if (bC|hecked).|
|00003e00| 0a 09 09 09 09 09 09 09 | 09 78 55 73 65 72 2e 41 |........|.xUser.A|
|00003e10| 64 64 4d 61 6e 61 67 65 | 64 47 72 6f 75 70 28 78 |ddManage|dGroup(x|
|00003e20| 47 72 6f 75 70 29 3b 0d | 0a 09 09 09 09 09 09 7d |Group);.|.......}|
|00003e30| 0d 0a 09 09 09 09 09 7d | 0d 0a 09 09 09 09 09 52 |.......}|.......R|
|00003e40| 65 73 70 6f 6e 73 65 2e | 53 75 62 73 74 28 22 47 |esponse.|Subst("G|
|00003e50| 72 6f 75 70 4e 61 6d 65 | 22 2c 20 47 72 70 4e 61 |roupName|", GrpNa|
|00003e60| 6d 65 29 3b 0d 0a 0d 0a | 09 09 09 09 09 53 74 72 |me);....|.....Str|
|00003e70| 20 3d 20 22 22 3b 0d 0a | 09 09 09 09 09 69 66 20 | = "";..|.....if |
|00003e80| 28 78 55 73 65 72 2e 4d | 61 6e 61 67 65 64 47 72 |(xUser.M|anagedGr|
|00003e90| 6f 75 70 73 2e 43 6f 6e | 74 61 69 6e 73 28 78 47 |oups.Con|tains(xG|
|00003ea0| 72 6f 75 70 29 29 0d 0a | 09 09 09 09 09 09 53 74 |roup))..|......St|
|00003eb0| 72 20 3d 20 22 20 63 68 | 65 63 6b 65 64 22 3b 0d |r = " ch|ecked";.|
|00003ec0| 0a 09 09 09 09 09 52 65 | 73 70 6f 6e 73 65 2e 53 |......Re|sponse.S|
|00003ed0| 75 62 73 74 28 22 43 68 | 65 63 6b 65 64 22 2c 20 |ubst("Ch|ecked", |
|00003ee0| 53 74 72 29 3b 0d 0a 09 | 09 09 09 09 47 72 6f 75 |Str);...|....Grou|
|00003ef0| 70 52 6f 77 73 20 24 3d | 20 57 65 62 49 6e 63 6c |pRows $=| WebIncl|
|00003f00| 75 64 65 28 22 75 73 65 | 72 73 5f 67 72 6f 75 70 |ude("use|rs_group|
|00003f10| 73 5f 72 6f 77 22 29 3b | 0d 0a 09 09 09 09 7d 0d |s_row");|......}.|
|00003f20| 0a 0d 0a 09 09 09 09 69 | 66 20 28 62 4d 6f 64 69 |.......i|f (bModi|
|00003f30| 66 79 29 0d 0a 09 09 09 | 09 09 4c 65 76 65 6c 2e |fy).....|..Level.|
|00003f40| 47 61 6d 65 2e 41 63 63 | 65 73 73 43 6f 6e 74 72 |Game.Acc|essContr|
|00003f50| 6f 6c 2e 53 61 76 65 41 | 64 6d 69 6e 73 28 29 3b |ol.SaveA|dmins();|
|00003f60| 0d 0a 0d 0a 09 09 09 09 | 2f 2f 20 4e 6f 77 20 6a |........|// Now j|
|00003f70| 75 73 74 20 62 75 69 6c | 64 20 75 70 20 74 68 65 |ust buil|d up the|
|00003f80| 20 70 61 67 65 20 61 73 | 20 61 20 74 61 62 6c 65 | page as| a table|
|00003f90| 20 77 69 74 68 20 63 68 | 65 63 6b 62 6f 78 65 73 | with ch|eckboxes|
|00003fa0| 0d 0a 09 09 09 09 52 65 | 73 70 6f 6e 73 65 2e 53 |......Re|sponse.S|
|00003fb0| 75 62 73 74 28 22 4d 61 | 6e 61 67 65 64 22 2c 20 |ubst("Ma|naged", |
|00003fc0| 4d 61 6e 61 67 65 64 29 | 3b 0d 0a 09 09 09 09 52 |Managed)|;......R|
|00003fd0| 65 73 70 6f 6e 73 65 2e | 53 75 62 73 74 28 22 4e |esponse.|Subst("N|
|00003fe0| 61 6d 65 56 61 6c 75 65 | 22 2c 20 48 74 6d 6c 45 |ameValue|", HtmlE|
|00003ff0| 6e 63 6f 64 65 28 78 55 | 73 65 72 2e 55 73 65 72 |ncode(xU|ser.User|
|00004000| 4e 61 6d 65 29 29 3b 0d | 0a 09 09 09 09 52 65 73 |Name));.|.....Res|
|00004010| 70 6f 6e 73 65 2e 53 75 | 62 73 74 28 22 47 72 6f |ponse.Su|bst("Gro|
|00004020| 75 70 52 6f 77 73 22 2c | 20 47 72 6f 75 70 52 6f |upRows",| GroupRo|
|00004030| 77 73 29 3b 0d 0a 09 09 | 09 09 52 65 73 70 6f 6e |ws);....|..Respon|
|00004040| 73 65 2e 53 75 62 73 74 | 28 22 50 6f 73 74 41 63 |se.Subst|("PostAc|
|00004050| 74 69 6f 6e 22 2c 20 55 | 73 65 72 73 4d 47 72 6f |tion", U|sersMGro|
|00004060| 75 70 73 50 61 67 65 29 | 3b 0d 0a 09 09 09 09 52 |upsPage)|;......R|
|00004070| 65 73 70 6f 6e 73 65 2e | 53 75 62 73 74 28 22 53 |esponse.|Subst("S|
|00004080| 65 63 74 69 6f 6e 22 2c | 20 4d 6f 64 69 66 79 4d |ection",| ModifyM|
|00004090| 55 73 65 72 47 72 6f 75 | 70 40 48 74 6d 6c 45 6e |UserGrou|p@HtmlEn|
|000040a0| 63 6f 64 65 28 78 55 73 | 65 72 2e 55 73 65 72 4e |code(xUs|er.UserN|
|000040b0| 61 6d 65 29 29 3b 0d 0a | 09 09 09 09 52 65 73 70 |ame));..|....Resp|
|000040c0| 6f 6e 73 65 2e 53 75 62 | 73 74 28 22 50 61 67 65 |onse.Sub|st("Page|
|000040d0| 48 65 6c 70 22 2c 20 4e | 6f 74 65 4d 47 72 6f 75 |Help", N|oteMGrou|
|000040e0| 70 41 63 63 65 73 73 50 | 61 67 65 29 3b 0d 0a 09 |pAccessP|age);...|
|000040f0| 09 09 09 53 68 6f 77 50 | 61 67 65 28 52 65 73 70 |...ShowP|age(Resp|
|00004100| 6f 6e 73 65 2c 20 55 73 | 65 72 73 47 72 6f 75 70 |onse, Us|ersGroup|
|00004110| 73 50 61 67 65 29 3b 0d | 0a 09 09 09 7d 0d 0a 09 |sPage);.|....}...|
|00004120| 09 09 65 6c 73 65 0d 0a | 09 09 09 7b 0d 0a 09 09 |..else..|...{....|
|00004130| 09 09 53 74 72 20 3d 20 | 52 65 70 6c 28 49 6e 73 |..Str = |Repl(Ins|
|00004140| 75 66 66 69 63 69 65 6e | 74 50 72 69 76 73 2c 20 |ufficien|tPrivs, |
|00004150| 22 25 41 63 74 69 6f 6e | 25 22 2c 20 4d 6f 64 69 |"%Action|%", Modi|
|00004160| 66 79 29 3b 0d 0a 09 09 | 09 09 53 74 72 20 3d 20 |fy);....|..Str = |
|00004170| 52 65 70 6c 28 53 74 72 | 2c 20 22 25 49 74 65 6d |Repl(Str|, "%Item|
|00004180| 25 22 2c 20 55 73 65 72 | 29 3b 0d 0a 09 09 09 09 |%", User|);......|
|00004190| 53 68 6f 77 4d 65 73 73 | 61 67 65 28 52 65 73 70 |ShowMess|age(Resp|
|000041a0| 6f 6e 73 65 2c 20 50 72 | 69 76 54 69 74 6c 65 2c |onse, Pr|ivTitle,|
|000041b0| 20 53 74 72 29 3b 0d 0a | 09 09 09 7d 0d 0a 09 09 | Str);..|...}....|
|000041c0| 7d 0d 0a 09 09 65 6c 73 | 65 0d 0a 09 09 09 53 68 |}....els|e.....Sh|
|000041d0| 6f 77 4d 65 73 73 61 67 | 65 28 52 65 73 70 6f 6e |owMessag|e(Respon|
|000041e0| 73 65 2c 20 41 64 6d 69 | 6e 4e 6f 74 46 6f 75 6e |se, Admi|nNotFoun|
|000041f0| 64 2c 20 52 65 70 6c 28 | 44 6f 65 73 4e 6f 74 45 |d, Repl(|DoesNotE|
|00004200| 78 69 73 74 2c 20 22 25 | 49 74 65 6d 25 22 2c 20 |xist, "%|Item%", |
|00004210| 55 73 65 72 29 29 3b 0d | 0a 09 7d 0d 0a 09 65 6c |User));.|..}...el|
|00004220| 73 65 0d 0a 09 09 41 63 | 63 65 73 73 44 65 6e 69 |se....Ac|cessDeni|
|00004230| 65 64 28 52 65 73 70 6f | 6e 73 65 29 3b 0d 0a 7d |ed(Respo|nse);..}|
|00004240| 0d 0a 0d 0a 66 75 6e 63 | 74 69 6f 6e 20 51 75 65 |....func|tion Que|
|00004250| 72 79 47 72 6f 75 70 73 | 42 72 6f 77 73 65 50 61 |ryGroups|BrowsePa|
|00004260| 67 65 28 57 65 62 52 65 | 71 75 65 73 74 20 52 65 |ge(WebRe|quest Re|
|00004270| 71 75 65 73 74 2c 20 57 | 65 62 52 65 73 70 6f 6e |quest, W|ebRespon|
|00004280| 73 65 20 52 65 73 70 6f | 6e 73 65 29 0d 0a 7b 0d |se Respo|nse)..{.|
|00004290| 0a 6c 6f 63 61 6c 20 78 | 41 64 6d 69 6e 47 72 6f |.local x|AdminGro|
|000042a0| 75 70 20 78 47 72 6f 75 | 70 3b 0d 0a 6c 6f 63 61 |up xGrou|p;..loca|
|000042b0| 6c 20 73 74 72 69 6e 67 | 20 53 74 72 3b 0d 0a 0d |l string| Str;...|
|000042c0| 0a 09 69 66 20 28 43 61 | 6e 50 65 72 66 6f 72 6d |..if (Ca|nPerform|
|000042d0| 28 22 47 6c 7c 47 65 22 | 29 29 0d 0a 09 7b 0d 0a |("Gl|Ge"|))...{..|
|000042e0| 09 09 52 65 73 70 6f 6e | 73 65 2e 53 75 62 73 74 |..Respon|se.Subst|
|000042f0| 28 22 53 65 63 74 69 6f | 6e 22 2c 20 42 72 6f 77 |("Sectio|n", Brow|
|00004300| 73 65 47 72 6f 75 70 73 | 54 69 74 6c 65 29 3b 0d |seGroups|Title);.|
|00004310| 0a 09 09 69 66 20 28 52 | 65 71 75 65 73 74 2e 47 |...if (R|equest.G|
|00004320| 65 74 56 61 72 69 61 62 | 6c 65 28 22 64 65 6c 65 |etVariab|le("dele|
|00004330| 74 65 22 29 20 21 3d 20 | 22 22 29 0d 0a 09 09 7b |te") != |"")....{|
|00004340| 0d 0a 09 09 09 2f 2f 20 | 44 65 6c 65 74 65 20 73 |.....// |Delete s|
|00004350| 70 65 63 69 66 69 65 64 | 20 41 64 6d 69 6e 20 47 |pecified| Admin G|
|00004360| 72 6f 75 70 0d 0a 09 09 | 09 78 47 72 6f 75 70 20 |roup....|.xGroup |
|00004370| 3d 20 4c 65 76 65 6c 2e | 47 61 6d 65 2e 41 63 63 |= Level.|Game.Acc|
|00004380| 65 73 73 43 6f 6e 74 72 | 6f 6c 2e 47 72 6f 75 70 |essContr|ol.Group|
|00004390| 73 2e 46 69 6e 64 42 79 | 4e 61 6d 65 28 52 65 71 |s.FindBy|Name(Req|
|000043a0| 75 65 73 74 2e 47 65 74 | 56 61 72 69 61 62 6c 65 |uest.Get|Variable|
|000043b0| 28 22 64 65 6c 65 74 65 | 22 29 29 3b 0d 0a 09 09 |("delete|"));....|
|000043c0| 09 69 66 20 28 78 47 72 | 6f 75 70 20 21 3d 20 4e |.if (xGr|oup != N|
|000043d0| 6f 6e 65 29 0d 0a 09 09 | 09 7b 0d 0a 09 09 09 09 |one)....|.{......|
|000043e0| 69 66 20 28 43 75 72 41 | 64 6d 69 6e 2e 43 61 6e |if (CurA|dmin.Can|
|000043f0| 4d 61 6e 61 67 65 47 72 | 6f 75 70 28 78 47 72 6f |ManageGr|oup(xGro|
|00004400| 75 70 29 29 0d 0a 09 09 | 09 09 7b 0d 0a 09 09 09 |up))....|..{.....|
|00004410| 09 09 53 74 61 74 75 73 | 4f 6b 28 52 65 73 70 6f |..Status|Ok(Respo|
|00004420| 6e 73 65 2c 20 52 65 70 | 6c 28 47 72 6f 75 70 52 |nse, Rep|l(GroupR|
|00004430| 65 6d 6f 76 65 64 2c 20 | 22 25 47 72 6f 75 70 4e |emoved, |"%GroupN|
|00004440| 61 6d 65 25 22 2c 20 48 | 74 6d 6c 45 6e 63 6f 64 |ame%", H|tmlEncod|
|00004450| 65 28 78 47 72 6f 75 70 | 2e 47 72 6f 75 70 4e 61 |e(xGroup|.GroupNa|
|00004460| 6d 65 29 29 29 3b 0d 0a | 09 09 09 09 09 78 47 72 |me)));..|.....xGr|
|00004470| 6f 75 70 2e 55 6e 6c 69 | 6e 6b 55 73 65 72 73 28 |oup.Unli|nkUsers(|
|00004480| 29 3b 0d 0a 09 09 09 09 | 09 4c 65 76 65 6c 2e 47 |);......|.Level.G|
|00004490| 61 6d 65 2e 41 63 63 65 | 73 73 43 6f 6e 74 72 6f |ame.Acce|ssContro|
|000044a0| 6c 2e 47 72 6f 75 70 73 | 2e 52 65 6d 6f 76 65 28 |l.Groups|.Remove(|
|000044b0| 78 47 72 6f 75 70 29 3b | 0d 0a 09 09 09 09 09 4c |xGroup);|.......L|
|000044c0| 65 76 65 6c 2e 47 61 6d | 65 2e 41 63 63 65 73 73 |evel.Gam|e.Access|
|000044d0| 43 6f 6e 74 72 6f 6c 2e | 53 61 76 65 41 64 6d 69 |Control.|SaveAdmi|
|000044e0| 6e 73 28 29 3b 0d 0a 09 | 09 09 09 7d 0d 0a 09 09 |ns();...|...}....|
|000044f0| 09 09 65 6c 73 65 0d 0a | 09 09 09 09 7b 0d 0a 09 |..else..|....{...|
|00004500| 09 09 09 09 53 74 72 20 | 3d 20 52 65 70 6c 28 49 |....Str |= Repl(I|
|00004510| 6e 73 75 66 66 69 63 69 | 65 6e 74 50 72 69 76 73 |nsuffici|entPrivs|
|00004520| 2c 20 22 25 41 63 74 69 | 6f 6e 25 22 2c 20 44 65 |, "%Acti|on%", De|
|00004530| 6c 65 74 69 6e 67 29 3b | 0d 0a 09 09 09 09 09 53 |leting);|.......S|
|00004540| 74 72 20 3d 20 52 65 70 | 6c 28 53 74 72 2c 20 22 |tr = Rep|l(Str, "|
|00004550| 25 49 74 65 6d 25 22 2c | 20 47 72 6f 75 70 29 3b |%Item%",| Group);|
|00004560| 0d 0a 09 09 09 09 09 53 | 74 61 74 75 73 45 72 72 |.......S|tatusErr|
|00004570| 6f 72 28 52 65 73 70 6f | 6e 73 65 2c 20 53 74 72 |or(Respo|nse, Str|
|00004580| 29 3b 0d 0a 09 09 09 09 | 7d 0d 0a 09 09 09 7d 0d |);......|}.....}.|
|00004590| 0a 09 09 09 65 6c 73 65 | 0d 0a 09 09 09 09 53 74 |....else|......St|
|000045a0| 61 74 75 73 45 72 72 6f | 72 28 52 65 73 70 6f 6e |atusErro|r(Respon|
|000045b0| 73 65 2c 20 52 65 70 6c | 28 49 6e 76 61 6c 69 64 |se, Repl|(Invalid|
|000045c0| 49 74 65 6d 2c 20 22 25 | 49 74 65 6d 25 22 2c 20 |Item, "%|Item%", |
|000045d0| 47 72 6f 75 70 29 29 3b | 0d 0a 09 09 7d 0d 0a 09 |Group));|....}...|
|000045e0| 09 52 65 73 70 6f 6e 73 | 65 2e 53 75 62 73 74 28 |.Respons|e.Subst(|
|000045f0| 22 42 72 6f 77 73 65 4c | 69 73 74 22 2c 20 47 65 |"BrowseL|ist", Ge|
|00004600| 74 47 72 6f 75 70 73 46 | 6f 72 42 72 6f 77 73 65 |tGroupsF|orBrowse|
|00004610| 28 52 65 73 70 6f 6e 73 | 65 29 29 3b 0d 0a 09 09 |(Respons|e));....|
|00004620| 52 65 73 70 6f 6e 73 65 | 2e 53 75 62 73 74 28 22 |Response|.Subst("|
|00004630| 50 61 67 65 48 65 6c 70 | 22 2c 20 4e 6f 74 65 47 |PageHelp|", NoteG|
|00004640| 72 6f 75 70 73 42 72 6f | 77 73 65 50 61 67 65 29 |roupsBro|wsePage)|
|00004650| 3b 0d 0a 09 09 53 68 6f | 77 50 61 67 65 28 52 65 |;....Sho|wPage(Re|
|00004660| 73 70 6f 6e 73 65 2c 20 | 47 72 6f 75 70 73 42 72 |sponse, |GroupsBr|
|00004670| 6f 77 73 65 50 61 67 65 | 29 3b 0d 0a 09 7d 0d 0a |owsePage|);...}..|
|00004680| 09 65 6c 73 65 0d 0a 09 | 09 41 63 63 65 73 73 44 |.else...|.AccessD|
|00004690| 65 6e 69 65 64 28 52 65 | 73 70 6f 6e 73 65 29 3b |enied(Re|sponse);|
|000046a0| 0d 0a 7d 0d 0a 0d 0a 66 | 75 6e 63 74 69 6f 6e 20 |..}....f|unction |
|000046b0| 51 75 65 72 79 47 72 6f | 75 70 73 41 64 64 50 61 |QueryGro|upsAddPa|
|000046c0| 67 65 28 57 65 62 52 65 | 71 75 65 73 74 20 52 65 |ge(WebRe|quest Re|
|000046d0| 71 75 65 73 74 2c 20 57 | 65 62 52 65 73 70 6f 6e |quest, W|ebRespon|
|000046e0| 73 65 20 52 65 73 70 6f | 6e 73 65 29 0d 0a 7b 0d |se Respo|nse)..{.|
|000046f0| 0a 6c 6f 63 61 6c 20 78 | 41 64 6d 69 6e 47 72 6f |.local x|AdminGro|
|00004700| 75 70 20 78 47 72 6f 75 | 70 3b 0d 0a 6c 6f 63 61 |up xGrou|p;..loca|
|00004710| 6c 20 73 74 72 69 6e 67 | 20 67 6e 61 6d 65 2c 20 |l string| gname, |
|00004720| 67 70 72 69 76 73 2c 20 | 45 72 72 4d 73 67 3b 0d |gprivs, |ErrMsg;.|
|00004730| 0a 6c 6f 63 61 6c 20 69 | 6e 74 20 67 73 65 63 3b |.local i|nt gsec;|
|00004740| 0d 0a 0d 0a 09 69 66 20 | 28 43 61 6e 50 65 72 66 |.....if |(CanPerf|
|00004750| 6f 72 6d 28 22 47 61 22 | 29 29 0d 0a 09 7b 0d 0a |orm("Ga"|))...{..|
|00004760| 09 09 69 66 20 28 52 65 | 71 75 65 73 74 2e 47 65 |..if (Re|quest.Ge|
|00004770| 74 56 61 72 69 61 62 6c | 65 28 22 61 64 64 6e 65 |tVariabl|e("addne|
|00004780| 77 22 29 20 21 3d 20 22 | 22 29 0d 0a 09 09 7b 0d |w") != "|")....{.|
|00004790| 0a 09 09 09 2f 2f 20 48 | 75 6d 6d 20 2e 2e 20 41 |....// H|umm .. A|
|000047a0| 64 64 4e 65 77 0d 0a 09 | 09 09 67 6e 61 6d 65 20 |ddNew...|..gname |
|000047b0| 3d 20 52 65 71 75 65 73 | 74 2e 47 65 74 56 61 72 |= Reques|t.GetVar|
|000047c0| 69 61 62 6c 65 28 22 47 | 72 6f 75 70 4e 61 6d 65 |iable("G|roupName|
|000047d0| 22 29 3b 0d 0a 09 09 09 | 67 70 72 69 76 73 20 3d |");.....|gprivs =|
|000047e0| 20 46 69 78 50 72 69 76 | 73 28 52 65 71 75 65 73 | FixPriv|s(Reques|
|000047f0| 74 2c 20 22 22 29 3b 0d | 0a 09 09 09 67 73 65 63 |t, "");.|....gsec|
|00004800| 20 3d 20 69 6e 74 28 52 | 65 71 75 65 73 74 2e 47 | = int(R|equest.G|
|00004810| 65 74 56 61 72 69 61 62 | 6c 65 28 22 47 61 6d 65 |etVariab|le("Game|
|00004820| 53 65 63 22 29 29 3b 0d | 0a 0d 0a 09 09 09 69 66 |Sec"));.|......if|
|00004830| 20 28 21 63 6c 61 73 73 | 27 78 41 64 6d 69 6e 47 | (!class|'xAdminG|
|00004840| 72 6f 75 70 27 2e 73 74 | 61 74 69 63 2e 56 61 6c |roup'.st|atic.Val|
|00004850| 69 64 4e 61 6d 65 28 67 | 6e 61 6d 65 29 29 0d 0a |idName(g|name))..|
|00004860| 09 09 09 09 45 72 72 4d | 73 67 20 3d 20 52 65 70 |....ErrM|sg = Rep|
|00004870| 6c 28 49 6e 76 61 6c 69 | 64 43 68 61 72 61 63 74 |l(Invali|dCharact|
|00004880| 65 72 73 2c 20 22 25 49 | 74 65 6d 25 22 2c 20 47 |ers, "%I|tem%", G|
|00004890| 72 6f 75 70 29 3b 0d 0a | 09 09 09 65 6c 73 65 20 |roup);..|...else |
|000048a0| 69 66 20 28 4c 65 76 65 | 6c 2e 47 61 6d 65 2e 41 |if (Leve|l.Game.A|
|000048b0| 63 63 65 73 73 43 6f 6e | 74 72 6f 6c 2e 47 72 6f |ccessCon|trol.Gro|
|000048c0| 75 70 73 2e 46 69 6e 64 | 42 79 4e 61 6d 65 28 67 |ups.Find|ByName(g|
|000048d0| 6e 61 6d 65 29 20 21 3d | 20 4e 6f 6e 65 29 0d 0a |name) !=| None)..|
|000048e0| 09 09 09 09 45 72 72 4d | 73 67 20 3d 20 4e 61 6d |....ErrM|sg = Nam|
|000048f0| 65 45 78 69 73 74 73 40 | 47 72 6f 75 70 24 22 21 |eExists@|Group$"!|
|00004900| 22 3b 0d 0a 09 09 09 65 | 6c 73 65 20 69 66 20 28 |";.....e|lse if (|
|00004910| 67 73 65 63 20 3c 20 30 | 29 0d 0a 09 09 09 09 45 |gsec < 0|)......E|
|00004920| 72 72 4d 73 67 20 3d 20 | 4e 65 67 53 65 63 4c 65 |rrMsg = |NegSecLe|
|00004930| 76 65 6c 3b 0d 0a 09 09 | 09 65 6c 73 65 20 69 66 |vel;....|.else if|
|00004940| 20 28 67 73 65 63 20 3e | 20 43 75 72 41 64 6d 69 | (gsec >| CurAdmi|
|00004950| 6e 2e 4d 61 78 53 65 63 | 4c 65 76 65 6c 28 29 29 |n.MaxSec|Level())|
|00004960| 0d 0a 09 09 09 09 45 72 | 72 4d 73 67 20 3d 20 43 |......Er|rMsg = C|
|00004970| 61 6e 6e 6f 74 41 73 73 | 69 67 6e 48 69 67 68 65 |annotAss|ignHighe|
|00004980| 72 3b 0d 0a 0d 0a 09 09 | 09 52 65 73 70 6f 6e 73 |r;......|.Respons|
|00004990| 65 2e 53 75 62 73 74 28 | 22 4e 61 6d 65 56 61 6c |e.Subst(|"NameVal|
|000049a0| 75 65 22 2c 20 48 74 6d | 6c 45 6e 63 6f 64 65 28 |ue", Htm|lEncode(|
|000049b0| 67 6e 61 6d 65 29 29 3b | 0d 0a 09 09 09 52 65 73 |gname));|.....Res|
|000049c0| 70 6f 6e 73 65 2e 53 75 | 62 73 74 28 22 50 72 69 |ponse.Su|bst("Pri|
|000049d0| 76 54 61 62 6c 65 22 2c | 20 47 65 74 50 72 69 76 |vTable",| GetPriv|
|000049e0| 73 54 61 62 6c 65 28 67 | 70 72 69 76 73 29 29 3b |sTable(g|privs));|
|000049f0| 0d 0a 09 09 09 52 65 73 | 70 6f 6e 73 65 2e 53 75 |.....Res|ponse.Su|
|00004a00| 62 73 74 28 22 47 61 6d | 65 53 65 63 56 61 6c 75 |bst("Gam|eSecValu|
|00004a10| 65 22 2c 20 73 74 72 69 | 6e 67 28 67 73 65 63 29 |e", stri|ng(gsec)|
|00004a20| 29 3b 0d 0a 0d 0a 09 09 | 09 69 66 20 28 45 72 72 |);......|.if (Err|
|00004a30| 4d 73 67 20 3d 3d 20 22 | 22 29 0d 0a 09 09 09 7b |Msg == "|").....{|
|00004a40| 0d 0a 09 09 09 09 2f 2f | 20 41 6c 6c 20 73 65 74 |......//| All set|
|00004a50| 74 69 6e 67 73 20 61 72 | 65 20 66 69 6e 65 2c 20 |tings ar|e fine, |
|00004a60| 63 72 65 61 74 65 20 74 | 68 65 20 6e 65 77 20 47 |create t|he new G|
|00004a70| 72 6f 75 70 2e 0d 0a 09 | 09 09 09 78 47 72 6f 75 |roup....|...xGrou|
|00004a80| 70 20 3d 20 4c 65 76 65 | 6c 2e 47 61 6d 65 2e 41 |p = Leve|l.Game.A|
|00004a90| 63 63 65 73 73 43 6f 6e | 74 72 6f 6c 2e 47 72 6f |ccessCon|trol.Gro|
|00004aa0| 75 70 73 2e 43 72 65 61 | 74 65 47 72 6f 75 70 28 |ups.Crea|teGroup(|
|00004ab0| 67 6e 61 6d 65 2c 20 67 | 70 72 69 76 73 2c 20 62 |gname, g|privs, b|
|00004ac0| 79 74 65 28 67 73 65 63 | 29 29 3b 0d 0a 09 09 09 |yte(gsec|));.....|
|00004ad0| 09 69 66 20 28 78 47 72 | 6f 75 70 20 21 3d 20 4e |.if (xGr|oup != N|
|00004ae0| 6f 6e 65 29 0d 0a 09 09 | 09 09 7b 0d 0a 09 09 09 |one)....|..{.....|
|00004af0| 09 09 43 75 72 41 64 6d | 69 6e 2e 41 64 64 4d 61 |..CurAdm|in.AddMa|
|00004b00| 6e 61 67 65 64 47 72 6f | 75 70 28 78 47 72 6f 75 |nagedGro|up(xGrou|
|00004b10| 70 29 3b 0d 0a 09 09 09 | 09 09 4c 65 76 65 6c 2e |p);.....|..Level.|
|00004b20| 47 61 6d 65 2e 41 63 63 | 65 73 73 43 6f 6e 74 72 |Game.Acc|essContr|
|00004b30| 6f 6c 2e 47 72 6f 75 70 | 73 2e 41 64 64 28 78 47 |ol.Group|s.Add(xG|
|00004b40| 72 6f 75 70 29 3b 0d 0a | 09 09 09 09 09 4c 65 76 |roup);..|.....Lev|
|00004b50| 65 6c 2e 47 61 6d 65 2e | 41 63 63 65 73 73 43 6f |el.Game.|AccessCo|
|00004b60| 6e 74 72 6f 6c 2e 53 61 | 76 65 41 64 6d 69 6e 73 |ntrol.Sa|veAdmins|
|00004b70| 28 29 3b 0d 0a 09 09 09 | 09 7d 0d 0a 09 09 09 09 |();.....|.}......|
|00004b80| 65 6c 73 65 0d 0a 09 09 | 09 09 09 45 72 72 4d 73 |else....|...ErrMs|
|00004b90| 67 20 3d 20 43 6f 75 6c | 64 4e 6f 74 43 72 65 61 |g = Coul|dNotCrea|
|00004ba0| 74 65 40 47 72 6f 75 70 | 24 22 21 22 3b 0d 0a 09 |te@Group|$"!";...|
|00004bb0| 09 09 7d 0d 0a 0d 0a 09 | 09 09 69 66 20 28 45 72 |..}.....|..if (Er|
|00004bc0| 72 4d 73 67 20 21 3d 20 | 22 22 29 0d 0a 09 09 09 |rMsg != |"").....|
|00004bd0| 09 53 74 61 74 75 73 45 | 72 72 6f 72 28 52 65 73 |.StatusE|rror(Res|
|00004be0| 70 6f 6e 73 65 2c 20 45 | 72 72 4d 73 67 29 3b 0d |ponse, E|rrMsg);.|
|00004bf0| 0a 09 09 7d 0d 0a 09 09 | 65 6c 73 65 0d 0a 09 09 |...}....|else....|
|00004c00| 09 52 65 73 70 6f 6e 73 | 65 2e 53 75 62 73 74 28 |.Respons|e.Subst(|
|00004c10| 22 50 72 69 76 54 61 62 | 6c 65 22 2c 20 47 65 74 |"PrivTab|le", Get|
|00004c20| 50 72 69 76 73 54 61 62 | 6c 65 28 22 22 29 29 3b |PrivsTab|le(""));|
|00004c30| 0d 0a 0d 0a 09 09 69 66 | 20 28 78 47 72 6f 75 70 |......if| (xGroup|
|00004c40| 20 21 3d 20 4e 6f 6e 65 | 29 0d 0a 09 09 7b 0d 0a | != None|)....{..|
|00004c50| 09 09 09 52 65 73 70 6f | 6e 73 65 2e 53 75 62 73 |...Respo|nse.Subs|
|00004c60| 74 28 22 50 6f 73 74 41 | 63 74 69 6f 6e 22 2c 20 |t("PostA|ction", |
|00004c70| 47 72 6f 75 70 73 45 64 | 69 74 50 61 67 65 29 3b |GroupsEd|itPage);|
|00004c80| 0d 0a 09 09 09 52 65 73 | 70 6f 6e 73 65 2e 53 75 |.....Res|ponse.Su|
|00004c90| 62 73 74 28 22 53 75 62 | 6d 69 74 4e 61 6d 65 22 |bst("Sub|mitName"|
|00004ca0| 2c 20 22 6d 6f 64 22 29 | 3b 0d 0a 09 09 09 52 65 |, "mod")|;.....Re|
|00004cb0| 73 70 6f 6e 73 65 2e 53 | 75 62 73 74 28 22 53 75 |sponse.S|ubst("Su|
|00004cc0| 62 6d 69 74 56 61 6c 75 | 65 22 2c 20 45 64 69 74 |bmitValu|e", Edit|
|00004cd0| 47 72 6f 75 70 42 75 74 | 74 6f 6e 29 3b 0d 0a 09 |GroupBut|ton);...|
|00004ce0| 09 09 52 65 73 70 6f 6e | 73 65 2e 53 75 62 73 74 |..Respon|se.Subst|
|00004cf0| 28 22 50 61 67 65 48 65 | 6c 70 22 2c 20 4e 6f 74 |("PageHe|lp", Not|
|00004d00| 65 47 72 6f 75 70 45 64 | 69 74 50 61 67 65 29 3b |eGroupEd|itPage);|
|00004d10| 0d 0a 09 09 09 52 65 73 | 70 6f 6e 73 65 2e 53 75 |.....Res|ponse.Su|
|00004d20| 62 73 74 28 22 53 65 63 | 74 69 6f 6e 22 2c 20 45 |bst("Sec|tion", E|
|00004d30| 64 69 74 47 72 6f 75 70 | 54 69 74 6c 65 29 3b 0d |ditGroup|Title);.|
|00004d40| 0a 09 09 7d 0d 0a 09 09 | 65 6c 73 65 0d 0a 09 09 |...}....|else....|
|00004d50| 7b 0d 0a 09 09 09 52 65 | 73 70 6f 6e 73 65 2e 53 |{.....Re|sponse.S|
|00004d60| 75 62 73 74 28 22 50 6f | 73 74 41 63 74 69 6f 6e |ubst("Po|stAction|
|00004d70| 22 2c 20 47 72 6f 75 70 | 73 41 64 64 50 61 67 65 |", Group|sAddPage|
|00004d80| 29 3b 0d 0a 09 09 09 52 | 65 73 70 6f 6e 73 65 2e |);.....R|esponse.|
|00004d90| 53 75 62 73 74 28 22 53 | 75 62 6d 69 74 4e 61 6d |Subst("S|ubmitNam|
|00004da0| 65 22 2c 20 22 61 64 64 | 6e 65 77 22 29 3b 0d 0a |e", "add|new");..|
|00004db0| 09 09 09 52 65 73 70 6f | 6e 73 65 2e 53 75 62 73 |...Respo|nse.Subs|
|00004dc0| 74 28 22 53 75 62 6d 69 | 74 56 61 6c 75 65 22 2c |t("Submi|tValue",|
|00004dd0| 20 41 64 64 47 72 6f 75 | 70 42 75 74 74 6f 6e 29 | AddGrou|pButton)|
|00004de0| 3b 0d 0a 09 09 09 52 65 | 73 70 6f 6e 73 65 2e 53 |;.....Re|sponse.S|
|00004df0| 75 62 73 74 28 22 53 65 | 63 74 69 6f 6e 22 2c 20 |ubst("Se|ction", |
|00004e00| 41 64 64 47 72 6f 75 70 | 54 69 74 6c 65 29 3b 0d |AddGroup|Title);.|
|00004e10| 0a 09 09 09 52 65 73 70 | 6f 6e 73 65 2e 53 75 62 |....Resp|onse.Sub|
|00004e20| 73 74 28 22 50 61 67 65 | 48 65 6c 70 22 2c 20 4e |st("Page|Help", N|
|00004e30| 6f 74 65 47 72 6f 75 70 | 41 64 64 50 61 67 65 29 |oteGroup|AddPage)|
|00004e40| 3b 0d 0a 09 09 7d 0d 0a | 09 09 53 68 6f 77 50 61 |;....}..|..ShowPa|
|00004e50| 67 65 28 52 65 73 70 6f | 6e 73 65 2c 20 47 72 6f |ge(Respo|nse, Gro|
|00004e60| 75 70 73 45 64 69 74 50 | 61 67 65 29 3b 0d 0a 09 |upsEditP|age);...|
|00004e70| 7d 0d 0a 09 65 6c 73 65 | 0d 0a 09 09 41 63 63 65 |}...else|....Acce|
|00004e80| 73 73 44 65 6e 69 65 64 | 28 52 65 73 70 6f 6e 73 |ssDenied|(Respons|
|00004e90| 65 29 3b 0d 0a 7d 0d 0a | 0d 0a 66 75 6e 63 74 69 |e);..}..|..functi|
|00004ea0| 6f 6e 20 51 75 65 72 79 | 47 72 6f 75 70 73 45 64 |on Query|GroupsEd|
|00004eb0| 69 74 50 61 67 65 28 57 | 65 62 52 65 71 75 65 73 |itPage(W|ebReques|
|00004ec0| 74 20 52 65 71 75 65 73 | 74 2c 20 57 65 62 52 65 |t Reques|t, WebRe|
|00004ed0| 73 70 6f 6e 73 65 20 52 | 65 73 70 6f 6e 73 65 29 |sponse R|esponse)|
|00004ee0| 0d 0a 7b 0d 0a 6c 6f 63 | 61 6c 20 78 41 64 6d 69 |..{..loc|al xAdmi|
|00004ef0| 6e 47 72 6f 75 70 20 78 | 47 72 6f 75 70 3b 0d 0a |nGroup x|Group;..|
|00004f00| 6c 6f 63 61 6c 20 73 74 | 72 69 6e 67 20 45 72 72 |local st|ring Err|
|00004f10| 4d 73 67 2c 20 67 6e 61 | 6d 65 2c 20 67 70 72 69 |Msg, gna|me, gpri|
|00004f20| 76 73 3b 0d 0a 6c 6f 63 | 61 6c 20 69 6e 74 20 67 |vs;..loc|al int g|
|00004f30| 73 65 63 3b 0d 0a 0d 0a | 09 69 66 20 28 43 61 6e |sec;....|.if (Can|
|00004f40| 50 65 72 66 6f 72 6d 28 | 22 47 6d 22 29 29 0d 0a |Perform(|"Gm"))..|
|00004f50| 09 7b 0d 0a 09 09 52 65 | 73 70 6f 6e 73 65 2e 53 |.{....Re|sponse.S|
|00004f60| 75 62 73 74 28 22 53 65 | 63 74 69 6f 6e 22 2c 20 |ubst("Se|ction", |
|00004f70| 45 64 69 74 47 72 6f 75 | 70 54 69 74 6c 65 29 3b |EditGrou|pTitle);|
|00004f80| 0d 0a 0d 0a 09 09 78 47 | 72 6f 75 70 20 3d 20 4c |......xG|roup = L|
|00004f90| 65 76 65 6c 2e 47 61 6d | 65 2e 41 63 63 65 73 73 |evel.Gam|e.Access|
|00004fa0| 43 6f 6e 74 72 6f 6c 2e | 47 72 6f 75 70 73 2e 46 |Control.|Groups.F|
|00004fb0| 69 6e 64 42 79 4e 61 6d | 65 28 52 65 71 75 65 73 |indByNam|e(Reques|
|00004fc0| 74 2e 47 65 74 56 61 72 | 69 61 62 6c 65 28 22 65 |t.GetVar|iable("e|
|00004fd0| 64 69 74 22 29 29 3b 0d | 0a 09 09 69 66 20 28 78 |dit"));.|...if (x|
|00004fe0| 47 72 6f 75 70 20 21 3d | 20 4e 6f 6e 65 29 09 09 |Group !=| None)..|
|00004ff0| 2f 2f 20 44 6f 20 6e 6f | 74 20 6c 65 74 20 61 64 |// Do no|t let ad|
|00005000| 6d 69 6e 73 20 66 61 6b | 65 20 74 68 65 20 73 79 |mins fak|e the sy|
|00005010| 73 74 65 6d 2e 0d 0a 09 | 09 7b 0d 0a 09 09 09 69 |stem....|.{.....i|
|00005020| 66 20 28 43 75 72 41 64 | 6d 69 6e 2e 43 61 6e 4d |f (CurAd|min.CanM|
|00005030| 61 6e 61 67 65 47 72 6f | 75 70 28 78 47 72 6f 75 |anageGro|up(xGrou|
|00005040| 70 29 29 0d 0a 09 09 09 | 7b 0d 0a 09 09 09 09 69 |p)).....|{......i|
|00005050| 66 20 28 52 65 71 75 65 | 73 74 2e 47 65 74 56 61 |f (Reque|st.GetVa|
|00005060| 72 69 61 62 6c 65 28 22 | 6d 6f 64 22 29 20 21 3d |riable("|mod") !=|
|00005070| 20 22 22 29 0d 0a 09 09 | 09 09 7b 0d 0a 09 09 09 | "")....|..{.....|
|00005080| 09 09 2f 2f 20 53 61 76 | 65 20 74 68 65 20 63 68 |..// Sav|e the ch|
|00005090| 61 6e 67 65 73 0d 0a 09 | 09 09 09 09 67 6e 61 6d |anges...|....gnam|
|000050a0| 65 20 3d 20 52 65 71 75 | 65 73 74 2e 47 65 74 56 |e = Requ|est.GetV|
|000050b0| 61 72 69 61 62 6c 65 28 | 22 47 72 6f 75 70 4e 61 |ariable(|"GroupNa|
|000050c0| 6d 65 22 29 3b 0d 0a 09 | 09 09 09 09 67 70 72 69 |me");...|....gpri|
|000050d0| 76 73 20 3d 20 46 69 78 | 50 72 69 76 73 28 52 65 |vs = Fix|Privs(Re|
|000050e0| 71 75 65 73 74 2c 20 78 | 47 72 6f 75 70 2e 50 72 |quest, x|Group.Pr|
|000050f0| 69 76 69 6c 65 67 65 73 | 29 3b 0d 0a 09 09 09 09 |ivileges|);......|
|00005100| 09 67 73 65 63 20 3d 20 | 43 6c 61 6d 70 28 69 6e |.gsec = |Clamp(in|
|00005110| 74 28 52 65 71 75 65 73 | 74 2e 47 65 74 56 61 72 |t(Reques|t.GetVar|
|00005120| 69 61 62 6c 65 28 22 47 | 61 6d 65 53 65 63 22 29 |iable("G|ameSec")|
|00005130| 29 2c 20 30 2c 20 32 35 | 35 29 3b 0d 0a 09 09 09 |), 0, 25|5);.....|
|00005140| 09 09 69 66 20 28 67 6e | 61 6d 65 20 21 3d 20 78 |..if (gn|ame != x|
|00005150| 47 72 6f 75 70 2e 47 72 | 6f 75 70 4e 61 6d 65 29 |Group.Gr|oupName)|
|00005160| 0d 0a 09 09 09 09 09 7b | 0d 0a 09 09 09 09 09 09 |.......{|........|
|00005170| 69 66 20 28 78 47 72 6f | 75 70 2e 56 61 6c 69 64 |if (xGro|up.Valid|
|00005180| 4e 61 6d 65 28 67 6e 61 | 6d 65 29 29 0d 0a 09 09 |Name(gna|me))....|
|00005190| 09 09 09 09 7b 0d 0a 09 | 09 09 09 09 09 09 69 66 |....{...|......if|
|000051a0| 20 28 4c 65 76 65 6c 2e | 47 61 6d 65 2e 41 63 63 | (Level.|Game.Acc|
|000051b0| 65 73 73 43 6f 6e 74 72 | 6f 6c 2e 47 72 6f 75 70 |essContr|ol.Group|
|000051c0| 73 2e 46 69 6e 64 42 79 | 4e 61 6d 65 28 67 6e 61 |s.FindBy|Name(gna|
|000051d0| 6d 65 29 20 3d 3d 20 4e | 6f 6e 65 29 0d 0a 09 09 |me) == N|one)....|
|000051e0| 09 09 09 09 09 09 78 47 | 72 6f 75 70 2e 47 72 6f |......xG|roup.Gro|
|000051f0| 75 70 4e 61 6d 65 20 3d | 20 67 6e 61 6d 65 3b 0d |upName =| gname;.|
|00005200| 0a 09 09 09 09 09 09 09 | 65 6c 73 65 0d 0a 09 09 |........|else....|
|00005210| 09 09 09 09 09 09 45 72 | 72 4d 73 67 20 3d 20 52 |......Er|rMsg = R|
|00005220| 65 70 6c 28 4e 61 6d 65 | 45 78 69 73 74 73 2c 20 |epl(Name|Exists, |
|00005230| 22 25 49 74 65 6d 25 22 | 2c 20 47 72 6f 75 70 29 |"%Item%"|, Group)|
|00005240| 3b 0d 0a 09 09 09 09 09 | 09 7d 0d 0a 09 09 09 09 |;.......|.}......|
|00005250| 09 09 65 6c 73 65 0d 0a | 09 09 09 09 09 09 09 45 |..else..|.......E|
|00005260| 72 72 4d 73 67 20 3d 20 | 52 65 70 6c 28 49 6e 76 |rrMsg = |Repl(Inv|
|00005270| 61 6c 69 64 43 68 61 72 | 61 63 74 65 72 73 2c 20 |alidChar|acters, |
|00005280| 22 25 49 74 65 6d 25 22 | 2c 20 47 72 6f 75 70 29 |"%Item%"|, Group)|
|00005290| 3b 0d 0a 09 09 09 09 09 | 7d 0d 0a 0d 0a 09 09 09 |;.......|}.......|
|000052a0| 09 09 69 66 20 28 45 72 | 72 4d 73 67 20 3d 3d 20 |..if (Er|rMsg == |
|000052b0| 22 22 29 0d 0a 09 09 09 | 09 09 7b 0d 0a 09 09 09 |"").....|..{.....|
|000052c0| 09 09 09 69 66 20 28 67 | 70 72 69 76 73 20 21 3d |...if (g|privs !=|
|000052d0| 20 78 47 72 6f 75 70 2e | 50 72 69 76 69 6c 65 67 | xGroup.|Privileg|
|000052e0| 65 73 29 0d 0a 09 09 09 | 09 09 09 09 78 47 72 6f |es).....|....xGro|
|000052f0| 75 70 2e 53 65 74 50 72 | 69 76 73 28 67 70 72 69 |up.SetPr|ivs(gpri|
|00005300| 76 73 29 3b 0d 0a 0d 0a | 09 09 09 09 09 09 78 47 |vs);....|......xG|
|00005310| 72 6f 75 70 2e 47 61 6d | 65 53 65 63 4c 65 76 65 |roup.Gam|eSecLeve|
|00005320| 6c 20 3d 20 67 73 65 63 | 3b 0d 0a 09 09 09 09 09 |l = gsec|;.......|
|00005330| 09 4c 65 76 65 6c 2e 47 | 61 6d 65 2e 41 63 63 65 |.Level.G|ame.Acce|
|00005340| 73 73 43 6f 6e 74 72 6f | 6c 2e 53 61 76 65 41 64 |ssContro|l.SaveAd|
|00005350| 6d 69 6e 73 28 29 3b 0d | 0a 09 09 09 09 09 7d 0d |mins();.|......}.|
|00005360| 0a 09 09 09 09 7d 0d 0a | 0d 0a 09 09 09 09 69 66 |.....}..|......if|
|00005370| 20 28 45 72 72 4d 73 67 | 20 21 3d 20 22 22 29 0d | (ErrMsg| != "").|
|00005380| 0a 09 09 09 09 09 53 74 | 61 74 75 73 45 72 72 6f |......St|atusErro|
|00005390| 72 28 52 65 73 70 6f 6e | 73 65 2c 20 45 72 72 4d |r(Respon|se, ErrM|
|000053a0| 73 67 29 3b 0d 0a 0d 0a | 09 09 09 09 52 65 73 70 |sg);....|....Resp|
|000053b0| 6f 6e 73 65 2e 53 75 62 | 73 74 28 22 4e 61 6d 65 |onse.Sub|st("Name|
|000053c0| 56 61 6c 75 65 22 2c 20 | 48 74 6d 6c 45 6e 63 6f |Value", |HtmlEnco|
|000053d0| 64 65 28 78 47 72 6f 75 | 70 2e 47 72 6f 75 70 4e |de(xGrou|p.GroupN|
|000053e0| 61 6d 65 29 29 3b 0d 0a | 09 09 09 09 52 65 73 70 |ame));..|....Resp|
|000053f0| 6f 6e 73 65 2e 53 75 62 | 73 74 28 22 50 72 69 76 |onse.Sub|st("Priv|
|00005400| 54 61 62 6c 65 22 2c 20 | 47 65 74 50 72 69 76 73 |Table", |GetPrivs|
|00005410| 54 61 62 6c 65 28 78 47 | 72 6f 75 70 2e 50 72 69 |Table(xG|roup.Pri|
|00005420| 76 69 6c 65 67 65 73 29 | 29 3b 0d 0a 09 09 09 09 |vileges)|);......|
|00005430| 52 65 73 70 6f 6e 73 65 | 2e 53 75 62 73 74 28 22 |Response|.Subst("|
|00005440| 47 61 6d 65 53 65 63 56 | 61 6c 75 65 22 2c 20 73 |GameSecV|alue", s|
|00005450| 74 72 69 6e 67 28 78 47 | 72 6f 75 70 2e 47 61 6d |tring(xG|roup.Gam|
|00005460| 65 53 65 63 4c 65 76 65 | 6c 29 29 3b 0d 0a 09 09 |eSecLeve|l));....|
|00005470| 09 09 52 65 73 70 6f 6e | 73 65 2e 53 75 62 73 74 |..Respon|se.Subst|
|00005480| 28 22 50 6f 73 74 41 63 | 74 69 6f 6e 22 2c 20 47 |("PostAc|tion", G|
|00005490| 72 6f 75 70 73 45 64 69 | 74 50 61 67 65 29 3b 0d |roupsEdi|tPage);.|
|000054a0| 0a 09 09 09 09 52 65 73 | 70 6f 6e 73 65 2e 53 75 |.....Res|ponse.Su|
|000054b0| 62 73 74 28 22 53 75 62 | 6d 69 74 4e 61 6d 65 22 |bst("Sub|mitName"|
|000054c0| 2c 20 22 6d 6f 64 22 29 | 3b 0d 0a 09 09 09 09 52 |, "mod")|;......R|
|000054d0| 65 73 70 6f 6e 73 65 2e | 53 75 62 73 74 28 22 53 |esponse.|Subst("S|
|000054e0| 75 62 6d 69 74 56 61 6c | 75 65 22 2c 20 45 64 69 |ubmitVal|ue", Edi|
|000054f0| 74 47 72 6f 75 70 42 75 | 74 74 6f 6e 29 3b 0d 0a |tGroupBu|tton);..|
|00005500| 09 09 09 09 52 65 73 70 | 6f 6e 73 65 2e 53 75 62 |....Resp|onse.Sub|
|00005510| 73 74 28 22 50 61 67 65 | 48 65 6c 70 22 2c 20 4e |st("Page|Help", N|
|00005520| 6f 74 65 47 72 6f 75 70 | 45 64 69 74 50 61 67 65 |oteGroup|EditPage|
|00005530| 29 3b 0d 0a 09 09 09 09 | 53 68 6f 77 50 61 67 65 |);......|ShowPage|
|00005540| 28 52 65 73 70 6f 6e 73 | 65 2c 20 47 72 6f 75 70 |(Respons|e, Group|
|00005550| 73 45 64 69 74 50 61 67 | 65 29 3b 0d 0a 09 09 09 |sEditPag|e);.....|
|00005560| 7d 0d 0a 09 09 09 65 6c | 73 65 0d 0a 09 09 09 7b |}.....el|se.....{|
|00005570| 0d 0a 09 09 09 09 45 72 | 72 4d 73 67 20 3d 20 52 |......Er|rMsg = R|
|00005580| 65 70 6c 28 49 6e 73 75 | 66 66 69 63 69 65 6e 74 |epl(Insu|fficient|
|00005590| 50 72 69 76 73 2c 20 22 | 25 41 63 74 69 6f 6e 25 |Privs, "|%Action%|
|000055a0| 22 2c 20 4d 6f 64 69 66 | 79 29 3b 0d 0a 09 09 09 |", Modif|y);.....|
|000055b0| 09 45 72 72 4d 73 67 20 | 3d 20 52 65 70 6c 28 45 |.ErrMsg |= Repl(E|
|000055c0| 72 72 4d 73 67 2c 20 22 | 25 49 74 65 6d 25 22 2c |rrMsg, "|%Item%",|
|000055d0| 20 47 72 6f 75 70 29 3b | 0d 0a 09 09 09 09 53 68 | Group);|......Sh|
|000055e0| 6f 77 4d 65 73 73 61 67 | 65 28 52 65 73 70 6f 6e |owMessag|e(Respon|
|000055f0| 73 65 2c 20 50 72 69 76 | 54 69 74 6c 65 2c 20 45 |se, Priv|Title, E|
|00005600| 72 72 4d 73 67 29 3b 0d | 0a 09 09 09 7d 0d 0a 09 |rrMsg);.|....}...|
|00005610| 09 7d 0d 0a 09 09 65 6c | 73 65 0d 0a 09 09 09 53 |.}....el|se.....S|
|00005620| 68 6f 77 4d 65 73 73 61 | 67 65 28 52 65 73 70 6f |howMessa|ge(Respo|
|00005630| 6e 73 65 2c 20 47 72 6f | 75 70 4e 6f 74 46 6f 75 |nse, Gro|upNotFou|
|00005640| 6e 64 2c 20 52 65 70 6c | 28 44 6f 65 73 4e 6f 74 |nd, Repl|(DoesNot|
|00005650| 45 78 69 73 74 2c 20 22 | 25 49 74 65 6d 25 22 2c |Exist, "|%Item%",|
|00005660| 20 47 72 6f 75 70 29 29 | 3b 0d 0a 09 7d 0d 0a 09 | Group))|;...}...|
|00005670| 65 6c 73 65 0d 0a 09 09 | 41 63 63 65 73 73 44 65 |else....|AccessDe|
|00005680| 6e 69 65 64 28 52 65 73 | 70 6f 6e 73 65 29 3b 0d |nied(Res|ponse);.|
|00005690| 0a 7d 0d 0a 0d 0a 2f 2f | 20 4d 75 73 74 20 6e 6f |.}....//| Must no|
|000056a0| 74 20 66 6f 72 67 65 74 | 20 74 6f 20 73 68 6f 77 |t forget| to show|
|000056b0| 20 6f 6e 6c 79 20 74 68 | 65 20 55 73 65 72 73 20 | only th|e Users |
|000056c0| 66 72 6f 6d 20 67 72 6f | 75 70 73 20 74 68 61 74 |from gro|ups that|
|000056d0| 20 74 68 65 20 61 64 6d | 69 6e 20 63 61 6e 20 6d | the adm|in can m|
|000056e0| 61 6e 61 67 65 0d 0a 66 | 75 6e 63 74 69 6f 6e 20 |anage..f|unction |
|000056f0| 73 74 72 69 6e 67 20 47 | 65 74 55 73 65 72 73 46 |string G|etUsersF|
|00005700| 6f 72 42 72 6f 77 73 65 | 28 57 65 62 52 65 73 70 |orBrowse|(WebResp|
|00005710| 6f 6e 73 65 20 52 65 73 | 70 6f 6e 73 65 29 0d 0a |onse Res|ponse)..|
|00005720| 7b 0d 0a 6c 6f 63 61 6c | 20 4f 62 6a 65 63 74 41 |{..local| ObjectA|
|00005730| 72 72 61 79 09 55 73 65 | 72 73 3b 0d 0a 6c 6f 63 |rray.Use|rs;..loc|
|00005740| 61 6c 20 78 41 64 6d 69 | 6e 55 73 65 72 09 78 55 |al xAdmi|nUser.xU|
|00005750| 73 65 72 3b 0d 0a 6c 6f | 63 61 6c 20 73 74 72 69 |ser;..lo|cal stri|
|00005760| 6e 67 20 4f 75 74 53 74 | 72 2c 20 54 6d 70 3b 0d |ng OutSt|r, Tmp;.|
|00005770| 0a 6c 6f 63 61 6c 20 69 | 6e 74 20 69 3b 0d 0a 6c |.local i|nt i;..l|
|00005780| 6f 63 61 6c 20 62 6f 6f | 6c 20 43 61 6e 44 65 6c |ocal boo|l CanDel|
|00005790| 65 74 65 3b 0d 0a 0d 0a | 09 43 61 6e 44 65 6c 65 |ete;....|.CanDele|
|000057a0| 74 65 20 3d 20 43 61 6e | 50 65 72 66 6f 72 6d 28 |te = Can|Perform(|
|000057b0| 22 41 61 22 29 3b 0d 0a | 09 55 73 65 72 73 20 3d |"Aa");..|.Users =|
|000057c0| 20 4d 61 6e 61 67 65 64 | 55 73 65 72 73 28 29 3b | Managed|Users();|
|000057d0| 0d 0a 0d 0a 09 2f 2f 20 | 4e 6f 77 2c 20 6a 75 73 |.....// |Now, jus|
|000057e0| 74 20 6d 61 6b 65 20 74 | 68 65 20 75 73 65 72 73 |t make t|he users|
|000057f0| 20 6c 69 73 74 20 61 20 | 62 75 6e 63 68 20 6f 66 | list a |bunch of|
|00005800| 20 52 6f 77 73 0d 0a 09 | 69 66 20 28 55 73 65 72 | Rows...|if (User|
|00005810| 73 2e 43 6f 75 6e 74 28 | 29 20 3d 3d 20 30 29 0d |s.Count(|) == 0).|
|00005820| 0a 09 7b 0d 0a 09 09 52 | 65 73 70 6f 6e 73 65 2e |..{....R|esponse.|
|00005830| 53 75 62 73 74 28 22 43 | 6f 6e 74 65 6e 74 22 2c |Subst("C|ontent",|
|00005840| 20 52 65 70 6c 28 4e 6f | 6e 65 49 74 65 6d 54 65 | Repl(No|neItemTe|
|00005850| 78 74 2c 20 22 25 49 74 | 65 6d 25 22 2c 20 55 73 |xt, "%It|em%", Us|
|00005860| 65 72 29 29 3b 0d 0a 09 | 09 52 65 73 70 6f 6e 73 |er));...|.Respons|
|00005870| 65 2e 53 75 62 73 74 28 | 22 52 6f 77 43 6f 6e 74 |e.Subst(|"RowCont|
|00005880| 65 6e 74 22 2c 20 57 65 | 62 49 6e 63 6c 75 64 65 |ent", We|bInclude|
|00005890| 28 43 65 6c 6c 4c 65 66 | 74 29 29 3b 0d 0a 09 09 |(CellLef|t));....|
|000058a0| 72 65 74 75 72 6e 20 57 | 65 62 49 6e 63 6c 75 64 |return W|ebInclud|
|000058b0| 65 28 52 6f 77 4c 65 66 | 74 29 3b 0d 0a 09 7d 0d |e(RowLef|t);...}.|
|000058c0| 0a 0d 0a 09 52 65 73 70 | 6f 6e 73 65 2e 53 75 62 |....Resp|onse.Sub|
|000058d0| 73 74 28 22 43 6f 6e 74 | 65 6e 74 22 2c 20 4e 61 |st("Cont|ent", Na|
|000058e0| 6d 65 54 65 78 74 29 3b | 0d 0a 09 54 6d 70 20 3d |meText);|...Tmp =|
|000058f0| 20 57 65 62 49 6e 63 6c | 75 64 65 28 43 65 6c 6c | WebIncl|ude(Cell|
|00005900| 4c 65 66 74 29 3b 0d 0a | 09 52 65 73 70 6f 6e 73 |Left);..|.Respons|
|00005910| 65 2e 53 75 62 73 74 28 | 22 43 6f 6e 74 65 6e 74 |e.Subst(|"Content|
|00005920| 22 2c 20 50 72 69 76 69 | 6c 65 67 65 73 29 3b 0d |", Privi|leges);.|
|00005930| 0a 09 54 6d 70 20 3d 20 | 54 6d 70 20 24 20 57 65 |..Tmp = |Tmp $ We|
|00005940| 62 49 6e 63 6c 75 64 65 | 28 43 65 6c 6c 4c 65 66 |bInclude|(CellLef|
|00005950| 74 29 3b 0d 0a 09 52 65 | 73 70 6f 6e 73 65 2e 53 |t);...Re|sponse.S|
|00005960| 75 62 73 74 28 22 43 6f | 6e 74 65 6e 74 22 2c 20 |ubst("Co|ntent", |
|00005970| 22 26 6e 62 73 70 3b 22 | 29 3b 0d 0a 09 54 6d 70 |" "|);...Tmp|
|00005980| 20 3d 20 45 76 61 6c 28 | 43 61 6e 44 65 6c 65 74 | = Eval(|CanDelet|
|00005990| 65 2c 20 54 6d 70 20 24 | 20 57 65 62 49 6e 63 6c |e, Tmp $| WebIncl|
|000059a0| 75 64 65 28 43 65 6c 6c | 4c 65 66 74 29 2c 20 54 |ude(Cell|Left), T|
|000059b0| 6d 70 29 3b 0d 0a 09 52 | 65 73 70 6f 6e 73 65 2e |mp);...R|esponse.|
|000059c0| 53 75 62 73 74 28 22 52 | 6f 77 43 6f 6e 74 65 6e |Subst("R|owConten|
|000059d0| 74 22 2c 20 54 6d 70 29 | 3b 0d 0a 09 4f 75 74 53 |t", Tmp)|;...OutS|
|000059e0| 74 72 20 3d 20 57 65 62 | 49 6e 63 6c 75 64 65 28 |tr = Web|Include(|
|000059f0| 52 6f 77 4c 65 66 74 29 | 3b 0d 0a 0d 0a 09 66 6f |RowLeft)|;.....fo|
|00005a00| 72 20 28 69 20 3d 20 30 | 3b 20 69 3c 55 73 65 72 |r (i = 0|; i<User|
|00005a10| 73 2e 43 6f 75 6e 74 28 | 29 3b 20 69 2b 2b 29 0d |s.Count(|); i++).|
|00005a20| 0a 09 7b 0d 0a 09 09 78 | 55 73 65 72 20 3d 20 78 |..{....x|User = x|
|00005a30| 41 64 6d 69 6e 55 73 65 | 72 28 55 73 65 72 73 2e |AdminUse|r(Users.|
|00005a40| 47 65 74 49 74 65 6d 28 | 69 29 29 3b 0d 0a 09 09 |GetItem(|i));....|
|00005a50| 52 65 73 70 6f 6e 73 65 | 2e 53 75 62 73 74 28 22 |Response|.Subst("|
|00005a60| 55 73 65 72 6e 61 6d 65 | 22 2c 20 48 79 70 65 72 |Username|", Hyper|
|00005a70| 6c 69 6e 6b 28 55 73 65 | 72 73 45 64 69 74 50 61 |link(Use|rsEditPa|
|00005a80| 67 65 24 22 3f 65 64 69 | 74 3d 22 24 48 74 6d 6c |ge$"?edi|t="$Html|
|00005a90| 45 6e 63 6f 64 65 28 78 | 55 73 65 72 2e 55 73 65 |Encode(x|User.Use|
|00005aa0| 72 4e 61 6d 65 29 2c 20 | 48 74 6d 6c 45 6e 63 6f |rName), |HtmlEnco|
|00005ab0| 64 65 28 78 55 73 65 72 | 2e 55 73 65 72 4e 61 6d |de(xUser|.UserNam|
|00005ac0| 65 29 2c 20 43 61 6e 50 | 65 72 66 6f 72 6d 28 22 |e), CanP|erform("|
|00005ad0| 41 65 7c 41 61 22 29 29 | 29 3b 0d 0a 09 09 52 65 |Ae|Aa"))|);....Re|
|00005ae0| 73 70 6f 6e 73 65 2e 53 | 75 62 73 74 28 22 50 72 |sponse.S|ubst("Pr|
|00005af0| 69 76 69 6c 65 67 65 73 | 22 2c 20 78 55 73 65 72 |ivileges|", xUser|
|00005b00| 2e 50 72 69 76 69 6c 65 | 67 65 73 29 3b 0d 0a 09 |.Privile|ges);...|
|00005b10| 09 52 65 73 70 6f 6e 73 | 65 2e 53 75 62 73 74 28 |.Respons|e.Subst(|
|00005b20| 22 47 72 6f 75 70 73 22 | 2c 20 45 76 61 6c 28 43 |"Groups"|, Eval(C|
|00005b30| 61 6e 50 65 72 66 6f 72 | 6d 28 22 41 67 22 29 2c |anPerfor|m("Ag"),|
|00005b40| 20 48 79 70 65 72 6c 69 | 6e 6b 28 55 73 65 72 73 | Hyperli|nk(Users|
|00005b50| 47 72 6f 75 70 73 50 61 | 67 65 24 22 3f 65 64 69 |GroupsPa|ge$"?edi|
|00005b60| 74 3d 22 24 48 74 6d 6c | 45 6e 63 6f 64 65 28 78 |t="$Html|Encode(x|
|00005b70| 55 73 65 72 2e 55 73 65 | 72 4e 61 6d 65 29 2c 47 |User.Use|rName),G|
|00005b80| 72 6f 75 70 73 2c 20 74 | 72 75 65 29 2c 20 22 22 |roups, t|rue), ""|
|00005b90| 29 29 3b 0d 0a 09 09 52 | 65 73 70 6f 6e 73 65 2e |));....R|esponse.|
|00005ba0| 53 75 62 73 74 28 22 4d | 61 6e 61 67 65 64 22 2c |Subst("M|anaged",|
|00005bb0| 20 45 76 61 6c 28 43 61 | 6e 50 65 72 66 6f 72 6d | Eval(Ca|nPerform|
|00005bc0| 28 22 41 6d 22 29 2c 20 | 48 79 70 65 72 6c 69 6e |("Am"), |Hyperlin|
|00005bd0| 6b 28 55 73 65 72 73 4d | 47 72 6f 75 70 73 50 61 |k(UsersM|GroupsPa|
|00005be0| 67 65 24 22 3f 65 64 69 | 74 3d 22 24 48 74 6d 6c |ge$"?edi|t="$Html|
|00005bf0| 45 6e 63 6f 64 65 28 78 | 55 73 65 72 2e 55 73 65 |Encode(x|User.Use|
|00005c00| 72 4e 61 6d 65 29 2c 4d | 61 6e 61 67 65 64 24 47 |rName),M|anaged$G|
|00005c10| 72 6f 75 70 73 2c 20 74 | 72 75 65 29 2c 20 22 22 |roups, t|rue), ""|
|00005c20| 29 29 3b 0d 0a 09 09 52 | 65 73 70 6f 6e 73 65 2e |));....R|esponse.|
|00005c30| 53 75 62 73 74 28 22 44 | 65 6c 65 74 65 22 2c 20 |Subst("D|elete", |
|00005c40| 45 76 61 6c 28 43 61 6e | 44 65 6c 65 74 65 2c 20 |Eval(Can|Delete, |
|00005c50| 48 79 70 65 72 6c 69 6e | 6b 28 55 73 65 72 73 42 |Hyperlin|k(UsersB|
|00005c60| 72 6f 77 73 65 50 61 67 | 65 24 22 3f 64 65 6c 65 |rowsePag|e$"?dele|
|00005c70| 74 65 3d 22 24 48 74 6d | 6c 45 6e 63 6f 64 65 28 |te="$Htm|lEncode(|
|00005c80| 78 55 73 65 72 2e 55 73 | 65 72 4e 61 6d 65 29 2c |xUser.Us|erName),|
|00005c90| 20 44 65 6c 65 74 65 54 | 65 78 74 2c 20 74 72 75 | DeleteT|ext, tru|
|00005ca0| 65 29 2c 20 22 22 29 29 | 3b 0d 0a 09 09 4f 75 74 |e), ""))|;....Out|
|00005cb0| 53 74 72 20 24 3d 20 57 | 65 62 49 6e 63 6c 75 64 |Str $= W|ebInclud|
|00005cc0| 65 28 22 75 73 65 72 73 | 5f 72 6f 77 22 29 3b 0d |e("users|_row");.|
|00005cd0| 0a 09 7d 0d 0a 09 72 65 | 74 75 72 6e 20 4f 75 74 |..}...re|turn Out|
|00005ce0| 53 74 72 3b 0d 0a 7d 0d | 0a 0d 0a 2f 2f 20 4d 75 |Str;..}.|...// Mu|
|00005cf0| 73 74 20 6e 6f 74 20 66 | 6f 72 67 65 74 20 74 6f |st not f|orget to|
|00005d00| 20 73 68 6f 77 20 6f 6e | 6c 79 20 74 68 65 20 47 | show on|ly the G|
|00005d10| 72 6f 75 70 73 20 74 68 | 61 74 20 74 68 65 20 61 |roups th|at the a|
|00005d20| 64 6d 69 6e 20 63 61 6e | 20 61 64 64 20 75 73 65 |dmin can| add use|
|00005d30| 72 73 20 74 6f 0d 0a 66 | 75 6e 63 74 69 6f 6e 20 |rs to..f|unction |
|00005d40| 73 74 72 69 6e 67 20 47 | 65 74 47 72 6f 75 70 73 |string G|etGroups|
|00005d50| 46 6f 72 42 72 6f 77 73 | 65 28 57 65 62 52 65 73 |ForBrows|e(WebRes|
|00005d60| 70 6f 6e 73 65 20 52 65 | 73 70 6f 6e 73 65 29 0d |ponse Re|sponse).|
|00005d70| 0a 7b 0d 0a 6c 6f 63 61 | 6c 20 78 41 64 6d 69 6e |.{..loca|l xAdmin|
|00005d80| 47 72 6f 75 70 09 78 47 | 72 6f 75 70 3b 0d 0a 6c |Group.xG|roup;..l|
|00005d90| 6f 63 61 6c 20 78 41 64 | 6d 69 6e 47 72 6f 75 70 |ocal xAd|minGroup|
|00005da0| 4c 69 73 74 20 78 47 72 | 6f 75 70 73 3b 0d 0a 6c |List xGr|oups;..l|
|00005db0| 6f 63 61 6c 20 73 74 72 | 69 6e 67 20 4f 75 74 53 |ocal str|ing OutS|
|00005dc0| 74 72 2c 20 54 6d 70 3b | 0d 0a 6c 6f 63 61 6c 20 |tr, Tmp;|..local |
|00005dd0| 69 6e 74 20 69 3b 0d 0a | 6c 6f 63 61 6c 20 62 6f |int i;..|local bo|
|00005de0| 6f 6c 20 43 61 6e 44 65 | 6c 65 74 65 2c 20 43 61 |ol CanDe|lete, Ca|
|00005df0| 6e 45 64 69 74 3b 0d 0a | 0d 0a 09 43 61 6e 44 65 |nEdit;..|...CanDe|
|00005e00| 6c 65 74 65 20 3d 20 43 | 61 6e 50 65 72 66 6f 72 |lete = C|anPerfor|
|00005e10| 6d 28 22 47 64 22 29 3b | 0d 0a 09 43 61 6e 45 64 |m("Gd");|...CanEd|
|00005e20| 69 74 20 3d 20 43 61 6e | 50 65 72 66 6f 72 6d 28 |it = Can|Perform(|
|00005e30| 22 47 65 22 29 3b 0d 0a | 09 69 66 28 43 75 72 41 |"Ge");..|.if(CurA|
|00005e40| 64 6d 69 6e 2e 62 4d 61 | 73 74 65 72 41 64 6d 69 |dmin.bMa|sterAdmi|
|00005e50| 6e 29 20 78 47 72 6f 75 | 70 73 20 3d 20 4c 65 76 |n) xGrou|ps = Lev|
|00005e60| 65 6c 2e 47 61 6d 65 2e | 41 63 63 65 73 73 43 6f |el.Game.|AccessCo|
|00005e70| 6e 74 72 6f 6c 2e 47 72 | 6f 75 70 73 3b 0d 0a 09 |ntrol.Gr|oups;...|
|00005e80| 65 6c 73 65 20 78 47 72 | 6f 75 70 73 20 3d 20 43 |else xGr|oups = C|
|00005e90| 75 72 41 64 6d 69 6e 2e | 4d 61 6e 61 67 65 64 47 |urAdmin.|ManagedG|
|00005ea0| 72 6f 75 70 73 3b 0d 0a | 0d 0a 09 69 66 20 28 78 |roups;..|...if (x|
|00005eb0| 47 72 6f 75 70 73 2e 43 | 6f 75 6e 74 28 29 20 3d |Groups.C|ount() =|
|00005ec0| 3d 20 30 29 0d 0a 09 7b | 0d 0a 09 09 52 65 73 70 |= 0)...{|....Resp|
|00005ed0| 6f 6e 73 65 2e 53 75 62 | 73 74 28 22 43 6f 6e 74 |onse.Sub|st("Cont|
|00005ee0| 65 6e 74 22 2c 20 52 65 | 70 6c 28 4e 6f 6e 65 49 |ent", Re|pl(NoneI|
|00005ef0| 74 65 6d 54 65 78 74 2c | 20 22 25 49 74 65 6d 25 |temText,| "%Item%|
|00005f00| 22 2c 20 47 72 6f 75 70 | 29 29 3b 0d 0a 09 09 52 |", Group|));....R|
|00005f10| 65 73 70 6f 6e 73 65 2e | 53 75 62 73 74 28 22 52 |esponse.|Subst("R|
|00005f20| 6f 77 43 6f 6e 74 65 6e | 74 22 2c 20 57 65 62 49 |owConten|t", WebI|
|00005f30| 6e 63 6c 75 64 65 28 43 | 65 6c 6c 4c 65 66 74 29 |nclude(C|ellLeft)|
|00005f40| 29 3b 0d 0a 09 09 72 65 | 74 75 72 6e 20 57 65 62 |);....re|turn Web|
|00005f50| 49 6e 63 6c 75 64 65 28 | 52 6f 77 4c 65 66 74 29 |Include(|RowLeft)|
|00005f60| 3b 0d 0a 09 7d 0d 0a 0d | 0a 09 52 65 73 70 6f 6e |;...}...|..Respon|
|00005f70| 73 65 2e 53 75 62 73 74 | 28 22 43 6f 6e 74 65 6e |se.Subst|("Conten|
|00005f80| 74 22 2c 20 4e 61 6d 65 | 54 65 78 74 29 3b 0d 0a |t", Name|Text);..|
|00005f90| 09 54 6d 70 20 3d 20 57 | 65 62 49 6e 63 6c 75 64 |.Tmp = W|ebInclud|
|00005fa0| 65 28 43 65 6c 6c 4c 65 | 66 74 29 3b 0d 0a 09 52 |e(CellLe|ft);...R|
|00005fb0| 65 73 70 6f 6e 73 65 2e | 53 75 62 73 74 28 22 43 |esponse.|Subst("C|
|00005fc0| 6f 6e 74 65 6e 74 22 2c | 20 50 72 69 76 69 6c 65 |ontent",| Privile|
|00005fd0| 67 65 73 29 3b 0d 0a 09 | 54 6d 70 20 3d 20 54 6d |ges);...|Tmp = Tm|
|00005fe0| 70 20 24 20 57 65 62 49 | 6e 63 6c 75 64 65 28 43 |p $ WebI|nclude(C|
|00005ff0| 65 6c 6c 4c 65 66 74 29 | 3b 0d 0a 09 52 65 73 70 |ellLeft)|;...Resp|
|00006000| 6f 6e 73 65 2e 53 75 62 | 73 74 28 22 43 6f 6e 74 |onse.Sub|st("Cont|
|00006010| 65 6e 74 22 2c 20 53 65 | 63 75 72 69 74 79 4c 65 |ent", Se|curityLe|
|00006020| 76 65 6c 29 3b 0d 0a 09 | 54 6d 70 20 3d 20 54 6d |vel);...|Tmp = Tm|
|00006030| 70 20 24 20 57 65 62 49 | 6e 63 6c 75 64 65 28 43 |p $ WebI|nclude(C|
|00006040| 65 6c 6c 4c 65 66 74 29 | 3b 0d 0a 09 52 65 73 70 |ellLeft)|;...Resp|
|00006050| 6f 6e 73 65 2e 53 75 62 | 73 74 28 22 43 6f 6e 74 |onse.Sub|st("Cont|
|00006060| 65 6e 74 22 2c 20 22 26 | 6e 62 73 70 3b 22 29 3b |ent", "&|nbsp;");|
|00006070| 0d 0a 09 54 6d 70 20 3d | 20 45 76 61 6c 28 43 61 |...Tmp =| Eval(Ca|
|00006080| 6e 44 65 6c 65 74 65 2c | 20 54 6d 70 20 24 20 57 |nDelete,| Tmp $ W|
|00006090| 65 62 49 6e 63 6c 75 64 | 65 28 43 65 6c 6c 4c 65 |ebInclud|e(CellLe|
|000060a0| 66 74 29 2c 20 54 6d 70 | 29 3b 0d 0a 09 52 65 73 |ft), Tmp|);...Res|
|000060b0| 70 6f 6e 73 65 2e 53 75 | 62 73 74 28 22 52 6f 77 |ponse.Su|bst("Row|
|000060c0| 43 6f 6e 74 65 6e 74 22 | 2c 20 54 6d 70 29 3b 0d |Content"|, Tmp);.|
|000060d0| 0a 09 4f 75 74 53 74 72 | 20 3d 20 57 65 62 49 6e |..OutStr| = WebIn|
|000060e0| 63 6c 75 64 65 28 52 6f | 77 4c 65 66 74 29 3b 0d |clude(Ro|wLeft);.|
|000060f0| 0a 0d 0a 09 66 6f 72 20 | 28 69 3d 30 3b 20 69 3c |....for |(i=0; i<|
|00006100| 78 47 72 6f 75 70 73 2e | 43 6f 75 6e 74 28 29 3b |xGroups.|Count();|
|00006110| 20 69 2b 2b 29 0d 0a 09 | 7b 0d 0a 09 09 78 47 72 | i++)...|{....xGr|
|00006120| 6f 75 70 20 3d 20 78 47 | 72 6f 75 70 73 2e 47 65 |oup = xG|roups.Ge|
|00006130| 74 28 69 29 3b 0d 0a 09 | 09 2f 2f 20 42 75 69 6c |t(i);...|.// Buil|
|00006140| 64 20 31 20 47 72 6f 75 | 70 20 52 6f 77 0d 0a 09 |d 1 Grou|p Row...|
|00006150| 09 52 65 73 70 6f 6e 73 | 65 2e 53 75 62 73 74 28 |.Respons|e.Subst(|
|00006160| 22 47 72 6f 75 70 6e 61 | 6d 65 22 2c 20 48 79 70 |"Groupna|me", Hyp|
|00006170| 65 72 6c 69 6e 6b 28 47 | 72 6f 75 70 73 45 64 69 |erlink(G|roupsEdi|
|00006180| 74 50 61 67 65 24 22 3f | 65 64 69 74 3d 22 24 48 |tPage$"?|edit="$H|
|00006190| 74 6d 6c 45 6e 63 6f 64 | 65 28 78 47 72 6f 75 70 |tmlEncod|e(xGroup|
|000061a0| 2e 47 72 6f 75 70 4e 61 | 6d 65 29 2c 48 74 6d 6c |.GroupNa|me),Html|
|000061b0| 45 6e 63 6f 64 65 28 78 | 47 72 6f 75 70 2e 47 72 |Encode(x|Group.Gr|
|000061c0| 6f 75 70 4e 61 6d 65 29 | 2c 74 72 75 65 29 29 3b |oupName)|,true));|
|000061d0| 0d 0a 09 09 52 65 73 70 | 6f 6e 73 65 2e 53 75 62 |....Resp|onse.Sub|
|000061e0| 73 74 28 22 50 72 69 76 | 69 6c 65 67 65 73 22 2c |st("Priv|ileges",|
|000061f0| 20 78 47 72 6f 75 70 2e | 50 72 69 76 69 6c 65 67 | xGroup.|Privileg|
|00006200| 65 73 29 3b 0d 0a 09 09 | 52 65 73 70 6f 6e 73 65 |es);....|Response|
|00006210| 2e 53 75 62 73 74 28 22 | 47 61 6d 65 73 65 63 22 |.Subst("|Gamesec"|
|00006220| 2c 20 73 74 72 69 6e 67 | 28 78 47 72 6f 75 70 2e |, string|(xGroup.|
|00006230| 47 61 6d 65 53 65 63 4c | 65 76 65 6c 29 29 3b 0d |GameSecL|evel));.|
|00006240| 0a 09 09 52 65 73 70 6f | 6e 73 65 2e 53 75 62 73 |...Respo|nse.Subs|
|00006250| 74 28 22 44 65 6c 65 74 | 65 22 2c 20 45 76 61 6c |t("Delet|e", Eval|
|00006260| 28 43 61 6e 44 65 6c 65 | 74 65 2c 20 48 79 70 65 |(CanDele|te, Hype|
|00006270| 72 4c 69 6e 6b 28 47 72 | 6f 75 70 73 42 72 6f 77 |rLink(Gr|oupsBrow|
|00006280| 73 65 50 61 67 65 20 24 | 20 22 3f 64 65 6c 65 74 |sePage $| "?delet|
|00006290| 65 3d 22 20 24 20 48 74 | 6d 6c 45 6e 63 6f 64 65 |e=" $ Ht|mlEncode|
|000062a0| 28 78 47 72 6f 75 70 2e | 47 72 6f 75 70 4e 61 6d |(xGroup.|GroupNam|
|000062b0| 65 29 2c 20 44 65 6c 65 | 74 65 54 65 78 74 2c 20 |e), Dele|teText, |
|000062c0| 54 72 75 65 29 2c 20 22 | 22 29 29 3b 0d 0a 09 09 |True), "|"));....|
|000062d0| 4f 75 74 53 74 72 20 24 | 3d 20 57 65 62 49 6e 63 |OutStr $|= WebInc|
|000062e0| 6c 75 64 65 28 22 67 72 | 6f 75 70 73 5f 72 6f 77 |lude("gr|oups_row|
|000062f0| 22 29 3b 0d 0a 09 7d 0d | 0a 09 72 65 74 75 72 6e |");...}.|..return|
|00006300| 20 4f 75 74 53 74 72 3b | 0d 0a 7d 0d 0a 0d 0a 66 | OutStr;|..}....f|
|00006310| 75 6e 63 74 69 6f 6e 20 | 73 74 72 69 6e 67 20 47 |unction |string G|
|00006320| 65 74 50 72 69 76 73 48 | 65 61 64 65 72 28 73 74 |etPrivsH|eader(st|
|00006330| 72 69 6e 67 20 70 72 69 | 76 73 2c 20 73 74 72 69 |ring pri|vs, stri|
|00006340| 6e 67 20 74 65 78 74 2c | 20 62 6f 6f 6c 20 63 6f |ng text,| bool co|
|00006350| 6e 64 2c 20 73 74 72 69 | 6e 67 20 74 61 67 29 0d |nd, stri|ng tag).|
|00006360| 0a 7b 0d 0a 09 52 65 73 | 70 2e 53 75 62 73 74 28 |.{...Res|p.Subst(|
|00006370| 22 43 68 65 63 6b 62 6f | 78 22 2c 20 43 68 65 63 |"Checkbo|x", Chec|
|00006380| 6b 62 6f 78 28 54 61 67 | 2c 20 49 6e 73 74 72 28 |kbox(Tag|, Instr(|
|00006390| 22 7c 22 24 70 72 69 76 | 73 24 22 7c 22 2c 20 22 |"|"$priv|s$"|", "|
|000063a0| 7c 22 24 74 61 67 24 22 | 7c 22 29 20 21 3d 20 2d ||"$tag$"||") != -|
|000063b0| 31 2c 20 21 63 6f 6e 64 | 29 29 3b 0d 0a 09 52 65 |1, !cond|));...Re|
|000063c0| 73 70 2e 53 75 62 73 74 | 28 22 54 65 78 74 22 2c |sp.Subst|("Text",|
|000063d0| 20 74 65 78 74 29 3b 0d | 0a 09 72 65 74 75 72 6e | text);.|..return|
|000063e0| 20 57 65 62 49 6e 63 6c | 75 64 65 28 22 70 72 69 | WebIncl|ude("pri|
|000063f0| 76 73 5f 68 65 61 64 65 | 72 22 29 3b 0d 0a 7d 0d |vs_heade|r");..}.|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.
