الإعلانات
قديم 25-11-2013, 02:37 AM   #1

Yui
عضو فعال





• الانـتـسـاب » Sep 2012
• رقـم العـضـويـة » 105332
• المشـــاركـات » 319
• الـدولـة »
• الـهـوايـة » Hex,PHP,C#,SQL
• اسـم الـسـيـرفـر » No Server
• الـجـنـس » Male
• نقـاط التقييم » 43
Yui صـاعـد

Yui غير متواجد حالياً


إرسال رسالة عبر Yahoo إلى Yui

(6) Banned IP system By Yui



Hello Silkroad4arab

Today i will add New Banned system for silkroad server
with this system can get IP by Charname & Charname by IP
also can Banned any IP you want


كود PHP:
USE SRO_VT_SHARDLOG 

CREATE TABLE _IPLogs 
(  

[
No.] int IDENTITY(1,1PRIMARY KEY,  
[
CharIDint,  
[
Charnamevarchar(max),  
[
IPvarchar(max),  
[
Datedatetime  
); 
كود PHP:
USE SRO_VT_SHARDLOG  
GO  

SET ANSI_NULLS ON  
GO  
SET QUOTED_IDENTIFIER ON  
GO  


ALTER   procedure 
[dbo].[_AddLogChar]   
@
CharID        int,  
@
EventID        tinyint,  
@
Data1        int,  
@
Data2        int,  
@
strPos        varchar(64),  
@
Desc        varchar(128)  
as  

    IF(@
EventID OR @EventID 6)  
    
BEGIN  

    
declare @len_pos     int  
    
declare @len_desc    int  
    set 
@len_pos len(@strPos)  
    
set @len_desc len(@Desc)  
    if (@
len_pos and @len_desc 0)  
    
begin      
        insert _LogEventChar values
(@CharIDGetDate(), @EventID, @Data1, @Data2, @strPos, @Desc)      
    
end  
    
else if (@len_pos and @len_desc 0)  
    
begin       
        insert _LogEventChar 
(CharIDEventTimeEventIDData1Data2EventPosvalues(@CharIDGetDate(), @EventID, @Data1, @Data2, @strPos)  
    
end  
    
else if (@len_pos and @len_desc 0)  
    
begin       
        insert _LogEventChar 
(CharIDEventTimeEventIDData1Data2strDescvalues(@CharIDGetDate(), @EventID, @Data1, @Data2, @Desc)  
    
end  
    
else  
    
begin  
        insert _LogEventChar 
(CharIDEventTimeEventIDData1Data2values(@CharIDGetDate(), @EventID, @Data1, @Data2)  
    
end  
      
    
--For the new IPLog table  
    
Declare @DynIP varchar(max);  
    
exec @DynIP SRO_VT_ACCOUNT.dbo.split_ip @Data2  
    INSERT INTO _IPLogs 
(CharID,Charname,IP,[Date]) VALUES (@CharID, (SELECT CharName16 FROM SRO_VT_SHARD_INIT.dbo._Char WHERE CharID = @CharID),@DynIP,GETDATE())  
    -- 
END  

    END 

------------------------------------------------------------------------------------------------ 
كود PHP:
use SRO_VT_SHARDLOG 
CREATE TABLE _BannedIPs 

[
No.] int PRIMARY KEY IDENTITY (1,1), 
[
IPvarchar(maxNOT NULL 
); 
كود PHP:
USE [SRO_VT_ACCOUNT
GO 
SET ANSI_NULLS ON 
GO 
SET QUOTED_IDENTIFIER ON 
GO 

CREATE PROCEDURE 
[dbo].[_BannPlayerSP]          

@
CharName varchar(max), 
@
Reason varchar(max

as 
--------------------------------                            
DECLARE @
ChrID INT;             
DECLARE @
AccJID INT;            
--------------------------------- 

SET @ChrID=(SELECT CharID FROM SRO_VT_SHARD_INIT.dbo._Char WHERE CharName16=@CharName
SET @AccJID=(SELECT UserJID FROM SRO_VT_SHARD_INIT.dbo._User WHERE CharID=@ChrID

---------------------- 

DECLARE  
        @
ID VARCHAR(64) = (Select STRuserID FROM TB_User Where JID = @AccJID), 
        @
Begin DATETIME GETDATE()-1
        @
End DATETIME GETDATE()+3650 


INSERT 
[dbo].[_Punishment

[
UserJID], 
[
Type], 
[
Executor], 
[
Shard], 
[
CharName], 
[
CharInfo], 
[
PosInfo] , 
[
Guide], 
[
Description], 
[
RaiseTime], 
[
BlockStartTime], 
[
BlockEndTime], 
[
PunishTime], 
[
Status

VALUES  

@
AccJID
1
1
0
@
CharName
1
1
@
Reason
@
Reason
@
Begin
@
Begin
@
End
@
End
0); 
---------------------------------------------------------- 
DECLARE @
ReasonID INT 
SET 
@ReasonID 
(
Select SerialNo FROM _Punishment Where UserJID = @AccJID
---------------------------------------------------------- 
INSERT [dbo].[_BlockedUser

[
UserJID], 
[
UserID], 
[
Type], 
[
SerialNo], 
[
TimeBegin], 
[
TimeEnd]) 
VALUES 

@
AccJID
@
ID
1
@
ReasonID
@
Begin
@
End); 

----------------------------------------------------------------- 
SELECT StrUserID FROM TB_User WHERE JID = @AccJID 
--------------------------------------------------------------- 
كود PHP:
USE [Log_DB]  
GO  

SET ANSI_NULLS ON  
GO  
SET QUOTED_IDENTIFIER ON  
GO  


ALTER   procedure 
[dbo].[_AddLogChar]   
@
CharID        int,  
@
EventID        tinyint,  
@
Data1        int,  
@
Data2        int,  
@
strPos        varchar(64),  
@
Desc        varchar(128)  
as  

    IF(@
EventID OR @EventID 6)  
    
BEGIN  

    
declare @len_pos     int  
    
declare @len_desc    int  
    set 
@len_pos len(@strPos)  
    
set @len_desc len(@Desc)  
    if (@
len_pos and @len_desc 0)  
    
begin      
        insert _LogEventChar values
(@CharIDGetDate(), @EventID, @Data1, @Data2, @strPos, @Desc)      
    
end  
    
else if (@len_pos and @len_desc 0)  
    
begin       
        insert _LogEventChar 
(CharIDEventTimeEventIDData1Data2EventPosvalues(@CharIDGetDate(), @EventID, @Data1, @Data2, @strPos)  
    
end  
    
else if (@len_pos and @len_desc 0)  
    
begin       
        insert _LogEventChar 
(CharIDEventTimeEventIDData1Data2strDescvalues(@CharIDGetDate(), @EventID, @Data1, @Data2, @Desc)  
    
end  
    
else  
    
begin  
        insert _LogEventChar 
(CharIDEventTimeEventIDData1Data2values(@CharIDGetDate(), @EventID, @Data1, @Data2)  
    
end  
      
    
--For the new IPLog table  
    
Declare @DynIP varchar(max);  
    
exec @DynIP SRO_VT_ACCOUNT.dbo.split_ip @Data2  
    INSERT INTO _IPLogs 
(CharID,Charname,IP,[Date]) VALUES (@CharID, (SELECT CharName16 FROM SRO_VT_SHARD_INIT.dbo._Char WHERE CharID = @CharID),@DynIP,GETDATE())  
    -- 
END 
    
-- Banned IP stuff 
    
IF exists (SELECT IP FROM _BannedIPs WHERE IP like @DynIP
    
BEGIN 
    
Declare @Charname varchar(max) = (SELECT CharName16 FROM SRO_VT_SHARD_INIT.dbo._Char WHERE CharID = @CharID
     
    
exec SRO_VT_ACCOUNT.dbo._BannPlayerSP @Charname,'usage of a banned IP' 
    
-- END banned IP stuff 
    END 

    END 
--------------------------------------------------------------- 
Have Fun
This V.1.1.0
Coming soon with tools V.2.1.0








رد مع اقتباس
إعلانات google

 


يتصفح الموضوع حالياً : 1 (0 عضو و 1 زائر)
 

ضوابط المشاركة
لا تستطيع إضافة مواضيع جديدة
لا تستطيع الرد على المواضيع
لا تستطيع إرفاق ملفات
لا تستطيع تعديل مشاركاتك

BB code متاحة
كود [IMG] متاحة
كود HTML معطلة

الانتقال السريع

المواضيع المتشابهه
الموضوع كاتب الموضوع المنتدى الردود آخر مشاركة
AGEX | 80 CAP | ONLY CH | COIN SYSTEM|| JOB SYSTEM| AUTO EVENT | NO İNGAME- NO PAY | GRAND OPENİNG: PergamonOnline قـسـم الـسـيـرفـرات الـخـاصـة 0 12-06-2023 09:09 PM
أزاى الجام ماستر يكلمنى فى اللعبه يقولى Banned ؟ وبفتحها لقيتها مش banned NoKia.Photo صـور سـيـلك رود 35 05-08-2009 05:27 AM


الساعة الآن 10:25 AM.