How To Make GM Account On MSSQL

I Will Tell U How To Make A GM Account ( RYL 2 ) , For RYL 1 ( Winner1)


1stly Go to Database > Youxiuser > Tables > Usertbl

and then find ur id with ur special UID

And THen

go to Database > Part2_Zodiac > Tables > Adminlist

( IF RYL 1 ) Database > Winner1 > Tables > Adminlist

Bring Alone Ur UID And Level Or GM 1 , 3 , 2 , 5 ,

After That Close

Go to DB Agent > Open Console And then type reloadadmin

After Its Says " Adminlist Reload Successfuly " You Cn Relogin And Have Fun

Admin Level

1 - Supporter

2 - Operator Level 1

3 - Operator Level 2

5 - Administrator / Developer

ape da ni..ok good job hahaha

hehehehe .,. jgn pelik2

isnt this a tutorial ?

thanx for that guide...woodclaw..what is ur new YM??

huhu..
complicated here..
can i wanna new link for mssql 2000 sp4..
*no dead link needed...
huhu..
hope all can help my prob..

hmm .. maybe u can go microsoft.com go search there ^^

Quote:

---

Originally Posted by woodclaw

I Will Tell U How To Make A GM Account ( RYL 2 ) , For RYL 1 ( Winner1)


1stly Go to Database > Youxiuser > Tables > Usertbl

and then find ur id with ur special UID

And THen

go to Database > Part2_Zodiac > Tables > Adminlist

( IF RYL 1 ) Database > Winner1 > Tables > Adminlist

Bring Alone Ur UID And Level Or GM 1 , 3 , 2 , 5 ,

After That Close

Go to DB Agent > Open Console And then type reloadadmin

After Its Says " Adminlist Reload Successfuly " You Cn Relogin And Have Fun

Admin Level

1 - Supporter

2 - Operator Level 1

3 - Operator Level 2

5 - Administrator / Developer

---

Why not just use the Server Controller tool? ... http://img40.imageshack.us/img40/5369/gmaccount.png

how it be?O.O .. i dunno that server controller got that tools O.O

and waste another 100 hours to figure out how to make the tool working.

Useless. Period.

Quote:

---

Originally Posted by yoshi1337

Why not just use the Server Controller tool? ... http://img40.imageshack.us/img40/5369/gmaccount.png

---

what is that?? u make it by urself?? can share?? T_T

smekom......ade sesiape leh tlong saye buat ryl kite sendiri x????
sape taw leh ajar...plis sesangat....add kat ym... adis.adie@yahoo.com

Quote:

---

Originally Posted by julianzzz

what is that?? u make it by urself?? can share?? T_T

---

Pretty sure you told me to fuck off in another thread, but I guess I could share it. Question is would you know what to do with it?

Code:

---

Imports System.Data.SqlClient


Public Class frmRegister
    Dim myCaptcha As New Captcha


    Private Sub frmRegister_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    End Sub

    Private Sub frmRegister_Shown(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Shown

        myCaptcha.CaptchaHeight = bmpCaptcha.Height
        myCaptcha.CaptchaWidth = bmpCaptcha.Width
        myCaptcha.CaptchaFont = New Font("Verdana", 20, FontStyle.Regular)
        myCaptcha.GenerateNewCaptcha()
        bmpCaptcha.Image = myCaptcha.CaptchaImage
        'txtSecurityCode.Text = myCaptcha.CaptchaCode
        cbGMLevel.Text = cbGMLevel.Items(0).ToString

    End Sub

    Private Sub btnOK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnOK.Click
        'Me.Close()

        If txtAccount.Text = "" Or txtConfirmPassword.Text = "" Or txtEMail.Text = "" Or txtPassword.Text = "" Or txtSecurityCode.Text = "" Then
            MsgBox("Required Field Missing", MsgBoxStyle.Critical, "Create Account - Validation Error")
            Exit Sub
        End If

        If txtSecurityCode.Text <> myCaptcha.CaptchaCode Then
            MsgBox("Captcha Code Invalid", MsgBoxStyle.Critical, "Create Account - Validation Error")
            Exit Sub
        End If

        If txtPassword.Text <> txtConfirmPassword.Text Then
            MsgBox("Passwords do not match.", MsgBoxStyle.Critical, "Create Account - Validation Error")
            Exit Sub
        End If

        Dim connstring As String
        connstring = "Data Source=127.0.0.1;Initial Catalog=youxiuser;User ID=sa;Password=PASSWORDHERE"

        Dim SQLConn As New SqlConnection(connstring)
        Call SQLConn.Open()

        Dim strQuery As String
        strQuery = "EXECUTE [youxiuser].[dbo].[spJoinUser] '" & txtAccount.Text & "', '" & txtPassword.Text & "','" & txtEMail.Text & "'"

        Dim SQLCmd As New SqlCommand(strQuery, SQLConn)

        Call SQLCmd.ExecuteNonQuery()

        Dim SQLdr As SqlDataReader
        Dim UID As String = ""

        If cbGMLevel.Text <> "Level 0" Then
            strQuery = "SELECT uid FROM [youxiuser].[dbo].[usertbl] WHERE account = '" & txtAccount.Text & "' and email = '" & txtEMail.Text & "'"
            SQLCmd = New SqlCommand(strQuery, SQLConn)
            SQLdr = SQLCmd.ExecuteReader
            SQLdr.Read()

            UID = SQLdr(0)
            SQLdr.Close()

            Dim GMLevel As String = "0"

            Select Case cbGMLevel.Text
                Case "Level 0"
                    GMLevel = "0"
                Case "Level 1"
                    GMLevel = "1"
                Case "Level 2"
                    GMLevel = "2"
                Case "Level 3"
                    GMLevel = "3"
                Case "Level 4"
                    GMLevel = "4"
                Case "Level 5"
                    GMLevel = "5"
            End Select

            strQuery = "EXECUTE [gameDB].[dbo].[InsertAdmin] '" & UID & "', '" & GMLevel & "'"
            SQLCmd = New SqlCommand(strQuery, SQLConn)

            Call SQLCmd.ExecuteNonQuery()
        End If




        SQLConn.Close()

        If cbGMLevel.Text <> "Level 0" Then
            Call MsgBox(cbGMLevel.Text & " Admin Account Created: " & txtAccount.Text, MsgBoxStyle.Information, "Account Created")
        Else
            Call MsgBox("Account Created: " & txtAccount.Text, MsgBoxStyle.Information, "Account Created")
        End If

        Me.Close()
    End Sub

---

And like Alpha said, it's useless for anyone who knows SQL. Its just for admins/easy account creating.

yea .. nice share ... btw .. its use for what/?

woodclaw,how to give command for create item,drop item and summon monster??i have that command,/createitem ID LVL GRADE...what LVL and GRADE stand for??can u give me an example??plss..