MuEMU 8.3 VIP Auto Expiration

https://i.imgsafe.org/15537368b9.png


To make VIP Account auto expire, edit stored procedure "WZ_GetAccountLevel" in database

he does not create the database .[dbo].[WZ_GetAccountLevel]

Quote:

---

Originally Posted by djguncha

https://i.imgsafe.org/15537368b9.png


To make VIP Account auto expire, edit stored procedure "WZ_GetAccountLevel" in database

he does not create the database .[dbo].[WZ_GetAccountLevel]

---

Tx Mate :D

can you post the whole code in text format too?

Quote:

---

Originally Posted by KarLi

can you post the whole code in text format too?

---

here:

Code:

---

USE [MuOnline]
GO

SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO

ALTER Procedure [dbo].[WZ_GetAccountLevel]
 @account varchar(10)
AS
BEGIN

SET NOCOUNT ON
SET XACT_ABORT ON

DECLARE @CurrentAccountLevel int
DECLARE @CurrentAccountExpireDate smalldatetime

SELECT @CurrentAccountLevel = AccountLevel, @CurrentAccountExpireDate = AccountExpireDate FROM MEMB_INFO WHERE memb___id = @account

IF (@CurrentAccountLevel <> 0 AND GETDATE() > @CurrentAccountExpireDate)
BEGIN
        SET @CurrentAccountLevel = 0
        UPDATE MEMB_INFO SET AccountLevel = @CurrentAccountLevel, AccountExpireDate = @CurrentAccountExpireDate WHERE memb___id = @account
END

SELECT @CurrentAccountLevel as AccountLevel, @CurrentAccountExpireDate as AccountExpireDate

SET NOCOUNT OFF
SET XACT_ABORT OFF

END
GO

SET ANSI_NULLS OFF
GO

SET QUOTED_IDENTIFIER OFF
GO

---

work for season 6.3 too :D thanks

Quote:

---

Originally Posted by mcmarilag

here:

Code:

---

USE [MuOnline]
GO

SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO

ALTER Procedure [dbo].[WZ_GetAccountLevel]
 @account varchar(10)
AS
BEGIN

SET NOCOUNT ON
SET XACT_ABORT ON

DECLARE @CurrentAccountLevel int
DECLARE @CurrentAccountExpireDate smalldatetime

SELECT @CurrentAccountLevel = AccountLevel, @CurrentAccountExpireDate = AccountExpireDate FROM MEMB_INFO WHERE memb___id = @account

IF (@CurrentAccountLevel <> 0 AND GETDATE() > @CurrentAccountExpireDate)
BEGIN
        SET @CurrentAccountLevel = 0
        UPDATE MEMB_INFO SET AccountLevel = @CurrentAccountLevel, AccountExpireDate = @CurrentAccountExpireDate WHERE memb___id = @account
END

SELECT @CurrentAccountLevel as AccountLevel, @CurrentAccountExpireDate as AccountExpireDate

SET NOCOUNT OFF
SET XACT_ABORT OFF

END
GO

SET ANSI_NULLS OFF
GO

SET QUOTED_IDENTIFIER OFF
GO

---

---

can you post a query for vip?

Code:

---

To add VIP to the account, send to MuOnline database following query:

 UPDATE MEMB_INFO SET AccountLevel = 1, AccountExpireDate = GETDATE() + 30 WHERE memb___id = 'LOGIN'

 LEGEND:
 1 - Account Level (AL0, AL1, AL2, AL3)
30 - VIP Days
LOGIN - Account Login

---

Here you are!

Quote:

---

Originally Posted by diegah

Code:

---

To add VIP to the account, send to MuOnline database following query:

 UPDATE MEMB_INFO SET AccountLevel = 1, AccountExpireDate = GETDATE() + 30 WHERE memb___id = 'LOGIN'

 LEGEND:
 1 - Account Level (AL0, AL1, AL2, AL3)
30 - VIP Days
LOGIN - Account Login

---

Here you are!

---

Thanks very much bro @diegah (y)

have somebody procedure for Auto expire BAN (Auto Unban)?

Quote:

---

Originally Posted by djguncha

https://i.imgsafe.org/15537368b9.png



To make VIP Account auto expire, edit stored procedure "WZ_GetAccountLevel" in database

he does not create the database .[dbo].[WZ_GetAccountLevel]

---

how to create .[dbo].[WZ_GetAccountLevel] in data base

Quote:

---

Originally Posted by Rupper

have somebody procedure for Auto expire BAN (Auto Unban)?

---

Use the same accountexpirate code as a base to creat this.

Quote:

---

Originally Posted by generalhbk

Thanks very much bro @diegah (y)

---

any tutorial on how to put that code thanks my used season 6 epi 3

Quote:

---

Originally Posted by spacein

any tutorial on how to put that code thanks my used season 6 epi 3

---

Run them in new Query :v

thanks but this code is for season 8 i thought in season 6

any season ithink :D