Jump to content


zanelati2002's Content

There have been 101 items by zanelati2002 (Search limited from 20/04/2023)



Ordernar por                Order  

#126230 Como Fazer Sera Que E Facil Assim

Posted by zanelati2002 on 22/06/2003, 06:53 in ASP

Sera que hoje vou conseguir fazer o que quero em meu site

vou tentar explicar melhor peguei o codigo http://www.vipcodigo...asp?codfonte=11 e um login com cadstro e autenticacao, gostaria de fazer um sistema que mostra os usuarios logados no site igual da amigosWm.com nao sei se ele abre um frame puchando esta pagina mais me ajude quem souber



#126229 Onde Posso Conseguir

Posted by zanelati2002 on 22/06/2003, 06:49 in ASP

eu quero um sistema que de para divulgar o banner do user que se cadastrar dando para ver os cliques do seu banner nao precisa ser igual, mais o que eu quero e parecido com http://banner.portalwebmaster.net/
entre e veja obrigado



#125554 Onde Posso Conseguir

Posted by zanelati2002 on 21/06/2003, 15:26 in ASP

sera que tem como eu conseguir um sitema em asp de ratio banner nao sei se esta e a palavra mais e iguakl a http://banner.portalwebmaster.net/ para divulgacao do site



#125550 Login Cadastro Com Autenticaçao

Posted by zanelati2002 on 21/06/2003, 15:19 in ASP

Sera que hoje vou conseguir fazer o que quero em meu site

vou tentar explicar melhor peguei o codigo http://www.vipcodigo...asp?codfonte=11 e um login com cadstro e autenticacao o que eu queria era mostrar na minha pagina index, os usuarios que estao online quando se logarem, igual a do http://www.amigoswm.com sei que nao e tao simples vai voce e hacker nisto developer me ajuda ainda estou online



#124017 O Que Esta De Errado Neste Chat

Posted by zanelati2002 on 19/06/2003, 16:25 in ASP

vou postar pagina por pagina

chat.asp
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD><TITLE>Bate Papo do Site do Zanelati</TITLE>
<META content="text/html; charset=windows-1252" http-equiv=Content-Type><LINK 
href="chat.css" rel=stylesheet 
type=text/css>
<script language="JavaScript">
function validate(form) {
	if (form.elements[0].value=="") {
  alert('Não vai colocar o apelido?')
  form.elements[0].focus()
  return false
	}
	return true
}
</script>

<META content="Microsoft FrontPage 4.0" name=GENERATOR></HEAD>
<BODY class=frontpage>
<TABLE border=0 cellPadding=0 cellSpacing=0 
style="position: absolute; top: 90; left: 0" width="693" height="284">
  <TBODY>
  <TR>
    <TD 
    style="COLOR: #333333; FONT-SIZE: 10px; FONT-WEIGHT: bold; PADDING-BOTTOM: 8px; PADDING-RIGHT: 8px; TEXT-ALIGN: right">Participe 
      do Bate Papo do Site do Zanelati</TD></TR>
  <TR>
    <TD align=middle 
    style="BACKGROUND-COLOR: #0099cc; BORDER-BOTTOM: #ffffff 1px dashed; BORDER-TOP: #ffffff 1px dashed"><BR>
      <%
IF Request.QueryString("lotada") = "true" then
	Response.Write "<b>Você tentou entrar em uma sala lotada!!!!</b><br><br>"
End If
%>
      <form method="POST" action="frame.asp" onsubmit="return validate(this)">
      <TABLE border=0 cellPadding=2 cellSpacing=0 width=240>
        <TBODY>
        <TR>
          <TD>&nbsp;</TD>
          <TD align=right style="FONT-SIZE: 10px">Apelido:</TD>
          <TD width="100%"><INPUT class=editField maxLength=32 name=nome 
            size=28 tabIndex=1></TD>
          <TD>&nbsp;</TD></TR>
        <TR>
          <TD>&nbsp;</TD>
          <TD align=right colSpan=2><INPUT border=0 class=btn name=login tabIndex=2 title="Usuário no chat" type=submit value=entrar></TD>
          <TD>&nbsp;</TD></TR><INPUT name=mode type=hidden value=userLogin> 
</FORM>
        <TR>
          <TD>&nbsp;</TD>
          <TD align=middle colSpan=2 style="COLOR: #999999"><BR><BR><BR></TD>
          <TD>&nbsp;</TD></TR>
        <TR>
          <TD>&nbsp;</TD>
          <TD colSpan=2>
            <TABLE border=0 cellPadding=4 cellSpacing=0 
            style="BORDER-RIGHT: #003300 3px double" width="100%">
              <TBODY>
              <TR>
                <TD class=uocap colSpan=3>Entre e Participe</TD></TR>
              <TR>
                <TD class=uo colSpan=3>&nbsp;marque encontros com amigos</TD></TR></TBODY></TABLE></TD>
          <TD>&nbsp;</TD></TR></TBODY></TABLE>
      </form>
      <BR></TD></TR>
  <TR>
    <TD 
    style="COLOR: #666666; FONT-SIZE: 10px; FONT-WEIGHT: lighter; PADDING-BOTTOM: 8px; PADDING-LEFT: 8px; PADDING-RIGHT: 8px; PADDING-TOP: 8px; TEXT-ALIGN: justify">
      <P style="TEXT-ALIGN: center">[Site do Zanelati - Todos os direitos 
      reservados]</P></TD></TR></TBODY></TABLE><!-- Copyright(c) 2002, The Theill Web Site --></BODY></HTML>

expire.asp
<html>

<head>
<LINK 
href="chat.css" rel=stylesheet 
type=text/css>

</head>

<body>

<p><a href="chat.asp" target="_top">Sua sessão de chat expirou. Clique aqui
para entrar novamente</a></p>

</body>

</html>


f_msg.asp

<html>
<head>
<LINK 
href="chat.css" rel=stylesheet 
type=text/css>
</head>
<body topmargin="0" leftmargin="0" bgcolor="#3171AD" text="#FFFFFF">
</body>
</html>

f_post.asp

<html>

<head>
<title></title>
<LINK 
href="chat.css" rel=stylesheet 
type=text/css>
<script language=JavaScript>
function foco(){
var Form
Form = document.envia;
Form.msg.focus(); 
}
</SCRIPT>
</head>

<body topmargin="0" leftmargin="0" bgcolor="#3171AD" text="#FFFFFF"
style="border-top-style: solid; border-top-color: #FFFF00">

<%
If Session("logon") = false then
	Response.Redirect("expire.asp")
End IF
%>
<%
Function mau(msg)
msg=lcase(msg)
mau=false
	if instr(1, msg, "xxxxx que pariu") then mau=true
	if instr(1, msg, "xxxxx") then mau=true
	if instr(1, msg, "xxxxx") then mau=true
	if instr(1, msg, "xxxxxx") then mau = true
	if instr(1, msg, "xxxxxx") then mau = true
	if instr(1, msg, "vai tomar no") then mau = true
	if instr(1, msg, "xxxxx") then mau = true
	if instr(1, msg, "xxxxx") then mau = true
	if instr(1, msg, "xxxxxx") then mau = true
end function
Function image(pic, post)
if pic <> "none" then
	post = post & ".........<img src='../s_gif/" & pic & "'><br>"
	image = post
else
	image = post
End If
End Function

'************************************************
dim origem, destino, reserv, msg, id, acao, varid1, varid2, p3, p4, p5, pic
reserv = Request.Form("Reservado")
msg = Request.Form("msg")
id = Request.Form("destinatario")
acao = Request.Form("action")
if id = "1234" then destino = "TODOS" & reserv
pic = Request.Form("imagem")

'Transforma msg para evitar erros no JavaScript
msg = Server.HTMLencode(msg)

If trim(msg) <> "" then     	 'Postou mensagem
	a = Application("id01")
	b = Application("nome01")
	c = Application("msg01")
	l = Application("last01")
	For i = 0 to 29      'Procura usuario
  if a(i) = Session.SessionID then
 	 origem = b(i)
 	 exit for
  End if
	next
	If origem="" then 
  Session("logon") = false
  session("last") = true
  response.redirect("expire.asp")
	End If
	for i = 0 to 29      'Procura vitima
  if a(i) = id then
 	 destino = b(i)
 	 exit for
  end if
	next

	'personaliza as acoes
	Select Case acao
  Case "grita com"
 	 msg = "<b>" & ucase(msg) & "</b>"
	End Select
	
	if reserv <> false then     	 'Prive
  p1 = "<font color = cyan>(" & FormatDateTime(now, 3) & ")</font> "
  p2 = "<font color = yellow><b>" & origem & "</b></font> "
  p3 = "<font color = white>reservadamente " & acao & " </font>"
  p4 = "<font color = yellow><b>" & destino & "</b></font>: "
  p5 = "<font color = white><i>" & msg & "</i></font><br>"
  post = p1 & p2 & p3 & p4 & p5
  post = image(pic, post)
  if mau(msg) then
 	 post = post & "<b>BOT para " & origem & ": BOCA-SUJA!<b><br>"
  end if
  if id = "1234" then
 	 post = "<b>BOT para " & origem & ": pra quê falar reservadamente com todos???</b><br>"
  End If
  for i = 0 to 29
 	 if a(i) = id or a(i) = Session.SessionID then
    c(i) = c(i) & post
 	 end if
  next
	else         	 'todos veem a msg
  p1 = "<font color = cyan>(" & FormatDateTime(now, 3) & ")</font> "
  p2 = "<font color = yellow><b>" & origem & "</b></font> "
  p3 = "<font color = white> " & acao & " </font>"
  p4 = "<font color = yellow><b>" & destino & "</b></font>: "
  p5 = "<font color = white>" & msg & "</font><br>"
  post = p1 & p2 & p3 & p4 & p5
  post = image(pic, post)
  if mau(msg) then
 	 post = post & "<b>BOT para " & origem & ": BOCA-SUJA!<b><br>"
  end if
  for i = 0 to 29
 	 'if c(i) <> "" then
    c(i) = c(i) & post
 	 'end if
  next
  
  'Adiciona as 10 ultimas
  for i = 1 to 8
 	 l(i) = l(i+1)
  next
  l(9) = post
	end if
	Application.lock
	Application("msg01") = c
	Application("last01") = l
	Application.unlock
else
	a = Application("id01")
	b = Application("nome01")
	For i = 0 to 29      'Procura usuario
  if a(i) = Session.SessionID then
 	 origem = b(i)
 	 exit for
  End if
	next
end if
chatn = Session("chatn")
%>
<form action="f_post.asp" method="post" name="envia">
  <table border="0" cellpadding="2" cellspacing="2" width="100%">
    <tbody>
      <tr>
        <td colspan="2"><b><% Response.write origem %></b><input
          name="Reservado" type="checkbox" value="false"><font face="Arial"
          size="2">reservadamente&nbsp; </font><select name="Action" size="1">
            <option selected value="fala para">fala para</option>
            <option value="pergunta para">pergunta para</option>
            <option value="responde para">responde para</option>
            <option value="concorda com">concorda com</option>
            <option value="discorda de">discorda de</option>
            <option value="desculpa-se com">desculpa-se com</option>
            <option value="surpreende-se com">surpreende-se com</option>
            <option value="murmura para">murmura para</option>
            <option value="sorri para">sorri para</option>
            <option value="suspira por">suspira por</option>
            <option value="flerta com">flerta com</option>
            <option value="não tá nem aí com">não tá nem aí com</option>
            <option value="entusiasma-se com">entusiasma-se com</option>
            <option value="ri de">ri de</option>
            <option value="dá um fora em">dá um fora em</option>
            <option value="briga com">briga com</option>
            <option value="grita com">grita com</option>
            <option value="xinga">xinga</option>
          </select> <select name="destinatario" size="1">
            <option selected value="1234">TODOS</option>
           <%
        varid1 = application("nome01")
        varid2 = application("id01")
        for i = 0 to 29
       	 if varid2(i) <> Session.SessionID and varid2(i) <> "" then
          response.write "<option value=" & varid2(i) & ">" & varid1(i) & "</option>" & vbcrlf
       	 End If
        next
            %>
          </select></td>
      </tr>
      <tr>
        <td width="32"><a href="sai.asp" target="_top"><img alt="Sair"
          border="0" src="../s_gif/sair.gif" width="32" height="32"></a></td>
        <td>&nbsp;&nbsp;&nbsp;<select name="imagem" size="1">
            <option selected value="none">Enviar imagem</option>
            <option value="boia.gif">Bóia</option>
            <option value="briga.gif">Briga</option>
            <option value="cerveja.gif">Cerveja</option>
            <option value="coco.gif">Cocô</option>
            <option value="desculpa.gif">Desculpa</option>
            <option value="drink.gif">Drink</option>
            <option value="entusiasmo.gif">Entusiasmo</option>
            <option value="flerta.gif">Tubarão</option>
            <option value="naotanemai.gif">Não tô nem aí</option>
            <option value="nuvem.gif">Nuvem</option>
            <option value="presente.gif">Presente</option>
            <option value="rosa.gif">Rosa</option>
            <option value="sapo.gif">Sapo</option>
            <option value="xixarrao.gif">Xixarrão</option>
            <option value="pergunta.gif">Interrogação</option>
            <option value="ride.gif">Riso</option>
            <option value="sorri.gif">Sorriso</option>
          </select> &nbsp;<input name="msg" size="50"> <input name="Submit"
          type="submit" value="Enviar">&nbsp;&nbsp;&nbsp; Sala: </td>
      </tr>
    </tbody>
  </table>
</form>
     <script language=JavaScript>
  function foco(){
   var Form
   Form = document.envia;
   Form.msg.focus(); 
  }
	</SCRIPT>



f_proc.asp
<html>

<head>
<%
If Session("logon") = false then
	Response.Redirect("expire.asp")
End If
%>
<meta http-equiv="Refresh" content="3; url=f_proc.asp">
<title></title>
</head>

<body bgcolor="#000000" text="#FFFFFF">

<%
dim l, i, a, c, d, texto
Response.Write "<script language=javascript>" & vbcrlf
if Session("last") then   	 'mostra as 10 ultimas
	l = application("last01")
	for i = 0 to 9
  If l(i) <> "" then
 	 texto = l(i)
 	 Response.Write "parent.msgpost(""" & texto & """)" & vbcrlf
  End if
	next
	Session("last") = false
else
	a = Application("id01")
	c = Application("msg01")
	For i = 0 to 29
  if a(i) = Session.SessionID then
 	 texto = c(i)
 	 if len(texto) <> 0 then
    Response.Write "parent.msgpost(""" & texto & """)" & vbcrlf
 	 end if
 	 c(i) = ""
 	 Application.lock
 	 Application("msg01") = c
 	 Application.unlock
 	 exit for
  end if
	next
end if
Response.Write "</script>" & vbcrlf
%>

</body>

</html>


frame.asp
<%
Dim a, b, c, d, t, logon, u, i, nome, p1, p2
nome = Request.Form("nome")
if nome = "" then
	Response.Redirect("../default.asp")
end if
If Application("chatn") = 30 then
	Response.Redirect("../default.asp?lotada=true")
End If
If Session("logon") = false then          'Entrou agora
	'Adiciona usuario
	'Procura uma vaga
	a = Application("id01")
	For i = 0 to 29
  If a(i) = "" then exit for
	next
	Session("vaga") = i
	a = Application("id01")
	b = Application("nome01")
	a(i) = Session.SessionID
	b(i) = nome
	p1 = "<font color=cyan>(" & FormatDateTime(now, 3) & ")</font> "
	p2 = "<font color=white>" & nome & " entrou na sala...</font><br>"
	logon = p1 & p2
	Application.Lock
	Application("id01") = a
	Application("nome01") = b
	Application.unlock
	
	'Adiciona logon as 10 ultimas
	u = Application("last01")
	for i = 0 to 8
  u(i) = u(i+1)
	next
	u(9) = logon
	Application.Lock
	Application("last01") = u
	chatn = Application("chatn") + 1
	Application("chatn") = chatn
	Application.unlock
	Session("logon") = true
	
	'Avisa o restante dos usuarios que alguem entrou...
	c = Application("msg01")
	for i = 0 to 29
  if i <> Session("vaga") Then
     c(i) = c(i) & logon
  End If
	next
	Application.lock
	Application("msg01") = c
	Application.unlock
End If
%>
<html>

<script language="javascript">
var docflag = new String("C")


function msgpost(msg) {
var destino = parent.frames[0].document
var as = unescape("%34")
if (docflag == "C") {
	destino.write("<html><link rel='stylesheet' href='../style.css' type='text/css'>")
	destino.write("<body topmargin=4 leftmargin=4 bgcolor='#3171AD' text='#FFFFFF'><p>")
	docflag="O" }
destino.write(msg)
parent.frames[1].scroll(0,900000000)
}
</script>

<head>
<% Response.Write "<title>" & nome & " no Chat</title>" %>

</head>

<frameset framespacing="0" border="0" frameborder="0" rows="100%,0,80">
  <frame name="fmsg" scrolling="yes" src="f_msg.asp">
  <frame name="fproc" scrolling="no" noresize src="f_proc.asp">
  <frame name="fpost" src="f_post.asp" scrolling="no" noresize>
  <noframes>
  <body>

  <p>Esta página usa quadros mas seu navegador não aceita quadros.</p>

  </body>
  </noframes>
</frameset>

</html>


sai.asp
<%
If Session("logon") = false then
	Response.Redirect("expire.asp")
End IF
%>
<%
Dim sID, a, b, c, l, t, i, nome, p1, p2, post, a2, b2, c2, d2, chatn

sID = Session.SessionID
a = Application("id01")
b = Application("nome01")
c = Application("msg01")
l = Application("last01")
'Remove usuario da sala

i = Session("vaga")
nome = b(i)
Session("logon") = false
Session("last") = true
v = Session("vaga")
set Session("vaga") = nothing

p1 = "<font color=cyan>(" & FormatDateTime(now, 3) & ")</font> "
p2 = "<font color=white>" & nome & " saiu da sala...</font><br>"
post = p1 & p2

for i = 1 to 8
	l(i) = l(i+1)
next
l(9) = post

'Avisa a turma
for i = 0 to 29
  c(i) = c(i) & post
next
a(v) = ""
b(v) = ""
c(v) = ""
Application.lock
Application("id01") = a
Application("nome01") = b
Application("msg01") = c
Application("last01") = l
chatn = Application("chatn") - 1
Application("chatn") = chatn
Application.unlock
response.redirect("chat.asp")


este chat e o go chat so mudei um pouco o chat.asp que seria a inde.asp de uma olhada se algo foi postado errado http://www.vipcodigo...asp?codfonte=61 e o link do codigo



#123962 Login Cadastro Com Autenticaçao

Posted by zanelati2002 on 19/06/2003, 15:32 in ASP

sera que ninguem vai me ajudar a responder



#123719 Login Cadastro Com Autenticaçao

Posted by zanelati2002 on 19/06/2003, 11:14 in ASP

vou tentar explicar melhor peguei o codigo http://www.vipcodigo...asp?codfonte=11 e um login com cadstro e autenticacao o que eu queria era mostrar na minha pagina index, os usuarios que estao online quando se logarem, igual a do http://www.amigoswm.com sei que nao e tao simples vai voce e hacker nisto developer me ajuda ainda estou online



#123593 Login Cadastro Com Autenticaçao

Posted by zanelati2002 on 19/06/2003, 09:23 in ASP

este e um post que postei a semana passada "Sera que tem como aparecer"
Bem vou explicar, peguei um sistema de login e cadstro ja feito que se cha phin_login, algo assim todos creio que conhecem, o que eu queria fazer era que quando o usuario se logasse aparecesse em um frame que tem na pagina index, todos os user logados tipo da amigos wc, so o que acontece este codigo que tenho ele redireciona para outra pagina um apgina para consultar se tem mensagem. confira so
a pagina do login.asp
<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">&nbsp;</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>


ai voces conferem que ela vai para signin.asp que esta ai
<%
Option Explicit
Dim sql,rsUser,username,password,page,stayloggedin,LConnectString,lconn,sqlflag

'Grab the submitted variables (page is the page they've come from, set by the hidden variable at the login box)
username = Request.Form("username")
password = Request.Form("password")
page = Request.Form("page")
stayloggedin = Request.Form("stayloggedin")

if page = "" then
	page = "index.asp"
end if

'Check no s**t is trying to hack in using SQL commands
if InStr(username, "'") or InStr(username, """") or InStr(username, "=") or InStr(password, "'") or InStr(password, """") or InStr(password, "=") then
	sqlflag = True
end if

'Open connection
%>
<!--#include file="conn.asp"-->
<%

'Get a recordset corresponding to the submitted username and password
sql = "SELECT username FROM users WHERE username = '" & username & "' AND password = '" & password & "'"
Set rsUser = Server.CreateObject("ADODB.Recordset")
rsUser.Open sql, conn, 3, 3

'If there was a valid recordset there, then send them back to the page they came from, with the username cookie set
If (not rsUser.BOF) and (not rsUser.EOF) and sqlflag <> True then
  Response.Cookies("username") = rsUser("username")
  'If the user wants to stay logged in all the time, then we'll set the cookie with a far-away expiry date
  if stayloggedin = "yes" then
	Response.Cookies("username").expires = #1/1/2010#
  end if
  rsUser.close
  set rsUser = nothing
  conn.close
  set conn = nothing
  Response.Redirect(page)
end if

'Otherwise, display an invalid entry screen
rsUser.close
set rsUser = nothing
conn.close
set conn = nothing%>

<html>
<head>
<title>Invalid entry</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">

<h3 align="left"><font color="#000000" size="1" face="Verdana">Nome de usu&aacute;rio&nbsp;</font></h3>

<h3 align="left"><font color="#000000" size="1" face="Verdana">ou senha inv&aacute;lidos</font></h3>

<p><a href="javascript:self.history.go(-1)"><font color="#000000" size="1" face="Verdana">Tente novamente</font></a></p>

</body>
</html>


certo que sua vez vai para uma pagina index que vai identificar se o usuario tem mensagens ou nao o que eu queria e fazer isto aparecesse os user logados no sistema o codigo do sistema completo se encontra em http://www.vipcodigo...asp?codfonte=11 o developer
postou um codigo mais nao consegi usar me ajudem



#123539 Script De Afliados

Posted by zanelati2002 on 19/06/2003, 07:00 in ASP

conheço um super legal e rodo em meu site a do chacal banner tente este depois voce poste aqui se nao te ajudar http://www.chacalscripts.rg3.net



#123538 Sera Que Tem Como Fazer Aparecer

Posted by zanelati2002 on 19/06/2003, 06:54 in ASP

por gentileza me explique uma coisa o login.asp ele so vai fazer a conexao para usuarios.asp, pois eu tenho o login.asp que e assim
<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">&nbsp;</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



#120582 Sera Que Tem Como Fazer Aparecer

Posted by zanelati2002 on 15/06/2003, 17:49 in ASP

developer, estou no icq 1631147101 mais caso voce nao responda a tempo voce ja sabe o que eu quero fazer os seguintes dados estao nao daria para o nome da pasta que esta os dados se chama login2 e o nome do banco de dados siteusers .mdb
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&ecirc; est&aacute; logado.</b></p>

<p>Se voc&ecirc; 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&nbsp;&nbsp;</font></TD>
          </tr>
          <tr>
          <TD bgColor=#debc00 height=1 width="362">&nbsp;</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">&nbsp;</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&ecirc;:</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&nbsp; 
        <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>



#120568 User Online Do Chacal

Posted by zanelati2002 on 15/06/2003, 17:33 in ASP

ninguem sabe como fazer isto



#120562 News Letter

Posted by zanelati2002 on 15/06/2003, 17:31 in ASP

voce ja tentou a do http://www.chacalscripts.rg3.net



#120539 Mais Uma Tem Como

Posted by zanelati2002 on 15/06/2003, 17:10 in ASP

valeu meu irmao



#120535 Sera Que Tem Como Fazer Aparecer

Posted by zanelati2002 on 15/06/2003, 17:08 in ASP

nao tenho esta pagina e a outra que voce passou e diferente



#120505 Mais Uma Tem Como

Posted by zanelati2002 on 15/06/2003, 16:50 in ASP

o chacal mail serve ou tem que ser outro e meu provedor sera que aceita

a libihost.net



#120490 Mais Uma Tem Como

Posted by zanelati2002 on 15/06/2003, 16:29 in ASP

sim mais em asp tem como fazer isto



#120487 Sera Que Tem Como Fazer Aparecer

Posted by zanelati2002 on 15/06/2003, 16:28 in ASP

mais este e um novo site e um novo cadstro aquele deu certo o que tenho que te passar e a pagina de cadastro qual e a pagina



#120482 User Online Do Chacal

Posted by zanelati2002 on 15/06/2003, 16:23 in ASP

Mostrar a quantidade de user ja cadastrado



#120472 Mais Uma Tem Como

Posted by zanelati2002 on 15/06/2003, 16:12 in ASP

tem como fazer um sistema de formmail igual http://www.portalwebmaster.net/ entra na seçao serviços e veja la um sistema, para usuarios



#120448 Sera Que Tem Como Fazer Aparecer

Posted by zanelati2002 on 15/06/2003, 15:38 in ASP

nao tenho o que preciso te passar



#120053 Sera Que Tem Como Fazer Aparecer

Posted by zanelati2002 on 15/06/2003, 09:01 in ASP

Me ajude mais est´´a o primeiro de colocar em qualquer parte do site foi facil e o segundo

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



#120043 Sera Que Tem Como Fazer Aparecer

Posted by zanelati2002 on 15/06/2003, 08:01 in ASP

preciso de mais explicaçao, aonde que eu coloco este codigo, na pagian do cadastro, me fale, e nao o usuarios online e quais os usuarios cadastrados que se logan online e nao a quantidade.



#119241 Sera Que Tem Como Fazer Aparecer

Posted by zanelati2002 on 14/06/2003, 16:49 in ASP

Sera que tem como fazer aparecer, nome de usuarios que estao online no site e tambem numeros de cadastros ja feitos



#114971 Vou Tentar De Novo

Posted by zanelati2002 on 08/06/2003, 15:52 in ASP

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




IPB Skin By Virteq