Sera Que Tem Como Fazer Aparecer
#1
Posted 14/06/2003, 16:49
#2
Posted 14/06/2003, 17:31
ICQ:316206970
MSN: gustavobodra@hotmail.com
E-mail: gustavobodra@hotmail.com
"Muitos dizem skate na veia, mas poucos sabem, realmente, o que é skate nos pés"
#3
Posted 14/06/2003, 18:01
[code=auto:0]strNRegistros = "SELECT COUNT(campo_q_ker_contar) AS variavel_q_salva_o_numero_de_cadastros FROM tabela "
Set rsNRegistros = conexao.Execute(strNRegistros)
e os usuarios online entre no site do chacal q tem um sistema pronto, eh + facil do q eu colocar tdos as paginas aki www.chacalscripts.rg3.net
"Muitos dizem skate na veia, mas poucos sabem, realmente, o que é skate nos pés"
#4
Posted 15/06/2003, 08:01
#5
Posted 15/06/2003, 08:36
<% SQL = "Select COUNT(usuarios) As qtde from tabela " Set RS = conexao.Execute(SQL) %> Números de usuários Cadastrados = <%=RS("qtde")%>
coloque esse código em qualquer parte do seu site...
lembre-se de criar uma conexão com o banco de dados, se for criar, de o nome da conexao de "conexao" mesmo... assim:
<% Set conexao = Server.CreateObject("ADODB.Connection") %>
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
#6
Posted 15/06/2003, 09:01
nao daria para voce colocar o codigo completo e se junta os dois ou o segundo tem que colocar em outra parte o nome da pasta que esta os dados se chama login2 e o nome do banco de dados siteusers .mdb
desculpe nao entender muito mais me ajude
#7
Posted 15/06/2003, 09:46
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
#8
Posted 15/06/2003, 15:38
#9
Posted 15/06/2003, 16:15
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
#10
Posted 15/06/2003, 16:28
#11
Posted 15/06/2003, 17:06
ps.: desculpe a demora, estava merendando hehehe :ok:
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
#12
Posted 15/06/2003, 17:08
#13
Posted 15/06/2003, 17:49
a pagina do cadastro esta ai
<% Option Explicit Dim username username = Request.Cookies("username") %> <html> <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 bgcolor="#FFFFFF" link="#DD0000" vlink="#DD0000" alink="#000000" background="../images/fundo3.gif"> <font face="arial,helvetica" size=2> <%'See if they're actually already logged in if username <> "" then%> <p><b>Você está logado.</b></p> <p>Se você quer preencher um novo cadastro, precisa <a href="signout.asp"><b>sair do sistema </b></a>primeiro.</p> <%'Otherwise display the sign up form else%> <form name="signup" action="signupprocess.asp" method="post" target="x"> <table width="368" cellpadding=2 cellspacing=0 align="center" height="536"> <tr> <td align="center" width="356" colspan="2" height="83"> <table border="0" width="364" cellspacing="0" cellpadding="0"> <tr> <TD class=TD vAlign=center width="362"><font face="Verdana" size="2"><img border="0" src="../images/pontos_subtitulo.jpg"> Site do Zanelati </font></TD> </tr> <tr> <TD bgColor=#debc00 height=1 width="362"> </TD> </tr> <tr> <TD height=10 width="362"></TD> </tr> </font> <tr> <TD class=TD width="362"> <p align="center"><font face="Verdana" size="2">Fique Membro do Site do Zanelati</font></p> </TD> </tr> <font face="arial,helvetica" size=2> <tr> <TD background="../images/linha_pontilhada.gif" height=2 width="362"> </TD> </tr> </table> </font> </td> </tr> <tr> <td align="center" width="194" height="25"><font face="arial,helvetica" size=2><b>Nome</b></font></td> <td align="center" width="162" height="25"><input type="text" name="firstname" size=13 class="campo"></td> </tr> <tr> <td align="center" width="194" height="25"><font face="arial,helvetica" size=2><b>Sobrenome</b></font></td> <td align="center" width="162" height="25"><input type="text" name="surname" size=13 class="campo"></td> </tr> <tr> <td align="center" width="194" height="25"><b>E-mail</b></td> <td align="center" width="162" height="25"><input type="text" name="email" size=13 class="campo"></td> </tr> <tr> <td align="center" width="194" height="25"><font face="arial,helvetica" size=2><b>Data de nascimento</b></font></td> <td align="center" width="162" height="25"> <input type="text" name="birth_day" value="dd" size="2" maxlength="2" class="campo"> <input type="text" name="birth_month" value="mm" size="2" maxlength="2" class="campo"> <input type="text" name="birth_year" value="yyyy" size="4" maxlength="4" class="campo"> </td> </tr> <tr> <td align="center" width="194" height="19"><font face="arial,helvetica" size=2><b>Sexo</b></font></td> <td align="center" width="162" height="19"><font face="arial,helvetica" size=2><b><input type="radio" name="sex" value="male" class="input1" checked> Homem <input type="radio" name="sex" value="female" class="input2"> Mulher</b></font></td> </tr> <tr> <td align="center" colspan=2 width="362" height="21"><hr color="#000000"></td> </tr> <tr> <td align="center" width="194" height="25"><b>Login</b></td> <td align="center" width="162" height="25"><input type="text" name="username" size=13 class="campo"></td> </tr> <tr> <td align="center" width="194" height="25"><font face="arial,helvetica" size=2><b>Senha</b></font></td> <td align="center" width="162" height="25"><input type="password" name="password" size=13 class="campo"></td> </tr> <tr> <td align="center" width="194" height="25"><font face="arial,helvetica" size=2><b>Confirme sua senha</b></font></td> <td align="center" width="162" height="25"><input type="password" name="passwordconfirm" size=13 class="campo"></td> </tr> <tr> <td align="center" colspan=2 width="362" height="16"><font face="arial,helvetica" size=1><b>(note: sua senha deve ter entre 5 e 15 caracteres)</b></font></td> </tr> <tr> <td align="center" colspan=2 width="362" height="21"><hr color="#000000"></td> </tr> <tr> <td align="center" colspan=2 width="362" height="251"> <font face="arial,helvetica" size=2><b>Escolha uma imagem para você:</b></font><br> <br> <table width="100%" cellpadding=2 cellspacing=0 height="1"> <tr> <td align="center" height="66"><img src="icons/1.gif" onClick="document.signup.icon[0].checked=true"><br><input type="radio" name="icon" value="1"></td> <td align="center" height="66"><img src="icons/2.gif" onClick="document.signup.icon[1].checked=true"><br><input type="radio" name="icon" value="2"></td> <td align="center" height="66"><img src="icons/3.gif" onClick="document.signup.icon[2].checked=true"><br><input type="radio" name="icon" value="3"></td> <td align="center" height="66"><img src="icons/4.gif" onClick="document.signup.icon[3].checked=true"><br><input type="radio" name="icon" value="4"></td> <td align="center" height="66"><img src="icons/5.gif" onClick="document.signup.icon[4].checked=true"><br><input type="radio" name="icon" value="5"></td> </tr> <tr> <td align="center" height="1"><img src="icons/16.gif" onClick="document.signup.icon[15].checked=true"><br><input type="radio" name="icon" value="16"></td> <td align="center" height="1"><img src="icons/17.gif" onClick="document.signup.icon[16].checked=true"><br><input type="radio" name="icon" value="17"></td> <td align="center" height="1"><img src="icons/18.gif" onClick="document.signup.icon[17].checked=true"><br><input type="radio" name="icon" value="18"></td> <td align="center" height="1"><img src="icons/19.gif" onClick="document.signup.icon[18].checked=true"><br><input type="radio" name="icon" value="19"></td> <td align="center" height="1"><img src="icons/20.gif" onClick="document.signup.icon[19].checked=true"><br><input type="radio" name="icon" value="20"></td> </tr> <tr> <td align="center" height="1"><img src="icons/21.gif" onClick="document.signup.icon[20].checked=true"><br><input type="radio" name="icon" value="21"></td> <td align="center" height="1"><img src="icons/22.gif" onClick="document.signup.icon[21].checked=true"><br><input type="radio" name="icon" value="22"></td> <td align="center" height="1"><img src="icons/23.gif" onClick="document.signup.icon[22].checked=true"><br><input type="radio" name="icon" value="23"></td> <td align="center" height="1"><img src="icons/24.gif" onClick="document.signup.icon[23].checked=true"><br><input type="radio" name="icon" value="24"></td> <td align="center" height="1"><img src="icons/25.gif" onClick="document.signup.icon[24].checked=true"><br><input type="radio" name="icon" value="25"></td> </tr> </table> </td> </tr> <tr> <td align="center" colspan=2 width="362" height="19"><font face="arial,helvetica" size="2">Envie-me novidade por e-mail <input type="checkbox" name="sendemail" checked></font></td> </tr> <tr> <td align="center" colspan=2 width="362" height="1"><input type="submit" value="Cadastre-se" class="botao"></td> </tr> </table> </form> <%end if%> </body> </html>
#14
Posted 15/06/2003, 17:52
- login: texto 55 caracteres
- senha: texto 55 caracteres
- online: texto 3 caracteres
<html><body> <form action="login.asp" method="post"> Login: <input type="text" name="login"><br> Senha: <input type="password" name="senha"><br> <input type="submit" value="enviar"> </form> </body></html>
página login.asp
<% login = Request.Form("login") senha = Request.Form("senha") SQL = "Select * From usuarios where login = '" & login & "' " Set conexao = Server.CreateObject("ADODB.Connection") conexao.Open "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("banco.mdb") Set RS = conexao.Execute(SQL) if Rs.Eof then Response.Write "Login Inválido!" else if Senha <> RS("senha") then Response.Write "Senha Inválida!" else SQL = "Update usuarios Set online = 'sim' where login = '" & login & "' " Set RS = Conexao.Execute(SQL) Session("login") = login Session("senha") = senha Response.Redirect("usuarios.asp") end if end if RS.Close Conexao.Close Set rs = Nothing Set conexao = Nothing %>
página usuarios.asp
<% Set conexao = Server.CreateObject("ADODB.Connection") conexao.Open "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("banco.mdb") SQL = "Select login From usuarios Where online = 'sim' " SQL3 = "Select Count(login) As qtde From usuarios " Set cadastro = conexao.Execute(SQL3) Set RS = conexao.Execute(SQL) Response.Write "Usuários Online: " Do while not rs.eof if Session(RS("nome"))<>"" then Response.Write " >" Rs("login") else SQL2 = "Update usuarios Set online = 'nao' where login = '" & login & "' " Set RS2 = Conexao.Execute(SQL2) end if Rs.Movenext Loop Response.Write "Usuários Cadastrados: " & cadastro(qtde) RS.Close RS2.Close Cadastro.Close Conexao.Close Set RS = Nothing Set RS2 = Nothing Set Cadastro = Nothing Set conexao = Nothing %>
lembre-se de colocar todos os arquivos em uma mesma pasta...
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
#15
Posted 19/06/2003, 06:54
<html> <head> <meta http-equiv="Content-Type" content="text/html; charset=windows-1252"> <meta name="GENERATOR" content="Microsoft FrontPage 4.0"> <meta name="ProgId" content="FrontPage.Editor.Document"> <title>Seu Ip</title> <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> <form method="POST" action="signin.asp" target="_self" name="signin"> <table border="0" width="37" cellspacing="0" cellpadding="0"> <tr> <TD width="553"><font face="Verdana" size="1" color="#FFFFFF">1</font></TD> <TD width="113"></TD> </tr> <tr> <TD width="553"><font face="Verdana" size="1"><IMG alt="" border=0 src="../images/login_login.jpg"></font></TD> <TD width="113"><font face="Verdana" size="1"><INPUT class=campo maxLength=20 name=username size=10></font></TD> </tr> <tr> <TD width="553"><font face="Verdana" size="1"><img border="0" src="../images/login_senha.jpg"></font></TD> <TD width="113"><font face="Verdana" size="1"><INPUT class=campo maxLength=20 name=password size=10 type=password></font></TD> </tr> <tr> <TD width="553"><font face="Verdana" size="1"> </font></TD> <TD width="113"><font face="Verdana" size="1"><INPUT class=botao2 name=entrar type=submit value=entrar></font></TD> </tr> <tr> <TD width="553"><font face="Verdana" size="1" color="#FFFFFF">1</font></TD> <TD width="113"> </TD> </tr> <tr> <TD width="553"><font face="Verdana" size="1">Seu Ip:</font></TD> <TD width="113"><font face="Verdana" size="1"><!--webbot bot="HTMLMarkup" startspan --><%=request.servervariables("REMOTE_ADDR")%> <!--webbot bot="HTMLMarkup" endspan --> </font> </TD> </tr> </table> <input type="hidden" name="page" value="<%=Request.QueryString("page")%>"> </form> </body> </html>
preciso saber alem de fazer a pagina de usuarios.asp, eu tenho que substituir o login.asp e fazer o login.html estou no icq 163114701
0 user(s) are reading this topic
0 membro(s), 0 visitante(s) e 0 membros anônimo(s)