Buyrun HackShield SQL 2000 Login Proceduru:


Kod:
[/FONT][/SIZE][/COLOR]CREATE PROCEDURE [dbo].[HACKSHIELD_LOGIN] [I @accountID varchar(21),[/I] [I @password varchar(32),[/I] @nRet smallint OUTPUT AS /* Author: Nero */ DECLARE @accountID2 varchar(50), @password2 varchar(50), @authority smallint, @ChaR1 smallint, @ChaR2 smallint, @ChaR3 smallint /*SELECT @ChaR1 = Authority FROM USERDATA WHERE strUserID = (SELECT strCharID1 FROM ACCOUNT_CHAR WHERE strAccountID = @accountID and strCharID1 IS NOT NULL) SELECT @ChaR2 = Authority FROM USERDATA WHERE strUserID = (SELECT strCharID2 FROM ACCOUNT_CHAR WHERE strAccountID = @accountID and strCharID2 IS NOT NULL) SELECT @ChaR3 = Authority FROM USERDATA WHERE strUserID = (SELECT strCharID3 FROM ACCOUNT_CHAR WHERE strAccountID = @accountID and strCharID3 IS NOT NULL) IF @ChaR1 = 255 or @ChaR2 = 255 or @ChaR3 = 255 BEGIN UPDATE TB_USER SET strAuthority = 255 where strAccountID = @accountID END ELSE BEGIN UPDATE TB_USER SET strAuthority = NULL where strAccountID = @accountID END */ -- Otomatik uyelik SELECT @accountID2 = COUNT(strAccountID) FROM TB_USER WHERE strAccountID = @accountID IF @accountID2 = 0 BEGIN INSERT INTO TB_USER (strAccountID, strpasswd, strSocNo, idays) VALUES @accountID, @password, 1, '6') END /* Normal uyelik SELECT @accountID2 = COUNT(strAccountID) FROM TB_USER WHERE strAccountID = @accountID IF @accountID2 = 0 BEGIN SET @nRet = 2 -- Account doesnt exist. RETURN END */ SELECT @password2 = strPasswd, @authority = strAuthority FROM TB_USER WHERE strAccountID = @accountID IF @password2 IS null or @password2 != @password BEGIN SET @nRet = 3 -- Invalid password. RETURN END ELSE IF @authority = 255 BEGIN SET @nRet = 4 -- Account is banned. RETURN END ELSE BEGIN DELETE CURRENTUSER WHERE strAccountID = @accountID SET @nRet = 1 RETURN END GO4


​
[/B]