• Bem vindo à nossa comunidade - Quer se juntar ao resto dos nossos membros? Registre-se*Registros aprovados pela adminitração

AUTO-BAN Bannido todas as accs e char Ajuda

Status
Não esta aberto para novas mensagens.

tonyyjohnata

Usuário XPZ
Preciso de uma ajuda ugente..


eu rodei uma quary da vcm. e essa quary, ela iria bannir qualquer acc q usasse bugs, dupers e etc... e o anti duper ta bennido todas as accs, inclusive a minha..


Qro muito remover isso.. como q eu faço por favor?
 

tonyyjohnata

Usuário XPZ
Desculpa flooda..


mas me ajuda ai galera o pessoal ta querendo ir pvp.


Olhem ai a quary q eu rodei..


• Vá em Iniciar >>Todos os Programas >> Microsoft SQL Server >> Query Analyzer


• Será aberto um recorrente que diz conectar ao SQL Server, em seguida entre com seu Loguim e Senha do SQL.


• Após entrar no Query analyzer irá abrir um grande espaço para inserir um texto, neste espaço cole o seguinte código:


if exists(select * from dbo.sysobjects where type='p' and name='WZ_GetItemSerial')


drop procedure WZ_GetItemSerial


go


CREATE procedure WZ_GetItemSerial as BEGIN DECLARE @ItemSerial int set nocount on begin transaction update GameServerInfo set @ItemSerial = ItemCount = (case when ItemCount < 0x7effffff then ItemCount+1 else 1 end ) if(@@error <> 0) begin rollback transaction select-1 end else begin commit transaction select @ItemSerial end


END


GO


if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[trg_CheckSameID]') and OBJECTPROPERTY(id, N'IsTrigger') = 1) drop trigger [dbo].[trg_CheckSameID]


GO


if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[AllItemsLog]') and OBJECTPROPERTY(id, N'IsUserTable') = 1) drop table [dbo].[AllItemsLog]


GO


if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[CopyLog]') and OBJECTPROPERTY(id, N'IsUserTable') = 1) drop table [dbo].[CopyLog]


GO


CREATE TABLE [dbo].[AllItemsLog] (


[items_id] [int] IDENTITY (1, 1) NOT NULL ,


[items_type] [binary] (1) NOT NULL ,


[items_serial] [binary] (4) NOT NULL ,


[items_acid] [varchar] (10) COLLATE Chinese_PRC_CI_AS NOT NULL


) ON [PRIMARY]


GO


CREATE TABLE [dbo].[CopyLog] (


[copy_id] [int] IDENTITY (1, 1) NOT NULL ,


[copy_acid] [varchar] (10) COLLATE Chinese_PRC_CI_AS NOT NULL ,


[copy_whdata] [binary] (1200) NOT NULL ,


[copy_date] [datetime] NOT NULL


) ON [PRIMARY]


GO


ALTER TABLE [dbo].[AllItemsLog] ADD


CONSTRAINT [DF_CT_ITEM_item] DEFAULT (0) FOR [items_type],


CONSTRAINT [DF_CT_ITEM_itemid] DEFAULT (0) FOR [items_serial],


CONSTRAINT [DF_CT_ITEM_itemrole] DEFAULT ('') FOR [items_acid]


GO


CREATE INDEX [iX_CT_ITEM] ON [dbo].[AllItemsLog]([items_type], [items_serial]) ON [PRIMARY]


GO


ALTER TABLE [dbo].[CopyLog] ADD


CONSTRAINT [DF_CopyLog_copy_date] DEFAULT (getdate()) FOR [copy_date]


GO


SET QUOTED_IDENTIFIER ON


GO


SET ANSI_NULLS ON


GO


CREATE TRIGGER [dbo].[trg_CheckSameID] ON [dbo].[character] FOR UPDATE AS BEGIN IF UPDATE(inventory) BEGIN SET NOCOUNT ON DECLARE @wh_acid varchar(10), @wh_data binary(1200), @wh_type binary(1), @wh_serial binary(4), @cr_user varchar(10), @cr_acid varchar(10), @cr_data binary(760), @cr_type binary(1), @cr_serial binary(4), @al_acid varchar(10), @j int, @k int, @find bit


SELECT @cr_acid=i.accountid,


@cr_data=i.inventory


FROM inserted i


SET @j=0


SET @find=0


WHILE @j<76 AND @cr_data IS NOT NULL


BEGIN


SET @cr_type=SUBSTRING(@cr_data,@j*10+1,1)


SET @cr_serial=SUBSTRING(@cr_data,@j*10+4,4)


IF @cr_type<>0xFF AND @cr_serial<>0x00000000


BEGIN


SELECT @al_acid=items_acid FROM allitemslog WHERE items_type=@cr_type AND items_serial=@cr_serial


IF @al_acid IS NULL


INSERT INTO allitemslog (items_type,items_serial,items_acid) VALUES (@cr_type,@cr_serial,@cr_acid)


ELSE


BEGIN


UPDATE allitemslog SET items_acid=@cr_acid WHERE items_type=@cr_type AND items_serial=@cr_serial


SELECT @wh_data=items FROM warehouse WHERE accountid=@al_acid


SET @k=0


WHILE @k<120 AND @wh_data IS NOT NULL


BEGIN


SET @wh_type=SUBSTRING(@wh_data,@k*10+1,1)


SET @wh_serial=SUBSTRING(@wh_data,@k*10+4,4)


IF @wh_type=@cr_type AND @wh_serial=@cr_serial


SET @find=1


SET @k=@k+1


END


END


END


SET @j=@j+1


END


IF @find=1


BEGIN


INSERT INTO copylog (copy_whdata,copy_acid,copy_date) VALUES (@wh_data,@al_acid,getdate())


-- this is wer u can add more punishment like ban or lock characters


UPDATE Character SET CtlCode=1 WHERE accountid=@al_acid


END


SET NOCOUNT OFF


END


END


GO


SET QUOTED_IDENTIFIER OFF


GO


SET ANSI_NULLS ON


GO


DECLARE @al_acid char(50)


set @al_acid = 'ASUS'


UPDATE Character SET CtlCode=1 WHERE accountid=@al_acid


go


select * from AllItemsLog


select * from CopyLog


• Presione F5 e depois Ctrl+N.


• Irá abrir outra tela, nesta outra tela cole o seguinte código:


select * from AllItemsLog


select * from CopyLog


• Dê F5 e Ctrl+N novamente e mais uma vez irá abrir outra tela, cole o código abaixo:


select * from CopyLog


• Pressione F5 e está pronto, em seguida feche todas as janelas abertas salvando os "logs" aonde desejar.
 
Editado por um moderador:

ajudaemmuonline

Novato XPZ
Cara acho que o jeito seria:

(antes de tudo faça um backup da sua DB!)

Você criar uma database chamada MuOnline2 e restaurar ela  (com a db original do muserver , sem contas e sem alterações)

depois ir em:

Iniciar > Todos os Programas > Micrisoft SQL Server > Enterprise Manager

Clique no sinal de + ate chegar no (LOCAL) (WindowsNT)

depois clicar na DB MuOnline2  <<preste atenção tem que ser a MuOnline2 !!!

depois clicar em ''Stored Procedures''

Depois na procedure ''WZ_GetItemSerial'' clique duas vezes nela e copie o codigo que está nela

Feito isso

vai de novo em

Iniciar > Todos os Programas > Microsoft SQL Server > Enterprise Manager

Clique no sinal de + ate chegar no (LOCAL) (WindowsNT)

depois clicar na DB MuOnline  <<preste atenção que agora tem que ser a MuOnline !!!

depois clicar em ''Stored Procedures''

Depois na procedure ''WZ_GetItemSerial''

e cole o codigo que você copiou nela (substitua o código que estiver nela) , clique em Apply e dê OK

Feito isso

rode essa query que vai desbloquear todas as contas que foram bloqueadas! (selecione a DB MuOnline)

UPDATE MEMB_INFO SET bloc_code=0

--Edit--

roda essa também

UPDATE Character SET CtlCode=0
 
Editado por um moderador:

tonyyjohnata

Usuário XPZ
vlw mano.


vou fazer isso. ja uso essa minha DB MUONLINE a 7 anos. ja usei varias websits com ela.


e nao queria perde-la..


vou restaurar ela de novo sem fazer o becakp atual. tem poucas contas criadas e a galera tava começando Hoje,..


Obrigado.
 
Status
Não esta aberto para novas mensagens.
Topo Bottom