IIxQUANTEMxII
Yeni Üye
Mesaj Sayısı : 87
Kayıt tarihi : 06/07/09
Yaş : 29
Nerden : Yerden¿
![[Paylaşım] Kral Yapma Prosedürü Empty](https://2img.net/i/empty.gif) |  Konu: [Paylaşım] Kral Yapma Prosedürü Ptsi Tem. 06, 2009 5:36 pm | |
| - Alıntı :
- Arkadaşlar Herkesin Bekledigi Proceduru sizler için bir gece boyunca uğraşıp yazdım.
Kral yapma derdine son. Tek bir komutla istedigin useri kral yap %100 çalışıyor
üstelik birden fazla kral yapabilirsiniz.
Query Analizeri Açın ve Aşagıda Size veridim kodu yapıştırıp çalıştırın.
- Kod:
-
CREATE PROCEDURE [dbo].[KRAL_EKLE]
@CharID varchar(21)
AS
/*
Ömer Tarafından Yazılmıştır. Hacılamak Yasaktır!
*/
BEGIN
DECLARE @Nation tinyint,@clanID smallint,@ClanName varchar(31),@AccID varchar(21)
select @Nation = Nation from USERDATA where strUserId = @CharID
select @ClanID = sIDnum from KNIGHTS_USER where StrUserID = @CharID
select @ClanName = IDName from KNIGHTS where IDNum = @ClanID
select @AccID = strAccountID from ACCOUNT_CHAR where @CharID = strCharID1 or @CharID = strCharID2 or @CharID = strCharID3
END
BEGIN
update KING_SYSTEM set strKingName = @CharID where byNation = @Nation
insert into [KING_ELECTION_LIST] Values(1, @Nation, @ClanID, @CharID, 0)
insert into [KING_CANDIDACY_NOTICE_BOARD] Values(@CharID, @Nation, 20, 0)
insert into [KING_BALLOT_BOX] Values(@AccID, @CharID, @Nation, @ClanName)
update USERDATA set Rank = '1' where strUserId = @CharID
print 'Tebrikler, Kullanıcı Basarıyla Kral Olmustur. '
END
GO
Kullanımı:
- Kod:
-
EXEC KRAL_EKLE CharınADI
İşte Bu kadar Basit. :-:
Kullanıcı kral olmustur. İsterseniz serverinizda 4 tane Kral yapabilirsiniz.
Herkesin Öğrenmeye Hakkı var.Yorumlarınızı Bekliyorum. | |
|
