Jump to content

  2. →
  3. →

Photo

Vou Tentar De Novo

Started By zanelati2002, 08/06/2003, 14:41

  • Faça o login para participar
2 replies to this topic

#1 zanelati2002

zanelati2002

    Normal

  • Usuários
  • 101 posts
  • Sexo:Não informado

Posted 08/06/2003, 14:41

Consegui um codigo de autenticacao de usuarios mais esta dando erro nao consegui arrumar o codigo esta neste link quem souber teste para mim conto mais uma vez com quem manja de asp
http://www.sitedozan...t.net/login.zip

me ajudem

preciso que alguem celebro em asp teste o codigo pois o erro nao estou coseguindo arrumar e no d: alguma coisa no caminho do banco de dados em todos as paginas

#2 <% developer %>

<% developer %>

    Só observando...

  • Usuários
  • 1029 posts
  • Sexo:Não informado
  • Localidade:Manaus - AM

Posted 08/06/2003, 15:32

as correções dos códigos estão apresentadas abaixo:

----->>> coloque todos os arquivos em uma mesma pasta... para funcionar <<<-----

arquivo adiciona.asp

<!--  Desenvolvido por: Otavio James Bernardes Junior  !-->
<!--  Script de Logon Liberado para uso não autorizado !--> 
<!--  Suporte técnico otaviojames@ig.com.br 24Hs /dia  !-->
<!--  Telefone para contato (021) 12 544-8810 Cruzeiro !-->


<!-- Inicio do codigo fonte !--> 


<%
Dim login,senha,senha2,nome,dia,mes,ano,cidade,estado,email
login = replace(request.form("login"), "'", "''")
senha = replace(request.form("senha"), "'", "''")
senha2 = replace(request.form("senha2"), "'", "''")
nome = replace(request.form("nome"), "'", "''")
home = replace(request.form("home"), "'", "''")
dia = replace(request.form("dia"), "'", "''")
mes = replace(request.form("mes"), "'", "''")
ano = replace(request.form("ano"), "'", "''")
cidade = replace(request.form("cidade"), "'", "''")
estado = replace(request.form("estado"), "'", "''")
email = replace(request.form("email"), "'", "''")

Set DB = Server.CreateObject("ADODB.Connection")
DB.Open "DRIVER={Driver do Microsoft Access (*.mdb)}; DBQ=" & Server.MapPath("usuarios.mdb")

inserir = "INSERT INTO tabela_de_usuarios (login,senha,senha2,nome,home,dia,mes,ano,cidade,estado,email) " & _
"VALUES ('" & login & "','" & senha & "','" & senha2 & "','" & nome & "','" & home & "','" & dia & "','" & mes & "','" & ano & "','" & cidade & "','" & estado & "','" & email & "','")"
DB.Execute(inserir)
response.redirect "usuarios.asp"
%>

<!-- Fim do codigo fonte !-->

arquivo altera.asp

<!--  Desenvolvido por: Otavio James Bernardes Junior  !-->
<!--  Script de Logon Liberado para uso não autorizado !--> 
<!--  Suporte técnico otaviojames@ig.com.br 24Hs /dia  !-->
<!--  Telefone para contato (021) 12 544-8810 Cruzeiro !-->


<!-- Inicio do codigo fonte !--> 

<%
Dim login,senha,senha2,nome,dia,mes,ano,cidade,estado,email
login = replace(request.form("login"), "'", "''")
senha = replace(request.form("senha"), "'", "''")
senha2 = replace(request.form("senha2"), "'", "''")
nome = replace(request.form("nome"), "'", "''")
home = replace(request.form("home"), "'", "''")
dia = replace(request.form("dia"), "'", "''")
mes = replace(request.form("mes"), "'", "''")
ano = replace(request.form("ano"), "'", "''")
cidade = replace(request.form("cidade"), "'", "''")
estado = replace(request.form("estado"), "'", "''")
email = replace(request.form("email"), "'", "''")

Set DB = Server.CreateObject("ADODB.Connection")
DB.Open "DRIVER={Driver do Microsoft Access (*.mdb)};DBQ=" & Server.MapPath("usuarios.mdb")

alterar = "UPDATE DISTINCTROW tabela_de_usuarios SET nome = '" & login & "', '" & senha & "', '" & senha2 & "', '" & nome & "', '" & home & "', '" & dia & "', '" & mes & "','" & ano & "', '" & cidade & "', '" & estado & "', '" & email & "' WHERE numero = " & (numero) & ""
DB.Execute(alterar)
response.redirect "usuarios.asp"
%>


<!-- Fim do codigo fonte !-->

arquivo deletar.asp

<!--  Desenvolvido por: Otavio James Bernardes Junior  !-->
<!--  Script de Logon Liberado para uso não autorizado !--> 
<!--  Suporte técnico otaviojames@ig.com.br 24Hs /dia  !-->
<!--  Telefone para contato (021) 12 544-8810 Cruzeiro !-->


<!-- Inicio do codigo fonte !--> 

<%
Dim login,senha,senha2,nome,dia,mes,ano,cidade,estado,email
login = replace(request.form("login"), "'", "''")
senha = replace(request.form("senha"), "'", "''")
senha2 = replace(request.form("senha2"), "'", "''")
nome = replace(request.form("nome"), "'", "''")
home = replace(request.form("home"), "'", "''")
dia = replace(request.form("dia"), "'", "''")
mes = replace(request.form("mes"), "'", "''")
ano = replace(request.form("ano"), "'", "''")
cidade = replace(request.form("cidade"), "'", "''")
estado = replace(request.form("estado"), "'", "''")
email = replace(request.form("email"), "'", "''")

Set DB = Server.CreateObject("ADODB.Connection")
cnpath= Server.MapPath("usuarios.mdb")
DB.Open "DRIVER={Driver do Microsoft Access (*.mdb)};DBQ=" & cnpath

deletar = "DELETE DISTINCTROW numero, login, senha, senha2, nome, home, dia, mes, ano, cidade, estado, email FROM tabela_de_usuarios WHERE numero = " & (numero) & ""
DB.Execute(deletar)
response.redirect "usuarios.asp"
%>


<!-- Fim do codigo fonte !-->

arquivo usuarios.asp

<!--  Desenvolvido por: Otavio James Bernardes Junior  !-->
<!--  Script de Logon Liberado para uso não autorizado !--> 
<!--  Suporte técnico otaviojames@ig.com.br 24Hs /dia  !-->
<!--  Telefone para contato (021) 12 544-8810 Cruzeiro !-->


<!-- Inicio do codigo fonte !--> 

<%
Set DB = Server.CreateObject("ADODB.Connection")
cnpath="DBQ=" & server.mappath("\Dados\usuarios.mdb")
DB.Open "DRIVER={Microsoft Access Driver (*.mdb)}; " & cnpath

listar = "SELECT * FROM tabela_de_usuarios ORDER BY numero DESC"
Set lista = DB.Execute(listar)
%>

<html>

<head>
<STYLE>A:link {
	COLOR: #000000; TEXT-DECORATION: none
}
A:visited {
	TEXT-DECORATION: none
}
A:hover {
	TEXT-DECORATION: none
}
.menu:link {
	COLOR: #ffffff; TEXT-DECORATION: none
}
.menu:visited {
	COLOR: #ffffff; TEXT-DECORATION: none
}
.menu:hover {
	TEXT-DECORATION: none
}
.smenu:link {
	COLOR: #ffffff; TEXT-DECORATION: none
}
.smenu:visited {
	COLOR: #ffffff; TEXT-DECORATION: none
}
.smenu:hover {
	COLOR: #808080; FONT-WEIGHT: bold; TEXT-DECORATION: none
}
BODY {
	FONT-FAMILY: Tahoma, Verdana; FONT-SIZE: 8pt
}
BODY {
	SCROLLBAR-FACE-COLOR: #efefef
}
BODY {
	SCROLLBAR-SHADOW-COLOR: #efefef
}
BODY {
	SCROLLBAR-HIGHLIGHT-COLOR: #efefef
}
BODY {
	SCROLLBAR-3DLIGHT-COLOR: #efefef
}
BODY {
	SCROLLBAR-DARKSHADOW-COLOR: #000000
}
BODY {
	SCROLLBAR-TRACK-COLOR: #ffffff
}
BODY {
	SCROLLBAR-ARROW-COLOR: #000000
}
TD {
	FONT-FAMILY: Tahoma, Verdana; FONT-SIZE: 8pt
}
.campo {
	BACKGROUND-COLOR: #f7f7f7; BORDER-BOTTOM-WIDTH: 1px; BORDER-LEFT-WIDTH: 1px; BORDER-RIGHT-WIDTH: 1px; BORDER-TOP-WIDTH: 1px; COLOR: black; FONT-FAMILY: Tahoma, Verdana; FONT-SIZE: 8pt
}
.botao {
	BACKGROUND-COLOR: #e8e8e8; BORDER-BOTTOM-COLOR: #ffffff; BORDER-BOTTOM-WIDTH: 1px; BORDER-LEFT-COLOR: #ffffff; BORDER-LEFT-WIDTH: 1px; BORDER-RIGHT-COLOR: #ffffff; BORDER-RIGHT-WIDTH: 1px; BORDER-TOP-COLOR: #ffffff; BORDER-TOP-WIDTH: 1px; COLOR: black; FONT-FAMILY: Tahoma, Verdana; FONT-SIZE: 8pt
}
.texto {
	COLOR: black; FONT-FAMILY: Verdana, arial; FONT-SIZE: 8pt
}
.input1 {
	BACKGROUND-COLOR: #e8e8e8; BORDER-BOTTOM-WIDTH: 1px; BORDER-LEFT-WIDTH: 1px; BORDER-RIGHT-WIDTH: 1px; BORDER-TOP-WIDTH: 1px; COLOR: black; FONT-FAMILY: Tahoma, Verdana; FONT-SIZE: 8pt
}
.input2 {
	BACKGROUND-COLOR: #ffffff; BORDER-BOTTOM-WIDTH: 1px; BORDER-LEFT-WIDTH: 1px; BORDER-RIGHT-WIDTH: 1px; BORDER-TOP-WIDTH: 1px; COLOR: black; FONT-FAMILY: Tahoma, Verdana; FONT-SIZE: 8pt
}
.textarea1 {
	BACKGROUND-COLOR: #ffffff; BORDER-BOTTOM-WIDTH: 1px; BORDER-LEFT-WIDTH: 1px; BORDER-RIGHT-WIDTH: 1px; BORDER-TOP-WIDTH: 1px; COLOR: black; FONT-FAMILY: Tahoma, Verdana; FONT-SIZE: 8pt
}
.textarea2 {
	BACKGROUND-COLOR: #e8e8e8; BORDER-BOTTOM-WIDTH: 1px; BORDER-LEFT-WIDTH: 1px; BORDER-RIGHT-WIDTH: 1px; BORDER-TOP-WIDTH: 1px; COLOR: black; FONT-FAMILY: Tahoma, Verdana; FONT-SIZE: 8pt
}
</STYLE>
<STYLE type=text/css>.tabela {
	BACKGROUND: #f5f5f5; BORDER-BOTTOM: #808080 1px solid; BORDER-LEFT: #808080 1px solid; BORDER-RIGHT: #808080 1px solid; BORDER-TOP: #808080 1px solid; COLOR: #000000; FONT-FAMILY: Tahoma, Verdana, Geneva, Arial, Helvetica, sans-serif; FONT-SIZE: 11px
}
.link {
	COLOR: #000000; TEXT-DECORATION: none
}
.link:hover {
	COLOR: #ff8040; TEXT-DECORATION: none
}
.TD {
	COLOR: #000000; FONT-FAMILY: Tahoma, Verdana, Geneva, Arial, Helvetica, sans-serif; FONT-SIZE: 11px
}
.campo {
	BACKGROUND: #ffffff; BORDER-BOTTOM: #debc00 1px solid; BORDER-LEFT: #debc00 1px solid; BORDER-RIGHT: #debc00 1px solid; BORDER-TOP: #debc00 1px solid; COLOR: #000000; FONT-FAMILY: Tahoma, Verdana, Geneva, Arial, Helvetica, sans-serif; FONT-SIZE: 11px
}
.botao {
	BACKGROUND: #f3f3f3; BORDER-BOTTOM: #808080 1px solid; BORDER-LEFT: #bbbbbd 1px solid; BORDER-RIGHT: #808080 1px solid; BORDER-TOP: #bbbbbd 1px solid; COLOR: #000000; FONT-FAMILY: Tahoma, Verdana, Geneva, Arial, Helvetica, sans-serif; FONT-SIZE: 11px
}
.botao2 {
	BACKGROUND-COLOR: #e8e8e8; BORDER-BOTTOM-COLOR: #ffffff; BORDER-BOTTOM-WIDTH: 1px; BORDER-LEFT-COLOR: #ffffff; BORDER-LEFT-WIDTH: 1px; BORDER-RIGHT-COLOR: #ffffff; BORDER-RIGHT-WIDTH: 1px; BORDER-TOP-COLOR: #ffffff; BORDER-TOP-WIDTH: 1px; COLOR: black; FONT-FAMILY: Tahoma, Verdana; FONT-SIZE: 8pt
}
.Menu:link {
	BACKGROUND-COLOR: #ffffff; COLOR: #000000; FONT-FAMILY: Tahoma, Verdana; FONT-SIZE: 11px; HEIGHT: 20px; PADDING-TOP: 2px; TEXT-DECORATION: none; WIDTH: 160px
}
.Menu:visited {
	BACKGROUND-COLOR: #ffffff; COLOR: #000000; FONT-FAMILY: Tahoma, Verdana; FONT-SIZE: 11px; HEIGHT: 20px; PADDING-TOP: 2px; TEXT-DECORATION: none; WIDTH: 160px
}
.Menu:unknown {
	BACKGROUND-COLOR: #ffffff; COLOR: #000000; FONT-FAMILY: Tahoma, Verdana; FONT-SIZE: 11px; HEIGHT: 20px; PADDING-TOP: 2px; TEXT-DECORATION: none; WIDTH: 160px
}
.Menu:hover {
	BACKGROUND-COLOR: #f5f5f5; COLOR: #000000; FONT-FAMILY: Tahoma, Verdana; FONT-SIZE: 11px; HEIGHT: 20px; PADDING-TOP: 2px; TEXT-DECORATION: none; WIDTH: 160px
}
</STYLE>
<title>Administra&ccedil;&atilde;o de usu&aacute;rios</title>

</head>

<body background="../images/fundo3.gif" bgcolor="#FFFFFF">

<font face="Verdana" size="1">

<b>Rela&ccedil;&atilde;o dos Usu&aacute;rios:</b><%if lista.EOF then%> 

</font> 

<p>

<font face="Verdana" size="1">

Não há usuários cadastrados <%else%> <%do while NOT lista.EOF%> 

</font> 

<form action="altera.asp" method="post">

<div align="center">
  <center>

<table border="0" cellpadding="0" cellspacing="0">

<tr> 

<td><font face="Verdana" size="1">&nbsp;</font></td>

<td> 

<div align="right"><font face="Verdana" size="1">login: </font></div>

</td>

<td> <font face="Verdana" size="1"> 
 
<input type="text" name="login" value="<%= lista("login")%>" size="20" class="campo">

</font></td>

</tr>

<tr> 

<td><font face="Verdana" size="1">&nbsp;</font> </td>

<td> 

<div align="right"><font face="Verdana" size="1">senha: </font></div>

</td>

<td> <font face="Verdana" size="1"> 

<input type="text" name="senha" value="<%= lista("senha")%>" size="20" class="campo">

</font></td>

</tr>

<tr>

<td>

<font face="Verdana" size="1">&nbsp;</font></td>
      
<td> 

<div align="right"><font face="Verdana" size="1">Confirma Senha: 

</font></div>

</td>

<td> <font face="Verdana" size="1"> 

<input type="text" name="senha2" value="<%= lista("senha2")%>" size="20" class="campo">

&nbsp;

</font></td>

</tr>
<tr>

<td>

<font face="Verdana" size="1">&nbsp;</font></td>
      
<td> 

<div align="right"><font face="Verdana" size="1">Seu Nome: 

</font></div>

</td>

<td> <font face="Verdana" size="1"> 

<input type="text" name="nome" value="<%= lista("nome")%>" size="20" class="campo">

&nbsp;

</font></td>

</tr>
<tr>

<td>

<font face="Verdana" size="1">&nbsp;</font></td>
      
<td> 

<div align="right"><font face="Verdana" size="1">Sua Home: 

</font></div>

</td>

<td> <font face="Verdana" size="1"> 

<input type="text" name="dia" value="<%= lista("home")%>" size="20" class="campo">

&nbsp;

</font></td>

</tr>
<tr>

<td>

<font face="Verdana" size="1">&nbsp;</font></td>
      
<td> 

<div align="right"><font face="Verdana" size="1">Seu Nascimento(Dia): 

</font></div>

</td>

<td> <font face="Verdana" size="1"> 

<input type="text" name="dia" value="<%= lista("dia")%>" size="20" class="campo">

&nbsp;

</font></td>

</tr>
<tr>

<td>

<font face="Verdana" size="1">&nbsp;</font></td>
      
<td> 

<div align="right"><font face="Verdana" size="1">Seu Nascimento(Mes):</font></div>

</td>

<td> <font face="Verdana" size="1"> 

<input type="text" name="mes" value="<%= lista("mes")%>" size="20" class="campo">

 &nbsp;

</font></td>

</tr>
<tr>

<td>

<font face="Verdana" size="1">&nbsp;</font></td>
      
<td> 

<div align="right"><font face="Verdana" size="1">Seu Nascimento(Ano):</font></div>

</td>

<td> <font face="Verdana" size="1"> 

<input type="text" name="ano" value="<%= lista("ano")%>" size="20" class="campo">

 &nbsp;

</font></td>

</tr>
<tr>

<td>

<font face="Verdana" size="1">&nbsp;</font></td>
      
<td> 

<div align="right"><font face="Verdana" size="1">Cidade: 

</font></div>

</td>

<td> <font face="Verdana" size="1"> 

<input type="text" name="cidade" value="<%= lista("cidade")%>" size="20" class="campo">

 &nbsp;

</font></td>

</tr>

<tr>

<td>

<font face="Verdana" size="1">&nbsp;</font></td>
      
<td> 

<div align="right"><font face="Verdana" size="1">Estado: 

</font></div>

</td>

<td> <font face="Verdana" size="1"> 

<input type="text" name="estado" value="<%= lista("estado")%>" size="20" class="campo">

&nbsp;

</font></td>

</tr>

<tr> 

<td>

<font face="Verdana" size="1">&nbsp;</font></td>
      
<td> 

<div align="right"><font face="Verdana" size="1">E-mail: 

</font></div>

</td>

<td> <font face="Verdana" size="1"> 

<input type="text" name="email" value="<%= lista("email")%>" size="20" class="campo">

<input type="hidden" name="numero" value="<%= lista("numero")%>">

</font></td>

</tr>

</table>

  </center>
</div>

<font face="Verdana" size="1">

<input type="submit" value="Alterar" class="botao">

<input type="reset" value="Desfazer" name="reset" class="botao">

</font>

</form><form method="post" action="deletar.asp">

<font face="Verdana" size="1">

<input type="hidden" name="numero" value="<%= lista("numero")%>">
        
<input type="submit" value="         Deletar         " class="botao">

</font>

</form>

<p><font face="Verdana" size="1"><%lista.MoveNext%> <%loop%> <%end if%></font>

</body>

</html>

<!-- Fim do codigo fonte !-->

arquivo verificarsenha.asp

<!--  Desenvolvido por: Otavio James Bernardes Junior  !-->
<!--  Script de Logon Liberado para uso não autorizado !--> 
<!--  Suporte técnico otaviojames@ig.com.br 24Hs /dia  !-->
<!--  Telefone para contato (021) 12 544-8810 Cruzeiro !-->


<!-- Inicio do codigo fonte !--> 

<%
Response.Buffer = True
Set DB = Server.CreateObject("ADODB.Connection")
cnpath="DBQ=" & Server.MapPath("usuarios.mdb")
DB.Open "DRIVER={Driver do Microsoft Access (*.mdb)}; " & cnpath 

Executar = "SELECT * FROM tabela_de_usuarios"
Set RecSet = DB.Execute(Executar)

do while not recset.eof
vnome = RecSet("nome")
vsenha = RecSet("senha")
vpaginainicial = RecSet("paginainicial")

If Request.form("nome") = (vnome) then
If Request.form("senha") = (vsenha) then
response.cookies("autenticacao")("anome") = request.form("nome")
response.cookies("autenticacao")("asenha") = request.form("senha")
response.clear
response.redirect(vpaginainicial)
end if
end if
recset.movenext
loop

Public Function DoLog(arquivo,nome,senha)

   Dim ObjFSO, ObjFile, ObjStream, Dia, Mes, Ano, Hora, IpNum
	
	Const forReading = 1, forWriting = 2, forAppending = 8
	Const TriDef = -2, TriTrue = -1, TriFalse = 0
	
	Set ObjFSO = CreateObject("Scripting.FileSystemObject")
  
    If ObjFSO.FileExists(arquivo) = False then
    
    objFSO.CreateTextFile(arquivo)
	
	End If

    Set ObjFile = objFSO.GetFile(arquivo)
    Set objStream = ObjFile.OpenAsTextStream(forAppending,TriDef)

    Dia = Day(Date())
    Mes = Month(Date())
    Ano = Year(Date())
    Hora = Time()
    IpNum = Request.ServerVariables("REMOTE_ADDR")
	
    ObjStream.WriteLine Dia & "-" & Mes & "-" & Ano & " | " & Hora & " | " & IpNum & " --> " & " Nome: " & nome & " / Senha: " & senha
    ObjStream.close
        
    End Function

path = Server.MapPath("log.txt")
nome = Request.form("nome")
senha = Request.form("senha")
DoLog (path),(nome),(senha)
%>

<head>

<META HTTP-EQUIV="Refresh" CONTENT="1;URL=login.asp">

</head>

<b>

<p align="left"><font face="Verdana" size="1" color="#00FF00">

LOGIN OU SENHA&nbsp;

</font>

</p>

<p align="left"><font face="Verdana" size="1" color="#00FF00">

 INVÁLIDOS&nbsp;

</font>

</b>

</p>

<b>&nbsp;
<p>&nbsp;</p>
<p>&nbsp;</p>
<p>&nbsp;</p>
<p>&nbsp;</p>

</b>

<!-- Fim do codigo fonte !-->

arquivo cadastro.asp

<!-- Inicio do codigo fonte !--> 

<%
Set DB = Server.CreateObject("ADODB.Connection")
cnpath="DBQ=" & server.mappath("usuarios.mdb")
DB.Open "DRIVER={Microsoft Access Driver (*.mdb)}; " & cnpath

listar = "SELECT * FROM tabela_de_usuarios ORDER BY numero DESC"
Set lista = DB.Execute(listar)
%>

<script language=JavaScript1.2>
function valida(){
var nome =  document.cadform.nome.value;
var home =  document.cadform.home.value;
var login = document.cadform.login.value;
var senha = document.cadform.senha.value;
var senha2 = document.cadform.senha2.value;
var cidade = document.cadform.cidade.value;
var email = document.cadform.email.value;

if ( login == '' ){
	alert('Campo login em branco.');
	document.cadform.login.focus();
	return false;	}
if ( senha == '' ){
	alert('Campo senha em branco.'); 
	document.cadform.senha.focus();
	return false;	}
if ( senha2 == '' ){
	alert('Campo confirmação de senha em branco.'); 
	document.cadform.senha2.focus();
	return false;	}
if ( nome == '' ){
	alert('Campo nome em branco.'); 
	document.cadform.nome.focus();
	return false;	}
if ( home == '' ){
	alert('Campo home em branco.'); 
	document.cadform.home.focus();
	return false;	}
if ( cidade == '' ){
	alert('Campo cidade em branco.'); 
	document.cadform.cidade.focus();
	return false;	}
if ( email == '' ){
	alert('Campo email em branco.'); 
	document.cadform.email.focus();
	return false;	}

cadform.cadastra.disabled=true;
return true;
}
</SCRIPT>

<head>
<title>Novo membro</title>
<STYLE>A:link {
	COLOR: #000000; TEXT-DECORATION: none
}
A:visited {
	TEXT-DECORATION: none
}
A:hover {
	TEXT-DECORATION: none
}
.menu:link {
	COLOR: #ffffff; TEXT-DECORATION: none
}
.menu:visited {
	COLOR: #ffffff; TEXT-DECORATION: none
}
.menu:hover {
	TEXT-DECORATION: none
}
.smenu:link {
	COLOR: #ffffff; TEXT-DECORATION: none
}
.smenu:visited {
	COLOR: #ffffff; TEXT-DECORATION: none
}
.smenu:hover {
	COLOR: #808080; FONT-WEIGHT: bold; TEXT-DECORATION: none
}
BODY {
	FONT-FAMILY: Tahoma, Verdana; FONT-SIZE: 8pt
}
BODY {
	SCROLLBAR-FACE-COLOR: #efefef
}
BODY {
	SCROLLBAR-SHADOW-COLOR: #efefef
}
BODY {
	SCROLLBAR-HIGHLIGHT-COLOR: #efefef
}
BODY {
	SCROLLBAR-3DLIGHT-COLOR: #efefef
}
BODY {
	SCROLLBAR-DARKSHADOW-COLOR: #000000
}
BODY {
	SCROLLBAR-TRACK-COLOR: #ffffff
}
BODY {
	SCROLLBAR-ARROW-COLOR: #000000
}
TD {
	FONT-FAMILY: Tahoma, Verdana; FONT-SIZE: 8pt
}
.campo {
	BACKGROUND-COLOR: #f7f7f7; BORDER-BOTTOM-WIDTH: 1px; BORDER-LEFT-WIDTH: 1px; BORDER-RIGHT-WIDTH: 1px; BORDER-TOP-WIDTH: 1px; COLOR: black; FONT-FAMILY: Tahoma, Verdana; FONT-SIZE: 8pt
}
.botao {
	BACKGROUND-COLOR: #e8e8e8; BORDER-BOTTOM-COLOR: #ffffff; BORDER-BOTTOM-WIDTH: 1px; BORDER-LEFT-COLOR: #ffffff; BORDER-LEFT-WIDTH: 1px; BORDER-RIGHT-COLOR: #ffffff; BORDER-RIGHT-WIDTH: 1px; BORDER-TOP-COLOR: #ffffff; BORDER-TOP-WIDTH: 1px; COLOR: black; FONT-FAMILY: Tahoma, Verdana; FONT-SIZE: 8pt
}
.texto {
	COLOR: black; FONT-FAMILY: Verdana, arial; FONT-SIZE: 8pt
}
.input1 {
	BACKGROUND-COLOR: #e8e8e8; BORDER-BOTTOM-WIDTH: 1px; BORDER-LEFT-WIDTH: 1px; BORDER-RIGHT-WIDTH: 1px; BORDER-TOP-WIDTH: 1px; COLOR: black; FONT-FAMILY: Tahoma, Verdana; FONT-SIZE: 8pt
}
.input2 {
	BACKGROUND-COLOR: #ffffff; BORDER-BOTTOM-WIDTH: 1px; BORDER-LEFT-WIDTH: 1px; BORDER-RIGHT-WIDTH: 1px; BORDER-TOP-WIDTH: 1px; COLOR: black; FONT-FAMILY: Tahoma, Verdana; FONT-SIZE: 8pt
}
.textarea1 {
	BACKGROUND-COLOR: #ffffff; BORDER-BOTTOM-WIDTH: 1px; BORDER-LEFT-WIDTH: 1px; BORDER-RIGHT-WIDTH: 1px; BORDER-TOP-WIDTH: 1px; COLOR: black; FONT-FAMILY: Tahoma, Verdana; FONT-SIZE: 8pt
}
.textarea2 {
	BACKGROUND-COLOR: #e8e8e8; BORDER-BOTTOM-WIDTH: 1px; BORDER-LEFT-WIDTH: 1px; BORDER-RIGHT-WIDTH: 1px; BORDER-TOP-WIDTH: 1px; COLOR: black; FONT-FAMILY: Tahoma, Verdana; FONT-SIZE: 8pt
}
</STYLE>
<STYLE type=text/css>.tabela {
	BACKGROUND: #f5f5f5; BORDER-BOTTOM: #808080 1px solid; BORDER-LEFT: #808080 1px solid; BORDER-RIGHT: #808080 1px solid; BORDER-TOP: #808080 1px solid; COLOR: #000000; FONT-FAMILY: Tahoma, Verdana, Geneva, Arial, Helvetica, sans-serif; FONT-SIZE: 11px
}
.link {
	COLOR: #000000; TEXT-DECORATION: none
}
.link:hover {
	COLOR: #ff8040; TEXT-DECORATION: none
}
.TD {
	COLOR: #000000; FONT-FAMILY: Tahoma, Verdana, Geneva, Arial, Helvetica, sans-serif; FONT-SIZE: 11px
}
.campo {
	BACKGROUND: #ffffff; BORDER-BOTTOM: #debc00 1px solid; BORDER-LEFT: #debc00 1px solid; BORDER-RIGHT: #debc00 1px solid; BORDER-TOP: #debc00 1px solid; COLOR: #000000; FONT-FAMILY: Tahoma, Verdana, Geneva, Arial, Helvetica, sans-serif; FONT-SIZE: 11px
}
.botao {
	BACKGROUND: #f3f3f3; BORDER-BOTTOM: #808080 1px solid; BORDER-LEFT: #bbbbbd 1px solid; BORDER-RIGHT: #808080 1px solid; BORDER-TOP: #bbbbbd 1px solid; COLOR: #000000; FONT-FAMILY: Tahoma, Verdana, Geneva, Arial, Helvetica, sans-serif; FONT-SIZE: 11px
}
.botao2 {
	BACKGROUND-COLOR: #e8e8e8; BORDER-BOTTOM-COLOR: #ffffff; BORDER-BOTTOM-WIDTH: 1px; BORDER-LEFT-COLOR: #ffffff; BORDER-LEFT-WIDTH: 1px; BORDER-RIGHT-COLOR: #ffffff; BORDER-RIGHT-WIDTH: 1px; BORDER-TOP-COLOR: #ffffff; BORDER-TOP-WIDTH: 1px; COLOR: black; FONT-FAMILY: Tahoma, Verdana; FONT-SIZE: 8pt
}
.Menu:link {
	BACKGROUND-COLOR: #ffffff; COLOR: #000000; FONT-FAMILY: Tahoma, Verdana; FONT-SIZE: 11px; HEIGHT: 20px; PADDING-TOP: 2px; TEXT-DECORATION: none; WIDTH: 160px
}
.Menu:visited {
	BACKGROUND-COLOR: #ffffff; COLOR: #000000; FONT-FAMILY: Tahoma, Verdana; FONT-SIZE: 11px; HEIGHT: 20px; PADDING-TOP: 2px; TEXT-DECORATION: none; WIDTH: 160px
}
.Menu:unknown {
	BACKGROUND-COLOR: #ffffff; COLOR: #000000; FONT-FAMILY: Tahoma, Verdana; FONT-SIZE: 11px; HEIGHT: 20px; PADDING-TOP: 2px; TEXT-DECORATION: none; WIDTH: 160px
}
.Menu:hover {
	BACKGROUND-COLOR: #f5f5f5; COLOR: #000000; FONT-FAMILY: Tahoma, Verdana; FONT-SIZE: 11px; HEIGHT: 20px; PADDING-TOP: 2px; TEXT-DECORATION: none; WIDTH: 160px
}
</STYLE>
</head>
<body background="../images/fundo3.gif">

<div align="center">
  <center>

<TABLE cellPadding=0 cellSpacing=0 height="100%" width=409>
  <TBODY>
  <TR>
    <TD class=TD vAlign=top width=84>
      <div align="center">
      <TABLE width="348">
        <TBODY>
        <TR>
          <TD colSpan=2 height=10 width="340"></TD></TR>
        <TR>
          <TD class=TD colSpan=2 vAlign=center width="340"><font face="Verdana" size="1"><IMG alt="" border=0 
            src="../images/pontos_subtitulo.jpg" width="36" height="10">   Site do
            Zanelati - Cadastrar novo Membro -&nbsp;</font></TD></TR>
        <TR>
          <TD bgColor=#debc00 colSpan=2 height=1 width="340"></TD></TR>
        <TR>
          <TD align=middle class=TD colSpan=2 height=20 width="340"></TD></TR>
        <FORM action=adiciona.asp id=cadform method=post name=cadform 
        onsubmit="return valida();">
        <TR>
          <TD align=middle class=TD colSpan=2 width="340"><font face="Verdana" size="1"><b>Dados de Acesso</b></font></TD></TR>
        <TR>
          <TD bgColor=#f3f3f3 colSpan=2 height=1 width="340" background="../images/menu_pontilhado.gif"></TD></TR>
        <TR>
          <TD colSpan=2 height=10 width="340"></TD></TR>
        <TR>
          <TD align=right class=TD width="113"><font face="Verdana" size="1">login:</font></TD>
          <TD width="221"><font face="Verdana" size="1"><INPUT class=campo maxLength=30 name=login 
          size=20></font></TD></TR>
        <TR>
          <TD align=right class=TD width="113"><font face="Verdana" size="1">senha:</font></TD>
          <TD width="221"><font face="Verdana" size="1"><INPUT class=campo maxLength=20 name=senha 
            type=password></font></TD></TR>
        <TR>
          <TD align=right class=TD width="113"><font face="Verdana" size="1">confirme a senha:</font></TD>
          <TD width="221"><font face="Verdana" size="1"><INPUT class=campo maxLength=20 name=senha2 
            type=password></font></TD></TR>
        <TR>
          <TD colSpan=2 height=20 width="340"></TD></TR>
        <TR>
          <TD align=middle class=TD colSpan=2 width="340"><font face="Verdana" size="1"><b>Dados Pessoais</b></font></TD></TR>
        <TR>
          <TD bgColor=#f3f3f3 colSpan=2 height=1 width="340" background="../images/menu_pontilhado.gif"></TD></TR>
        <TR>
          <TD colSpan=2 height=10 width="340"></TD></TR>
        <TR>
          <TD align=right class=TD width="113"><font face="Verdana" size="1">Seu
            nome:</font></TD>
          <TD width="221"><font face="Verdana" size="1"><INPUT class=campo maxLength=30 name=nome 
        size=20></font></TD></TR>
        <TR>
          <TD align=right class=TD width="113"><font face="Verdana" size="1">&nbsp;Sua
            Home Page:</font></TD>
          <TD width="221"><font face="Verdana" size="1"><INPUT class=campo maxLength=30 name=home 
        size=20></font> </TD></TR>
        <TR>
          <TD align=right class=TD width="113"><font face="Verdana" size="1">Seu
            nascimento:</font></TD>
          <TD width="221"><font face="Verdana" size="1"><SELECT class=campo name=dia size=1> <OPTION 
              selected value=01>01</OPTION> <OPTION value=02>02</OPTION> <OPTION 
              value=03>03</OPTION> <OPTION value=04>04</OPTION> <OPTION 
              value=05>05</OPTION> <OPTION value=06>06</OPTION> <OPTION 
              value=07>07</OPTION> <OPTION value=08>08</OPTION> <OPTION 
              value=09>09</OPTION> <OPTION value=10>10</OPTION> <OPTION 
              value=11>11</OPTION> <OPTION value=12>12</OPTION> <OPTION 
              value=13>13</OPTION> <OPTION value=14>14</OPTION> <OPTION 
              value=15>15</OPTION> <OPTION value=16>16</OPTION> <OPTION 
              value=17>17</OPTION> <OPTION value=18>18</OPTION> <OPTION 
              value=19>19</OPTION> <OPTION value=20>20</OPTION> <OPTION 
              value=21>21</OPTION> <OPTION value=22>22</OPTION> <OPTION 
              value=23>23</OPTION> <OPTION value=24>24</OPTION> <OPTION 
              value=25>25</OPTION> <OPTION value=26>26</OPTION> <OPTION 
              value=27>27</OPTION> <OPTION value=28>28</OPTION> <OPTION 
              value=29>29</OPTION> <OPTION value=30>30</OPTION> <OPTION 
              value=31>31</OPTION></SELECT> <SELECT class=campo name=mes size=1> 
              <OPTION selected value=01>01</OPTION> <OPTION value=02>02</OPTION> 
              <OPTION value=03>03</OPTION> <OPTION value=04>04</OPTION> <OPTION 
              value=05>05</OPTION> <OPTION value=06>06</OPTION> <OPTION 
              value=07>07</OPTION> <OPTION value=08>08</OPTION> <OPTION 
              value=09>09</OPTION> <OPTION value=10>10</OPTION> <OPTION 
              value=11>11</OPTION> <OPTION value=12>12</OPTION></SELECT> <SELECT 
            class=campo name=ano size=1> <OPTION selected value=50>50</OPTION> 
              <OPTION value=51>51</OPTION> <OPTION value=52>52</OPTION> <OPTION 
              value=53>53</OPTION> <OPTION value=54>54</OPTION> <OPTION 
              value=55>55</OPTION> <OPTION value=56>56</OPTION> <OPTION 
              value=57>57</OPTION> <OPTION value=58>58</OPTION> <OPTION 
              value=59>59</OPTION> <OPTION value=60>60</OPTION> <OPTION 
              value=61>61</OPTION> <OPTION value=62>62</OPTION> <OPTION 
              value=63>63</OPTION> <OPTION value=64>64</OPTION> <OPTION 
              value=65>65</OPTION> <OPTION value=66>66</OPTION> <OPTION 
              value=67>67</OPTION> <OPTION value=68>68</OPTION> <OPTION 
              value=69>69</OPTION> <OPTION value=70>70</OPTION> <OPTION 
              value=71>71</OPTION> <OPTION value=72>72</OPTION> <OPTION 
              value=73>73</OPTION> <OPTION value=74>74</OPTION> <OPTION 
              value=75>75</OPTION> <OPTION value=76>76</OPTION> <OPTION 
              value=77>77</OPTION> <OPTION value=78>78</OPTION> <OPTION 
              value=79>79</OPTION> <OPTION value=80>80</OPTION> <OPTION 
              value=81>81</OPTION> <OPTION value=82>82</OPTION> <OPTION 
              value=83>83</OPTION> <OPTION value=84>84</OPTION> <OPTION 
              value=85>85</OPTION> <OPTION value=86>86</OPTION> <OPTION 
              value=87>87</OPTION> <OPTION value=88>88</OPTION> <OPTION 
              value=89>89</OPTION> <OPTION value=90>90</OPTION> <OPTION 
              value=91>91</OPTION> <OPTION value=92>92</OPTION> <OPTION 
              value=93>93</OPTION> <OPTION value=94>94</OPTION> <OPTION 
              value=95>95</OPTION> <OPTION value=96>96</OPTION> <OPTION 
              value=97>97</OPTION> <OPTION value=98>98</OPTION> <OPTION 
              value=99>99</OPTION> <OPTION value=00>00</OPTION> <OPTION 
              value=01>01</OPTION> <OPTION value=02>02</OPTION></SELECT> </font> </TD></TR>
        <TR>
          <TD align=right class=TD width="113"><font face="Verdana" size="1">Sua
            cidade:</font></TD>
          <TD width="221"><font face="Verdana" size="1"><INPUT class=campo maxLength=50 name=cidade 
          size=20></font></TD></TR>
        <TR>
          <TD align=right class=TD width="113"><font face="Verdana" size="1">Seu
            estado:</font></TD>
          <TD width="221"><font face="Verdana" size="1"><SELECT class=campo name=estado size=1> <OPTION 
              selected value=AC>Acre<OPTION value=AL>Alagoas<OPTION 
              value=AP>Amapá<OPTION value=AM>Amazonas<OPTION 
              value=BA>Bahia<OPTION value=CE>Ceará<OPTION value=DF>Distrito
              Federal<OPTION value=ES>Espírito Santo<OPTION 
              value=GO>Goiás<OPTION value=MA>Maranhão<OPTION 
              value=MT>Mato-Grosso<OPTION value=MS>Mato-Grosso do Sul<OPTION 
              value=MG>Minas Gerais<OPTION value=PA>Pará<OPTION 
              value=PB>Paraíba<OPTION value=PR>Paraná<OPTION 
              value=PE>Pernanbuco<OPTION value=PI>Piauí<OPTION value=RJ>Rio de
              Janeiro<OPTION value=RN>Rio Grande do Norte<OPTION value=RS>Rio
              Grande do Sul<OPTION value=RO>Rondônia<OPTION 
              value=RR>Roraima<OPTION value=SC>Santa Catarina<OPTION 
              value=SP>São Paulo<OPTION value=SE>Sergipe<OPTION 
              value=TO>Tocantins</OPTION></SELECT> </font> </TD></TR>
        <TR>
          <TD align=right class=TD width="113"><font face="Verdana" size="1">Seu
            e-mail:</font></TD>
          <TD width="221"><font face="Verdana" size="1"><INPUT class=campo maxLength=30 name=email 
          size=20></font></TD></TR>
        <TR>
          <TD width="113"></TD>
          <TD width="221"><font face="Verdana" size="1"><INPUT class=botao2 name=cadastra type=submit value=Cadastrar></font></TD></TR></FORM></TBODY></TABLE>
      </div>
    </TD>
  </TR></TBODY></TABLE>
  </center>
</div>
<TABLE>
  <TBODY></TBODY></TABLE>

Você é de Manaus?

Quer fazer cursos de webdesign, com professor,
1 computador por aluno? E de graça?

Confira em Fundação Paulo Feitoza

Links Legais:

Jogar Dominó Online

Jogar Xadrez Online

Códigos ASP para download

#3 zanelati2002

zanelati2002

    Normal

  • Usuários
  • 101 posts
  • Sexo:Não informado

Posted 08/06/2003, 15:52

vou testar o codigo mais so mais uma coisa sera que da para mostrar em um quadro os numeros de cadstros j´´a feitos
Voltar para ASP


1 user(s) are reading this topic

0 membro(s), 1 visitante(s) e 0 membros anônimo(s)

  1. Fórum WMO
  2. → Desenvolvimento
  3. → ASP
  4. Privacy Policy
  5. Regras ·
IPB Skin By Virteq