ForumDATA
Would you like to react to this message? Create an account in a few clicks or log in to continue.

ForumDATA

ForumDATA Forum
 
AnasayfaAnasayfa  AramaArama  Latest imagesLatest images  Zayıflama Lida Fx15 ve Biber Hapı zlfvbhZayıflama Lida Fx15 ve Biber Hapı zlfvbh  Kayıt OlKayıt Ol  Giriş yapGiriş yap  

 

 [Paylaşım]Name Change(Nick Değiştirme) Ekleme Kodu

Aşağa gitmek 
YazarMesaj
ADMİN
KoManyak Yönetim
KoManyak Yönetim
ADMİN


Takım Takım : 1
Ruh Hali Ruh Hali : 31
Mesaj Sayısı Mesaj Sayısı : 157
Doğum tarihi Doğum tarihi : 21/12/94
Kayıt tarihi Kayıt tarihi : 29/03/09
Yaş Yaş : 29
Nerden Nerden : Edirne
Lakap Lakap : Murphy

Cüzdan
Altın Altın: 21893114
Para Para: 93127124

[Paylaşım]Name Change(Nick Değiştirme) Ekleme Kodu Empty
MesajKonu: [Paylaşım]Name Change(Nick Değiştirme) Ekleme Kodu   [Paylaşım]Name Change(Nick Değiştirme) Ekleme Kodu Icon_minitimePtsi Tem. 06, 2009 7:53 am

Önce İlk Kodumuzu Ekliyoruz...

Kod:
USE [kn_online]
GO
/****** Object:  StoredProcedure [dbo].[ACCOUNT_CHAR_NAME_CHANGE]    Script Date: 06/10/2008 04:12:14 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE procedure [dbo].[ACCOUNT_CHAR_NAME_CHANGE]
(@strOldUserId varchar(30),@StrNewUserId varchar(30))
AS
DECLARE @strCheckOldUserID varchar(30),@strCheckNewUserID varchar(30)
BEGIN TRAN
SELECT @strCheckOldUserID = Count(strUserId) FROM USERDATA WHERE strUserId = @strOldUserId
 IF @strCheckOldUserID = 0
 BEGIN
  PRINT 'Veritabanında ' + @strOldUserId + ' Adında Karakter Bulunamadı.'
 END
 ELSE
 BEGIN
  SELECT @strCheckNewUserID = Count(strUserId) FROM USERDATA WHERE strUserId = @StrNewUserId
    IF @strCheckNewUserID = 0
    BEGIN
    UPDATE ACCOUNT_CHAR set strCharID1 = @StrNewUserId WHERE strCharID1 = @strOldUserId
    UPDATE ACCOUNT_CHAR set strCharID2 = @StrNewUserId WHERE strCharID2 = @strOldUserId
    UPDATE ACCOUNT_CHAR set strCharID3 = @StrNewUserId WHERE strCharID3 = @strOldUserId
    UPDATE USERDATA SET strUserId = @StrNewUserId WHERE strUserId = @strOldUserId
    UPDATE KNIGHTS_USER SET strUserId = @StrNewUserId WHERE strUserId = @strOldUserId
    UPDATE KNIGHTS SET Chief = @StrNewUserId WHERE Chief = @strOldUserId
    UPDATE KNIGHTS SET ViceChief_1 = @StrNewUserId WHERE ViceChief_1 = @strOldUserId
    UPDATE KNIGHTS SET ViceChief_2 = @StrNewUserId WHERE ViceChief_2 = @strOldUserId
    UPDATE KNIGHTS SET ViceChief_3 = @StrNewUserId WHERE ViceChief_3 = @strOldUserId
    UPDATE KING_SYSTEM SET strKingName = @StrNewUserId WHERE strKingName = @strOldUserId
    UPDATE KING_ELECTION_LIST SET strName = @StrNewUserId WHERE strName = @strOldUserId
    PRINT @strOldUserId + ' Olan Karakter Adı ' + @strNewUserId + ' Olarak Değiştirilmiştir.'
    END
    ELSE
    BEGIN
    PRINT @StrNewUserId + ' Karakter Adı Kullanımdadır, Lütfen Başka Bir Karakter Adı Yazınız.'
    END
 END
COMMIT TRAN


Sonra İse Alttaki Kodla Name Change'yi Aktif Ediyoruz...



Kod:
create procedure [NameChange]
(@oldname varchar(30),@newname varchar(30))
AS DECLARE @clannumber smallint, @length int,@row int,@i int,@dwid int,@pos int,@dur int,@dur1 int,@ext int,@StackSize1 int,@strName varchar(30),@strExtName varchar(30),@Cdwid varbinary(4),@cdur varchar(2),@cstack varchar(2)
begin tran
Update account_char set strcharid1 = @newname where strcharid1 = @oldname
Update account_char set strcharid2 = @newname where strcharid2 = @oldname
Update account_char set strcharid3 = @newname where strcharid3 = @oldname
Update userdata set struserid = @newname Where struserid = @oldname
Update knights_user set struserid = @newname Where struserid = @oldname
Update knights set chief = @newname where chief = @oldname
Update knights set vicechief_1 = @newname where vicechief_1 = @oldname
Update knights set vicechief_2 = @newname where vicechief_2 = @oldname
Update knights set vicechief_3 = @newname where vicechief_3 = @oldname
commit tran
GO


Alttaki Kodumuzla Nick Değiştiriyoruz



Kod:
EXEC ACCOUNT_CHAR_NAME_CHANGE 'Eski Nick','Yeni Nick'

İşte Bu kadar Smile
Sayfa başına dön Aşağa gitmek
http://forumdata.web-rpg.org
 
[Paylaşım]Name Change(Nick Değiştirme) Ekleme Kodu
Sayfa başına dön 
1 sayfadaki 1 sayfası
 Similar topics
-
» [ PAYLASIM ] XSkip Login
» {{PayLaşım}}Maradona Combo KukLası KoyaLım..
» [PAYLAŞIM]+10,+9 İtemleri +8'e ve +5,+4 Uniqueleri +3 veya +1 Çekme

Bu forumun müsaadesi var:Bu forumdaki mesajlara cevap veremezsiniz
ForumDATA  :: Pvp Paylaşımlar :: Prosedürler & Kodlar :: Prosedürler-
Buraya geçin: