Mu-Terra
Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sesso para continuar.

2 passa como criar serve de mu privado

Ir para baixo

2 passa como  criar serve de mu privado Empty 2 passa como criar serve de mu privado

Mensagem por Admin-tatu Seg Abr 14, 2008 1:25 am

Criando um sistema de login em ASP para SQL Server:

Em primeiro lugar vamos criar um arquivo chamado config.asp que guardara as configurações de senha etc.. antes de tudo iremos criar uma coluna na tabela memb_info chamada de user_level nela podemos utilizar valores 0 ate ..., cada numero seria um nivel de cada usuario depois irei ensinar a utilizar nivel de acesso diferente.

com o seguinte conteudo:
<%

usuariodobd = "sa" 'aki voce coloca o usuario do sql
senhadobd = "123456" 'aki a senha
nomedobd = "muonline" ' aki o nome do banco de dados no caso muonline
ipdobd = "(local)" ' aki o ip deiche (local) caso esteja rodando no pc onde o sql esta instalado!
%>


agora iremos a criação da pagina onde ele efetuara o login.
coloke o nome dela como teste.asp
coloke o codigo:

<form action="login.asp" method="post">
<input type="text" name="login" size="20">
<input type="password" name="senha" size="20">
<input type="submit" value="Enviar">


agora iremos ao codigo da pagina que efetuara o login. chamada de login.asp

<!--#include file="config.asp" -->
<%

dim connstr
dim conn
connstr = "Provider=SQLOLEDB;Data Source="&ipdobd&";DATABASE="&nomedobd&";UID="&usuariodobd&";pwd="&senhadobd
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open connstr
errormsg="Nao foi possivel conectar no sql server"
if err.number<>0 then
response.write "Nao foi possivel conectar no banco de dados"
response.end
end if

'Vamos capturar o login e a senha digitada no formulário
login2 = Request.Form("login")
senha2 = Request.Form("senha")

'Agora verificamos se o usuário e a senha estão corretos
SQL = "select * from MEMB_INFO where memb___id = '"&login2&"' and memb__pwd = '"&senha2&"' "
Set RS = Conn.Execute(SQL)

'Caso não esteja correto, indicamos o erro
If RS.EOF Then
Response.Redirect "erro.asp"
Response.End
End If

'Se chegou até aqui, é porque o login e senha estão corretos.
'Vamos então verificar o nível de acesso do usuário.
session("nivel") = RS("user_level") 'Colocamos numa session pois iremos utiliza-las em outras páginas
response.redirect "protegido.asp"
%>


vamos agora a configuração da pagina onde somente os logados poderão ver.
coloke o nome de protegido.asp
CODE
<%
if session("nivel") <> "1" then%>
<script>
alert("você não esta autorizado a exibir essa pagina.")
</script>
<%
response.redirect "teste.asp"
end if%>
aki você coloca seu codigo html normalmente!

agora irei explicar em que podemos utilizar cada nivel de acesso por exemplo.
podemos utilizar nivel 1 para usuarios normais nivel 2 para usuarios especiais e nivel 3 para administrador. você coloca esses numeros na coluna user_level
para proteger a pagina de nivel 2 e 3 utilizamos o seguinte codigo:
para nivel 2:
CODE
if session("nivel") <> "2" then%>
<script>
alert("somente usuarios especiais podem ver essa pagina.")
</script>
<%
response.redirect "teste.asp"
end if %>
aki o codigo normal da pagina de nivel 2

para nivel 3 eh so trocar em session("nivel") <> "2" <-- o numero 2 se coloca 3

Limitando os pontos para distribuir

Bom... o codigo está a baixo...
Fassa um JOB

1º Abra SQL Server Enterprise Manager -> Console Root -> Microsoft MSSQL Servers -> (local) -> Management -> Sql Server Agent -> Jobs

2º Clique com o botão direito e aperte New Job

// Em name coloque um nome para o JOB
// Nao mecha em + nada.

3º Clique na aba Steps, logo em seguida clique em New.

// Em name coloque um nome para o Step
// Em database Selecione MUOnline
// Em Command coloque o seguinte codigo:

32767 pnts


UPDATE Character
SET Character.LevelUpPoint = Character.Strength - 32767,Character.Strength = ('32767')
WHERE Character.Strength > 32767

UPDATE Character
SET Character.LevelUpPoint = Character.Vitality - 32767, Character.Vitality = ('32767')
WHERE Character.Vitality > 32767

UPDATE Character
SET Character.LevelUpPoint = Character.Dexterity - 32767, Character.Dexterity = ('32767')
WHERE Character.Dexterity > 32767

UPDATE Character
SET Character.LevelUpPoint = Character.Energy - 32767, Character.Energy = ('32767')
WHERE Character.Energy > 32767


32k


UPDATE Character
SET Character.LevelUpPoint = Character.Strength - 32000,Character.Strength = ('32000')
WHERE Character.Strength > 32000

UPDATE Character
SET Character.LevelUpPoint = Character.Vitality - 32000, Character.Vitality = ('32000')
WHERE Character.Vitality > 32000

UPDATE Character
SET Character.LevelUpPoint = Character.Dexterity - 32000, Character.Dexterity = ('32000')
WHERE Character.Dexterity > 32000

UPDATE Character
SET Character.LevelUpPoint = Character.Energy - 32000, Character.Energy = ('32000')
WHERE Character.Energy > 32000


4º De ok e clique na aba Schedules e em New Schedule, coloque um nome para o Schedule, Selecione Recurring e clique em change

// Em occours selecione dailly
// Em Dailly coloque 1 no campo Day
// Em Dayle frequency Selecione Occours every ** ** **
// Em Occours every Digite 1 e Minute(s)

5º De Ok em todas as janelas e ative o SQL Agent clicando com o botao direito em cima e start

Se você quiser mudar a quantia de limite mude os 32000 dos codicos pela quantia desejada

Mana Shild

Abra /muserver/data/lang/(sualang)/skill(lang).txt
procure esta linha

16 "¼Ò¿ï¹Ù¸®¾î" 0 0 70 22 6 17 1 0 0 0
ou
16 "Soul Barrier" 0 0 70 22 6 17 1 0 0 0

deixe-a assim

16 "Soul Barrier" 0 0 70 22 6 17 0 0 0 0

apos isto, retire o drop e se tiver na loja, retirea...

simples...


vou explicar agora...


os 4 ultimos numeros, definem se é elf, dw, dk, ou mg que pode usa-la... se deixar todos os 4 ultimos numeros com 0, significa que nenhum podera usar...

se deixar todos com 1 todos poderam usar, mas você terá que modificar o item.bmd do client tambem...

Mudando LVL para entrar em stadium

Vá em D:\Muserver\data
e abra o arquivo gate.txt

Procure pelas linhas semelhantes a essas;

50 0 6 62 121 62 118 0 0 255 // à ±¸ °æ±âÀå ÀÔ±¸
51 0 6 59 153 59 153 0 0 255 // Red team Á¤·Ä Àå¼Ò
52 0 6 59 164 59 165 0 0 255 // blue team Á¤·É Àå¼Ò


Bom os números em vermelho indicao o mapa no nosso caso (6 = stadium);
Os nº verdes indicam as coordenasas em que o char se transportas para o mapa destino "6";
Os em Azul indical o level em que o char podera usar o comando "/move stadium" no nosso caso "255", este é o valor que você deverá alterar

Queste automatica

Crie uma Job como um nome qq.

em step adicione o seguinte codico?

update character
set class = ('1') , clevel = ('151') , leveluppoints = ('20')
where clevel = ('150')
and class = ('2')
Update character
set class = ('17') , clevel = ('151') , leveluppoints = ('20')
where clevel = ('150')
and class = ('16')
update character
set class = ('32') , clevel = ('151') , leveluppoints = ('20')
where clevel = ('150')
and class = ('33')
set class = ('32') , clevel = ('151') , leveluppoints = ('20')
where clevel = ('150')
and class = ('64')


Criando um sistema de login em ASP para SQL Server

Em primeiro lugar vamos criar um arquivo chamado config.asp que guardara as configurações de senha etc.. antes de tudo iremos criar uma coluna na tabela memb_info chamada de user_level nela podemos utilizar valores 0 ate ..., cada numero seria um nivel de cada usuario depois irei ensinar a utilizar nivel de acesso diferente.

com o seguinte conteudo:
<%

usuariodobd = "sa" 'aki voce coloca o usuario do sql
senhadobd = "123456" 'aki a senha
nomedobd = "muonline" ' aki o nome do banco de dados no caso muonline
ipdobd = "(local)" ' aki o ip deiche (local) caso esteja rodando no pc onde o sql esta instalado!
%>


agora iremos a criação da pagina onde ele efetuara o login.
coloke o nome dela como teste.asp
coloke o codigo:

<form action="login.asp" method="post">
<input type="text" name="login" size="20">
<input type="password" name="senha" size="20">
<input type="submit" value="Enviar">


agora iremos ao codigo da pagina que efetuara o login. chamada de login.asp

<!--#include file="config.asp" -->
<%

dim connstr
dim conn
connstr = "Provider=SQLOLEDB;Data Source="&ipdobd&";DATABASE="&nomedobd&";UID="&usuariodobd&";pwd="&senhadobd
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open connstr
errormsg="Nao foi possivel conectar no sql server"
if err.number<>0 then
response.write "Nao foi possivel conectar no banco de dados"
response.end
end if

'Vamos capturar o login e a senha digitada no formulário
login2 = Request.Form("login")
senha2 = Request.Form("senha")

'Agora verificamos se o usuário e a senha estão corretos
SQL = "select * from MEMB_INFO where memb___id = '"&login2&"' and memb__pwd = '"&senha2&"' "
Set RS = Conn.Execute(SQL)

'Caso não esteja correto, indicamos o erro
If RS.EOF Then
Response.Redirect "erro.asp"
Response.End
End If

'Se chegou até aqui, é porque o login e senha estão corretos.
'Vamos então verificar o nível de acesso do usuário.
session("nivel") = RS("user_level") 'Colocamos numa session pois iremos utiliza-las em outras páginas
response.redirect "protegido.asp"
%>


vamos agora a configuração da pagina onde somente os logados poderão ver.
coloke o nome de protegido.asp
CODE
<%
if session("nivel") <> "1" then%>
<script>
alert("você não esta autorizado a exibir essa pagina.")
</script>
<%
response.redirect "teste.asp"
end if%>
aki você coloca seu codigo html normalmente!

agora irei explicar em que podemos utilizar cada nivel de acesso por exemplo.
podemos utilizar nivel 1 para usuarios normais nivel 2 para usuarios especiais e nivel 3 para administrador. você coloca esses numeros na coluna user_level
para proteger a pagina de nivel 2 e 3 utilizamos o seguinte codigo:
para nivel 2:
CODE
if session("nivel") <> "2" then%>
<script>
alert("somente usuarios especiais podem ver essa pagina.")
</script>
<%
response.redirect "teste.asp"
end if %>
aki o codigo normal da pagina de nivel 2

para nivel 3 eh so trocar em session("nivel") <> "2" <-- o numero 2 se coloca 3

Server ON e OFF



Bom.. aqui vai um codigo php para colocar em sua pagina de seu server. bem util para falar se o server esta on ou off (
( e funciona )


<?
$gamehost="127.0.0.1"; // coloque o ip aqui
$gameport="44405"; // coloque a porta aqui
if(!@fsockopen($gamehost, $gameport, $errno, $errstr, (float)0.5)){
$status = "<font color=red>OFF-Line</font>"; // se server off
} else {
$status = "<font color=green>ON-Line</font>"; // se server on
}
?>

exemplo

ON-Line

ou

OFF-Line

seu php tem que aceitar sokets



GOSTO ??????

ME DA 1 REAL ENTAUM (IMG:style_emoticons/default/^^.gif)

OW ENTAUM ME CHAMA PRA SER GM XD

DE PREFERENCIA 1 REAL BLZ ??
Admin-tatu
Admin-tatu
Admin

Mensagens : 22
Data de inscrio : 11/04/2008
Idade : 30

Ficha do personagem
Admins: 100000
Os melhores:

https://mu-terra.directorioforuns.com

Ir para o topo Ir para baixo

Ir para o topo

- Tpicos semelhantes

 
Permisses neste sub-frum
No podes responder a tpicos