Ir para conteúdo
Fórum Script Brasil
  • 0

Vixee Preciso De Uma Ajuda


[ FeLiP_e ]

Pergunta

Ola pessoal ..

Vixe gente .. ó ve bem . eu peguei um script de autenticação de usuário aki na SB .. bom ate ai beleza ..

so que esse script num tinha pagina de cadastro ..

bom beleza ... eu fiz uma .. puts gente ttaa tudo certo [[[ eu acho ]]]

ai eu resolvi coloca esse pra testa ... e tal

gostaria que voces dessem uma olhada no meu site e me falasse aonde eu errei ..

na hora de mandar cadastrar da um erro interno 5,... num sei das quanta ..

e na hora de autentica tb ..

por favor .. me ajudem .. sou iniciante em ASP .. e to com um poco de dificuldads ..

meu site é http://www.system-irc.kit.net

espero respostas ...

Obrigado

Link para o comentário
Compartilhar em outros sites

4 respostass a esta questão

Posts Recomendados

  • 0

nossa manow . eu nem sei como te falar viu .. entendo poco ..

mas tipo é assim .. quando mando cadastra da uma mens. de que a pagina não pode ser exibida .. saKa ?

o script que eu uso pra cadastra é esse

<%

Option Explicit

Dim sql, rsUser, login, senha, email, nome, uin, rede, canais, url

'Assign form values to variables

login = Request.Form("login")

'Make sure they've not put any quotation marks in their usuario

If InStr(usuario,chr(34)) <> 0 or InStr(usuario,chr(39)) <> 0 then

errorfunction("invalidchars")

end if

login = Request.Form("login")

senha = Request.Form("senha")

nome = Request.Form("nome")

email = Request.Form("email")

uin = Request.Form("uin")

rede = Request.Form("rede")

canais = Request.Form("canais")

url = Request.Form("url")

%>

<!--#include file="senha.mdb"-->

<%

'For a bit of profiling fun, get their star sign

'Then add it to the database. It's in a seperate function because we need to error trap to see if there's been a duplicate entry. It's not good form to have On Error Resume Next throughout your whole page

UserUpdate()

Function UserUpdate()

On Error Resume Next

Set rsUser = Server.CreateObject("ADODB.Recordset")

rsUser.open "login", senha.db, 3, 3

rsUser.AddNew

rsUser("login") = login

rsUser("senha") = senha

rsUser("url") = url

rsUser("uin") = uin

rsUser("canais") = canais

rsUser("rede") = rede

rsUser("nome") = nome

rsUser("email") = email

rsUser.Update

if Err.Number = -2147217887 then

Err.clear

errorfunction("badusername")

else

'Set username cookie to sign them in now

Response.Cookies("login") = login

%>

<html>

<head>

<title><%=login%> Cadastrado</title>

</head>

<font size=1 face=arial><%=login%> você foi cadastrado com sucesso!!!

</font>

</html>

<%

rsUser.close

set rsUser = nothing

conn.close

set conn = nothing

%>

<%

end if

End Function

%>

ve se tem alguma coisa errada !!!

o bd chama senha mm ..

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,5k
×
×
  • Criar Novo...