Premium satmak ve premiumsuzları kontrol etmek

1. CREATE PROCEDURE [dbo].[ACCOUNT_LOGIN]
   
2. 
   
3. @AccountID varchar(21),
   
4. @Password varchar(13),
   
5. @nRet smallintOUTPUT
   
6. 
   
7. AS
   
8. 
   
9. DECLARE @Nation tinyint, @CharNum smallint, @PremyName varchar(21)
   
10. 
    
11. -----------------------------------Process Login----------------------------------------
    
12. SET @Nation = 0
    
13. SET @CharNum = 0
    
14. DECLARE @pwd varchar(13)
    
15. SET @pwd =null
    
16. SELECT @pwd = strPasswd FROM TB_USER WHERE strAccountID = @AccountID and idays>0
    
17. IF @pwd ISnull
    
18. BEGIN
    
19. 
    
20. --SET @nRet = 0
    
21. SET @nRet = 4
    
22. RETURN
    
23. END
    
24. ELSEIF @pwd <> @Password
    
25. BEGIN
    
26. --SET @nRet = 0
    
27. SET @nRet = 3
    
28. RETURN
    
29. END
    
30. ----------------------------Premium Check-----------------------------------------------
    
31. select @PremyName = strAccountID from PremiumCheck where strAccountID = @AccountID
    
32. IF @PremyName = @AccountID -- Define Premium Account Name Check
    
33. BEGIN
    
34. SET @nRet = 12 -- Give notice, edit in texts.tbl
    
35. RETURN
    
36. END
    
37. 
    
38. ------------------------------Successfull Transaction-----------------------------------
    
39. SELECT @Nation = bNation, @CharNum = bCharNum FROM ACCOUNT_CHAR WHERE strAccountID = @AccountID
    
40. IF@@ROWCOUNT= 0
    
41. BEGIN
    
42. SET @nRet = 1
    
43. RETURN
    
44. END
    
45. IF @CharNum = 0
    
46. BEGIN
    
47. SET @nRet = 1
    
48. RETURN
    
49. END
    
50. ELSE
    
51. BEGIN
    
52. SET @nRet = 1
    
53. RETURN
    
54. END

复制代码

1. USE [KN_online]
   
2. GO
   
3. /****** Object:  Table [dbo].[PremiumCheck]    Script Date: 09/26/2008 11:07:28 ******/
   
4. SET ANSI_NULLS ON
   
5. GO
   
6. SET QUOTED_IDENTIFIER ON
   
7. GO
   
8. SET ANSI_PADDING ON
   
9. GO
   
10. CREATE TABLE [dbo].[PremiumCheck](
    
11. [strAccountID] [varchar](21) COLLATE Latin1_General_CI_AI NOT NULL
    
12. ) ON [PRIMARY]
    
13. GO
    
14. SET ANSI_PADDING OFF

复制代码

旧版内移过去的。需要的自取