Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

lezão

usuario após logado aparece o nome dele

Recommended Posts

Ola bom dia....

 

Ai gostaria de saber como faço pra fazer usuarios apos logado aparecer mensagem de boa vindas .....

nem sei por onde começar

alguém pode me dar uma luz...............

Compartilhar este post


Link para o post
Compartilhar em outros sites

Quando ele logar armazene seus dados em uma session

 

E nas paginas onde deseja exibir escreva o valor da mesma

Compartilhar este post


Link para o post
Compartilhar em outros sites

Bom dia exatamente como o Mário Monteiro citou, é só você armazenar o nome do usuário, qd ele fizer o login ....

 

qd você faz o select do banco q verifica o login e senha estão corretos, caso esteja corretos você grava o nome dele em uma session .... exemplo

 

sql="SELECT * FROM tabela WHERE login='"&login&"' AND senha = '"&senha&"'  "
Set rs = cnn.execute(sql)

'caso sejam verdadeiros você armazena
session(ususario) = rs("campo")

'nas outras páginas é só mostrar
response.write session("usuario")

Compartilhar este post


Link para o post
Compartilhar em outros sites

da uma olhada neste painel de administracao, como aparece o nome do user logado...

 

<%response.buffer=true%>
<%
'------------------------------------------------------------------------------------------------
' Este ASP exibe td´z as opçoes para o admin fazer o controle de seu 
' usuarios podendo ter total controle no BD
'------------------------------------------------------------------------------------------------
%>

<HTML>
<HEAD>
<TITLE>Administração</TITLE>

<script src="Scripts/AC_RunActiveContent.js" type="text/javascript"></script>
</HEAD>



<BODY ...

 <% 'declaro as var.
	 dim conexao, varmsg, rs, SQL, conDBQ, constring, varmsgeof, varloginsession, data
   
   'recupero as var.
   varmsgeof=request.querystring("msgeof")
   varmsg=request.querystring("msg")
   varloginsession=Session("login")
   %> 
   
   <script LANGUAGE="JavaScript">
function novajan3(){
window.open ("proibidox.asp","Proibido","width=180,height=200,scrollbar=no,status=yes,resize=no")
}
</SCRIPT> <script LANGUAGE="JavaScript">
function novajan2(){
window.open ("proibido.asp","Erro","width=180,height=200,scrollbar=no,status=yes,resize=no")
}
</SCRIPT> <script LANGUAGE="JavaScript">
function novajan(){
window.open ("sucesso_treina.asp","Login","width=180,height=200,scrollbar=no,status=yes,resize=no")
}
</SCRIPT> <% Select case varmsgeof  
	  case 11  'sem ser o admin - xanburzum gera o erro
	  response.write("<script>novajan2();</script>")
	  case 12  ' proibido excluir-me, o admin
   		response.write("<script>novajan3();</script>")
   end select

 Select case varmsg
	case 1  'mensagem de sucesso do incluir
	response.write("<script>novajan();</script>")
	case 2  ' mensagem de sucesso do atualizar
	response.write("<script>novajan();</script>")
	case 3  'mensagem de sucesso do excluir
	response.write("<script>novajan();</script>")
  end select
  
  
  'crio a conexao%>
 <!--#include file="conn/conexao1.asp"--> 
<% call abreconexao
			
  'crio o rs
  set rs=Server.CreateObject("ADODB.Recordset")
  'crio o SQL
  SQL="SELECT * FROM login ORDER BY login"
  rs.open SQL,conexao,1,3
   %>
	[b]:: Seja Bem-Vindo <%=Ucase(varloginsession)%>[/b]

Compartilhar este post


Link para o post
Compartilhar em outros sites

Ola bom dia jow xavier

 

segui suas orientações mas naun deu certo veja se estou correto?

 

<% 
'Efetuando a conexão com a base de dados criada -----------------------
Set conexao = Server.CreateObject("AdoDb.Connection")
conexao.provider="Microsoft.Jet.OLEDB.4.0"
conexao.connectionstring=Server.Mappath("../../dados/cadastro.mdb")
conexao.open


sql="SELECT * FROM admin WHERE nome='"&nome&"' AND senha = '"&senha&"'  "
Set rs = cnn.execute(sql)

'caso sejam verdadeiros você armazena
session(nome) = rs("nome")

%>
<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>Nova pagina 1</title>
</head>

<body topmargin="0" leftmargin="0" onLoad="show_clock()">

<table cellspacing="0" cellpadding="0" width="778" height="186">
  <col width="64" style="width:48pt">
  <tr height="17" style="height:12.75pt">
	<td height="140" width="751">
	  <table width="775" height="166" cellspacing="0" cellpadding="0">
		<col width="64" span="4" style="width:48pt">
		<tr height="17" style="height:12.75pt">
		  <td height="84" width="234" bgcolor="#0B4A80" rowspan="4">
			<div style="height:50; filter:glow(strength=6, color=#FFFFFF,enabled=1)">
<p align="center">
<img src="../imagens/minnie.gif" width="112" height="146"></div>
</td>
		  <td width="376" height="21" bgcolor="#0B4A80"></td>
		  <td width="58" height="21" bgcolor="#0B4A80"></td>
		  <td width="81" height="21" bgcolor="#0B4A80"></td>
		</tr>
		<tr height="17" style="height:12.75pt">
		  <td width="376" height="42" bgcolor="#0B4A80" rowspan="2">
			<p align="center">	  <FIELDSET 
	  style="PADDING-RIGHT: 10px; PADDING-LEFT: 10px; PADDING-BOTTOM: 10px; WIDTH: 375px; PADDING-TOP: 10px">
			  <table width="337">
				<col width="64" style="width:48pt">
				<col width="85" style="mso-width-source:userset;mso-width-alt:3108;width:64pt">
				<col width="78" style="mso-width-source:userset;mso-width-alt:2852;width:59pt">
				<col width="84" style="mso-width-source:userset;mso-width-alt:3072;width:63pt">
				<tr height="17" style="height:12.75pt">
				  <td colspan="4" height="17" class="xl24" width="329" style="height: 12.75pt">
					<h4 align="center"><font color="#FFFFFF" face="Arial Rounded MT Bold">Sistema de
					Administração da loja</font></h4>
				  </td>
				</tr>
				<tr height="17" style="height:12.75pt">
				  <td rowspan="3" height="51" class="xl24" style="height: 38.25pt" width="62"></td>
				  <td colspan="2" class="xl24" width="131"><font color="#FFFFFF" size="2" face="Verdana">Administrador
					(a)</font></td>
				  <td width="124">
					<p align="center"><%=rs("nome")%></p>
				  </td>
				</tr>
				<tr height="17" style="height:12.75pt">
				  <td height="17" style="height: 12.75pt" width="92">
					<p align="right"><font color="#FFFFFF" size="2" face="Verdana">Entrada:</font></p>
				  </td>
				  <td width="157" colspan="2">
				   <font face="Verdana" color="#000000" size="1">
				   <script>
var mydate=new Date()
var year=mydate.getYear()
if (year < 1000)
year+=1900
var day=mydate.getDay()
var month=mydate.getMonth()
var daym=mydate.getDate()
if (daym<10)
daym="0"+daym
var dayarray=new Array("")
var montharray=new
Array("01","02","03","04","05","06","07","08","09","10","11","12")
document.write("<small><font color='000000' face='verdana' size='1'><left>"+daym+"/"+montharray[month]+"/"+year+"</left></font></small>")
</script>									 
    <% Response.Write(FormatDateTime(Now(),4) & " " )%>
  </font>
					</td>
				</tr>
				<tr height="17" style="height:12.75pt">
				  <td height="17" style="height: 12.75pt" width="92"><font color="#FFFFFF" size="2" face="Verdana">IP
					de acesso:</font></td>
				  <td colspan="2" align="left" width="163">
					<p align="left"><font size="1" face="Verdana" color="#000000"><%
Response.Write request.servervariableS("REMOTE_ADDR")
%></font></td>
				</tr>
			  </table>
			</fieldset></td>
		  <td width="58" height="21" bgcolor="#0B4A80"></td>
		  <td width="81" height="21" bgcolor="#0B4A80"></td>
		</tr>
		<tr height="17" style="height:12.75pt">
		  <td width="58" height="21" bgcolor="#0B4A80"></td>
		  <td width="81" height="21" bgcolor="#0B4A80"></td>
		</tr>
		<tr height="17" style="height:12.75pt">
		  <td width="376" height="21" bgcolor="#0B4A80"></td>
		  <td width="58" height="21" bgcolor="#0B4A80"></td>
		  <td width="81" height="21" bgcolor="#0B4A80"></td>
		</tr>
		<tr height="17" style="height:12.75pt">
		  <td height="62" colspan="4" background="imagens/banner_admin.JPG" width="767">
			<table width="771" cellspacing="0" cellpadding="0">
			  <col width="64" span="2" style="width:48pt">
			  <tr height="17" style="height:12.75pt">
				<td height="17" width="414" style="height: 12.75pt"></td>
				<td width="343"></td>
			  </tr>
			  <tr height="17" style="height:12.75pt">
				<td height="17" style="height: 12.75pt" width="414"></td>
				<td width="343"></td>
			  </tr>
			</table>
		  </td>
		</tr>
	  </table>
	</td>
  </tr>
  <tr height="17" style="height:12.75pt">
	<td height="21" width="751">
<p align="left"><iframe name=nome src="princ.asp" frameborder="0" scrolling="NO" width="778" height="800"></iframe>
	</td>
  </tr>
  <tr height="17" style="height:12.75pt">
	<td height="25" width="751">
	  <table cellspacing="0" cellpadding="0" width="771">
		<tr>
		  <td height="17" width="1505" style="height: 12.75pt" background="imagens/footer_bg.gif">
			<p align="center"><b><font size="1" face="Verdana">©<u>Sonhoefesta.com.br</u></font></b>   
			<font size="1" face="Verdana">Todos os Direitos Reservados.</font></td>
		  <td width="160"><img border="0" src="imagens/footer_right.gif"></td>
		</table>
	  </td>
  </tr>
</table>
<p> </p>
<p><a href="http://www.shopcolina.com/websowza"><span style="position: absolute; left: 519; top: 746"><img border="0" src="../imagens/logo_websowza.gif" width="208" height="65"></span></a></p>

<%
rs.Close
Set rs = Nothing
End If 
%>

</body>
</html>

Compartilhar este post


Link para o post
Compartilhar em outros sites

pega o session user dele é dá um

'crio a conexao%>

 

:: Seja Bem-Vindo <%=Ucase(varloginsession)%>

 

na onde você quer que aparece o user dele

Compartilhar este post


Link para o post
Compartilhar em outros sites

seja se estou certo, fiz desse jeito mas naun deu certo oq tenho q fazer .......

 

codigo

<html>
<head>
<title>Centrar uma  página com CSS</title>
<meta http-equiv="Content-Type" content="text/html; 
charset=iso-8859-1">
<style type="text/css">
body {
margin:0;
padding:0;
background:#cccccc;
text-align:center; /* hack para o IE */	
	}
#tudo {
width: 760px;
margin:0 auto;			
padding: 0px;
text-align:left; /* "remédio" para o hack do IE */	
	}
#conteudo {
padding: 0px;
background-color: #ffffff;
	}
</style>
</head>


<body topmargin="0" leftmargin="0" onLoad="show_clock()">
<% 'declaro as var.
	 dim conexao, varmsg, rs, SQL, conDBQ, constring, varmsgeof, varnomesession, data
   
   'recupero as var.
   varmsgeof=request.querystring("msgeof")
   varmsg=request.querystring("msg")
   varnomesession=Session("nome")
   %> 
   
   <script LANGUAGE="JavaScript">
function novajan3(){
window.open ("proibidox.asp","Proibido","width=180,height=200,scrollbar=no,status=yes,resize=no")
}
</SCRIPT> <script LANGUAGE="JavaScript">
function novajan2(){
window.open ("proibido.asp","Erro","width=180,height=200,scrollbar=no,status=yes,resize=no")
}
</SCRIPT> <script LANGUAGE="JavaScript">
function novajan(){
window.open ("sucesso_treina.asp","Nome","width=180,height=200,scrollbar=no,status=yes,resize=no")
}
</SCRIPT> <% Select case varmsgeof  
	  case 11  'sem ser o admin - xanburzum gera o erro
	  response.write("<script>novajan2();</script>")
	  case 12  ' proibido excluir-me, o admin
		   response.write("<script>novajan3();</script>")
   end select

Select case varmsg
	case 1  'mensagem de sucesso do incluir
	response.write("<script>novajan();</script>")
	case 2  ' mensagem de sucesso do atualizar
	response.write("<script>novajan();</script>")
	case 3  'mensagem de sucesso do excluir
	response.write("<script>novajan();</script>")
  end select
  
  
  'crio a conexao%>
<!--#include file="conexao.asp"--> 
<% 'call abreconexao
			
  'crio o rs
  set rs=Server.CreateObject("ADODB.Recordset")
  'crio o SQL
  SQL="SELECT * FROM admin ORDER BY nome"
  'rs.open SQL,conexao,1,3
   %>

   
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 
Transitional//EN">
<div id="tudo">
<div id="conteudo" style="width: 778; height: 294">
<table cellspacing="0" cellpadding="0" width="778" height="186" class="texto" style="border: 1px solid black">
  <col width="64" style="width:48pt">
  <tr height="17" style="height:12.75pt">
	<td height="140" width="751">
	  <table width="775" height="166" cellspacing="0" cellpadding="0">
		<col width="64" span="4" style="width:48pt">
		<tr height="17" style="height:12.75pt">
		  <td height="84" width="234" bgcolor="#0B4A80" rowspan="4">
			 

</td>
		  <td width="376" height="21" bgcolor="#0B4A80"></td>
		  <td width="58" height="21" bgcolor="#0B4A80"></td>
		  <td width="81" height="21" bgcolor="#0B4A80"></td>
		</tr>
		<tr height="17" style="height:12.75pt">
		  <td width="376" height="42" bgcolor="#0B4A80" rowspan="2">
			<p align="center">	  <FIELDSET 
	  style="PADDING-RIGHT: 10px; PADDING-LEFT: 10px; PADDING-BOTTOM: 10px; WIDTH: 375px; PADDING-TOP: 10px">
			  <table width="337">
				<col width="64" style="width:48pt">
				<col width="85" style="mso-width-source:userset;mso-width-alt:3108;width:64pt">
				<col width="78" style="mso-width-source:userset;mso-width-alt:2852;width:59pt">
				<col width="84" style="mso-width-source:userset;mso-width-alt:3072;width:63pt">
				<tr height="17" style="height:12.75pt">
				  <td colspan="4" height="17" class="xl24" width="329" style="height: 12.75pt">
					<h4 align="center"><font color="#FFFFFF" face="Verdana">Sistema de
					Administração da loja</font></h4>
				  </td>
				</tr>
				<tr height="17" style="height:12.75pt">
				  <td rowspan="3" height="51" class="xl24" style="height: 38.25pt" width="62"></td>
				  <td colspan="2" class="xl24" width="131"><font color="#FFFFFF" size="2" face="Verdana">Administrador
					(a)</font></td>
				  <td width="124">
					<p align="center"><font color="#FFFFFF"><%=Ucase(varnomesession)%></font></p>
				  </td>
				</tr>
				<tr height="17" style="height:12.75pt">
				  <td height="17" style="height: 12.75pt" width="92">
					<p align="right"><font color="#FFFFFF" size="2" face="Verdana">Entrada:</font></p>
				  </td>
				  <td width="157" colspan="2">
				   <font face="Verdana" color="#FFFFFF" size="1">
				   <script>
var mydate=new Date()
var year=mydate.getYear()
if (year < 1000)
year+=1900
var day=mydate.getDay()
var month=mydate.getMonth()
var daym=mydate.getDate()
if (daym<10)
daym="0"+daym
var dayarray=new Array("")
var montharray=new
Array("01","02","03","04","05","06","07","08","09","10","11","12")
document.write("<small><font color='ffffff' face='verdana' size='1'><left>"+daym+"/"+montharray[month]+"/"+year+"</left></font></small>")
</script>									 
    <% Response.Write(FormatDateTime(Now(),4) & " " )%>
  </font>
					</td>
				</tr>
				<tr height="17" style="height:12.75pt">
				  <td height="17" style="height: 12.75pt" width="92"><font color="#FFFFFF" size="2" face="Verdana">IP
					de acesso:</font></td>
				  <td colspan="2" align="left" width="163">
					<p align="left"><font size="1" face="Verdana" color="#FFFFFF"><%
Response.Write request.servervariableS("REMOTE_ADDR")
%></font></td>
				</tr>
			  </table>
			</fieldset></td>
		  <td width="58" height="21" bgcolor="#0B4A80"></td>
		  <td width="81" height="21" bgcolor="#0B4A80"></td>
		</tr>
		<tr height="17" style="height:12.75pt">
		  <td width="58" height="21" bgcolor="#0B4A80"></td>
		  <td width="81" height="21" bgcolor="#0B4A80"></td>
		</tr>
		<tr height="17" style="height:12.75pt">
		  <td width="376" height="21" bgcolor="#0B4A80"></td>
		  <td width="58" height="21" bgcolor="#0B4A80"></td>
		  <td width="81" height="21" bgcolor="#0B4A80"></td>
		</tr>
		<tr height="17" style="height:12.75pt">
		  <td height="62" colspan="4" background="imagens/banner_admin.JPG" width="767">
			<table width="771" cellspacing="0" cellpadding="0">
			  <col width="64" span="2" style="width:48pt">
			  <tr height="17" style="height:12.75pt">
				<td height="17" width="414" style="height: 12.75pt"></td>
				<td width="343"></td>
			  </tr>
			  <tr height="17" style="height:12.75pt">
				<td height="17" style="height: 12.75pt" width="414"></td>
				<td width="343"></td>
			  </tr>
			</table>
		  </td>
		</tr>
	  </table>
	</td>
  </tr>
  <tr height="17" style="height:12.75pt">
	<td height="21" width="751">
<p align="left"><iframe name=nome src="princ.asp" frameborder="0" scrolling="NO" width="778" height="700"></iframe>
	</td>
  </tr>
  <tr height="17" style="height:12.75pt">
	<td height="25" width="751">
	  <table cellspacing="0" cellpadding="0" width="777">
		<tr>
		  <td height="17" width="308" style="height: 12.75pt" background="imagens/footer_bg.gif">
<!------COMEÇA AQUI---------->
<a href="msnim:add?contact=leandro.sowza@hotmail.com">
<img border="0" src="imagens/logo_websowza.gif" width="170" height="38"></a>
<!------TERMINA AQUI----------></td>
		  <td height="17" width="1108" style="height: 12.75pt" background="imagens/footer_bg.gif">
			<p align="center"><font size="1" face="Verdana"><B>©SonhoeFesta.com.br</B> - Todo os Diretios Reservados</font></td>
		  <td width="65"><img border="0" src="imagens/footer_right.gif"></td>
		</table>
	  </td>
  </tr>
</table>
</div>
</div>
<p align="left">
</p>
</body>
<% 
rs.Close
Set rs = Nothing
%>
</html>

 

esta dando este erro

 

ADODB.Recordset error '800a0e78' 

Operation is not allowed when the object is closed. 

/admin/entra.asp, line 213

Compartilhar este post


Link para o post
Compartilhar em outros sites

você realmente tem a tabela solicitada pelo rs, e você esta utilizando

 

'crio a conexao%>
<!--#include file="conexao.asp"--> 
<% 'call abreconexao
			
  'crio o rs
  set rs=Server.CreateObject("ADODB.Recordset")
  'crio o SQL
  SQL="SELECT * FROM admin ORDER BY nome"
  'rs.open SQL,conexao,1,3
   %>

Compartilhar este post


Link para o post
Compartilhar em outros sites

Na tabela onde você tem o login e a senha do usuário você deve ter o nome dele ...

 

no seu login, você armazena o nome dele em uma sessão

 

login.asp

vlogin = request("login")
vsenha = request("senha")
sql = "SELECT * FROM tabela WHERE login = "'&vlogin&'" AND senha = "'&vsenha&'" "
SET rs = cnn.execute(sql)
if rs.eof then
response.write "Login ou Senha incorretos"

else
session("user") = rs("Campo") 'Este campo deve ser o mesmo q tem o nome do usuário
end if

nas outras páginas é só imprimir ::

 

response.write "Bem Vindo Usuário" & session("user")

Compartilhar este post


Link para o post
Compartilhar em outros sites

ola bom dia Jow xavier!

 

usei seu codigo mas esta dando erros

 

Microsoft VBScript runtime error '800a01a8' 

Object required: 'cnn' 

/admin/default.asp, line 5

esta certo assim

 

login.asp

<%
vusuario = request("usuario")
vsenha = request("senha")
sql = "SELECT * FROM admin WHERE nome = "'&vusuario&'" AND senha = "'&vsenha&'" "
SET rs = cnn.execute(sql)
if rs.eof then
response.write "Login ou Senha incorretos"

else
session("user") = rs("nome") 'Este campo deve ser o mesmo q tem o nome do usuário
end if
%>
<html>
<head>
<title>Teste em ASP com DB</title>
</head>

<body background="../imagens/fundo_quadrado.gif" topmargin="250" leftmargin="0">

<div align="center">
	  <FIELDSET 
	  style="PADDING-RIGHT: 10px; PADDING-LEFT: 10px; PADDING-BOTTOM: 10px; WIDTH: 350px; PADDING-TOP: 10px">
<form action="verificar_usuario.asp" method="POST">

<table width="272"><tr><td width="50"></td><td align="right" width="416" colspan="2">
<p align="center">
<img border="0" src="imagens/face.gif"><BR>
<b><font size="2" face="Verdana">::Acesso Restrito::</font></b>
	</td></tr><tr><td width="50" rowspan="3"><img border="0" src="../imagens/cadeado.gif" width="50" height="52"></td><td align="right" width="125">
	  <font size="1" face="Verdana">Login:</font>
	</td><td align="right" width="291">
	  <p align="left"><input type="text" name="usuario" size="20" style="font-family: Verdana; font-size: 10 px; border-style: solid; border-width: 1px"></p>
	</td></tr><tr><td align="right" width="125">
	  <font size="1" face="Verdana">Senha:</font>
	</td><td align="right" width="291">
	  <p align="left"><input type="password" name="senha" size="20" style="font-family: Verdana; font-size: 10 px; border-style: solid; border-width: 1px">
	</td></tr>

  <tr><td align="right" width="125">
	</td><td align="right" width="291">
	</td></tr>

  <tr><td width="50"></td><td width="416" colspan="2">
	  <p align="center"><input type="submit" value="login"></p>
	</td></tr>

</table>
</form>
</div>
</body>
</html>
<%
rs.Close
Set rs = Nothing
'End If 
%>

 

ai eu tenho uma pagina q verifica usuarios

 

verifica_usuarios.asp

<%
'---------------------------------------------------------------------------------------
'		Script by Fabio Franco
'	Email: fabio_franco@ofm.com.br ICQ: 164613668
'---------------------------------------------------------------------------------------
%>
<!--#include file="conexao.asp"-->
<%
Dim usuario, senha

usuario = Trim(LCase(Request.Form("usuario")))
senha = Trim(LCase(Request.Form("senha")))

if len(usuario) = 0 then
response.redirect "default.asp?erro=1"
end if

if len(senha) = 0 then
response.redirect "default.asp?erro=2"
end if

Call AbrirDB

sql = "SELECT * FROM admin WHERE nome='" & usuario & "'"
Set RS = Server.CreateObject("ADODB.RecordSet")
RS.Open sql,ConnDB,3,3

if not RS.EOF then

if RS("senha") <> senha then
response.redirect "default.asp?erro=4"
else
Session("login") = True
response.redirect "entra.asp"
end if

else

response.redirect "default.asp?erro=3"

end if

RS.close
Set RS = Nothing
Call FecharDB

'---------------------------------------------------------------------------------------
'		Script by Fabio Franco
'	Email: fabio_franco@ofm.com.br ICQ: 164613668
'---------------------------------------------------------------------------------------
%>

esta é a pagina q vai aparecer o nome do usuario

 

logado.asp

<html>
<head>
<title>Centrar uma  página com CSS</title>
<meta http-equiv="Content-Type" content="text/html; 
charset=iso-8859-1">
<style type="text/css">
body {
margin:0;
padding:0;
background:#cccccc;
text-align:center; /* hack para o IE */	
	}
#tudo {
width: 760px;
margin:0 auto;			
padding: 0px;
text-align:left; /* "remédio" para o hack do IE */	
	}
#conteudo {
padding: 0px;
background-color: #ffffff;
	}
</style>
</head>


<body topmargin="0" leftmargin="0" onLoad="show_clock()">
   
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 
Transitional//EN">
<div id="tudo">
<div id="conteudo" style="width: 778; height: 294">
<table cellspacing="0" cellpadding="0" width="778" height="186" class="texto" style="border: 1px solid black">
  <col width="64" style="width:48pt">
  <tr height="17" style="height:12.75pt">
	<td height="140" width="751">
	  <table width="775" height="166" cellspacing="0" cellpadding="0">
		<col width="64" span="4" style="width:48pt">
		<tr height="17" style="height:12.75pt">
		  <td height="84" width="234" bgcolor="#0B4A80" rowspan="4">
			 

</td>
		  <td width="376" height="21" bgcolor="#0B4A80"></td>
		  <td width="58" height="21" bgcolor="#0B4A80"></td>
		  <td width="81" height="21" bgcolor="#0B4A80"></td>
		</tr>
		<tr height="17" style="height:12.75pt">
		  <td width="376" height="42" bgcolor="#0B4A80" rowspan="2">
			<p align="center">	  <FIELDSET 
	  style="PADDING-RIGHT: 10px; PADDING-LEFT: 10px; PADDING-BOTTOM: 10px; WIDTH: 375px; PADDING-TOP: 10px">
			  <table width="337">
				<col width="64" style="width:48pt">
				<col width="85" style="mso-width-source:userset;mso-width-alt:3108;width:64pt">
				<col width="78" style="mso-width-source:userset;mso-width-alt:2852;width:59pt">
				<col width="84" style="mso-width-source:userset;mso-width-alt:3072;width:63pt">
				<tr height="17" style="height:12.75pt">
				  <td colspan="4" height="17" class="xl24" width="329" style="height: 12.75pt">
					<h4 align="center"><font color="#FFFFFF" face="Verdana">Sistema de
					Administração da loja</font></h4>
				  </td>
				</tr>
				<tr height="17" style="height:12.75pt">
				  <td rowspan="3" height="51" class="xl24" style="height: 38.25pt" width="62"></td>
				  <td colspan="2" class="xl24" width="131"><font color="#FFFFFF" size="2" face="Verdana">Administrador
					(a)</font></td>
				  <td width="124">
					<p align="center"><font color="#FFFFFF" size="1" face="Verdana"><%
response.write "Bem Vindo Usuário" & session("user")
%></font></p>
				  </td>
				</tr>
				<tr height="17" style="height:12.75pt">
				  <td height="17" style="height: 12.75pt" width="92">
					<p align="right"><font color="#FFFFFF" size="2" face="Verdana">Entrada:</font></p>
				  </td>
				  <td width="157" colspan="2">
				   <font face="Verdana" color="#FFFFFF" size="1">
				   <script>
var mydate=new Date()
var year=mydate.getYear()
if (year < 1000)
year+=1900
var day=mydate.getDay()
var month=mydate.getMonth()
var daym=mydate.getDate()
if (daym<10)
daym="0"+daym
var dayarray=new Array("")
var montharray=new
Array("01","02","03","04","05","06","07","08","09","10","11","12")
document.write("<small><font color='ffffff' face='verdana' size='1'><left>"+daym+"/"+montharray[month]+"/"+year+"</left></font></small>")
</script>									 
    <% Response.Write(FormatDateTime(Now(),4) & " " )%>
  </font>
					</td>
				</tr>
				<tr height="17" style="height:12.75pt">
				  <td height="17" style="height: 12.75pt" width="92"><font color="#FFFFFF" size="2" face="Verdana">IP
					de acesso:</font></td>
				  <td colspan="2" align="left" width="163">
					<p align="left"><font size="1" face="Verdana" color="#FFFFFF"><%
Response.Write request.servervariableS("REMOTE_ADDR")
%></font></td>
				</tr>
			  </table>
			</fieldset></td>
		  <td width="58" height="21" bgcolor="#0B4A80"></td>
		  <td width="81" height="21" bgcolor="#0B4A80"></td>
		</tr>
		<tr height="17" style="height:12.75pt">
		  <td width="58" height="21" bgcolor="#0B4A80"></td>
		  <td width="81" height="21" bgcolor="#0B4A80"></td>
		</tr>
		<tr height="17" style="height:12.75pt">
		  <td width="376" height="21" bgcolor="#0B4A80"></td>
		  <td width="58" height="21" bgcolor="#0B4A80"></td>
		  <td width="81" height="21" bgcolor="#0B4A80"></td>
		</tr>
		<tr height="17" style="height:12.75pt">
		  <td height="62" colspan="4" background="imagens/banner_admin.JPG" width="767">
			<table width="771" cellspacing="0" cellpadding="0">
			  <col width="64" span="2" style="width:48pt">
			  <tr height="17" style="height:12.75pt">
				<td height="17" width="414" style="height: 12.75pt"></td>
				<td width="343"></td>
			  </tr>
			  <tr height="17" style="height:12.75pt">
				<td height="17" style="height: 12.75pt" width="414"></td>
				<td width="343"></td>
			  </tr>
			</table>
		  </td>
		</tr>
	  </table>
	</td>
  </tr>
  <tr height="17" style="height:12.75pt">
	<td height="21" width="751">
<p align="left"><iframe name=nome src="princ.asp" frameborder="0" scrolling="NO" width="778" height="700"></iframe>
	</td>
  </tr>
  <tr height="17" style="height:12.75pt">
	<td height="25" width="751">
	  <table cellspacing="0" cellpadding="0" width="777">
		<tr>
		  <td height="17" width="308" style="height: 12.75pt" background="imagens/footer_bg.gif">
<!------COMEÇA AQUI---------->
<a href="msnim:add?contact=leandro.sowza@hotmail.com">
<img border="0" src="imagens/logo_websowza.gif" width="170" height="38"></a>
<!------TERMINA AQUI----------></td>
		  <td height="17" width="1108" style="height: 12.75pt" background="imagens/footer_bg.gif">
			<p align="center"><font size="1" face="Verdana"><B>©SonhoeFesta.com.br</B> - Todo os Diretios Reservados</font></td>
		  <td width="65"><img border="0" src="imagens/footer_right.gif"></td>
		</table>
	  </td>
  </tr>
</table>
</div>
</div>
<p align="left">
</p>
</body>

</html>

Compartilhar este post


Link para o post
Compartilhar em outros sites

falta definir a conexao com o nome de objeto especificado

Compartilhar este post


Link para o post
Compartilhar em outros sites

você deve verificar seu include onde esta fazendo a conexao

veja com o cnn, que deve ser sua string de conexao,esse erro de. Object required. Um dos motivos que faz com que esse erro ocorra é tentar utilizar a propriedade ou executar uma ação em um objeto quando o mesmo ainda não foi criado. Por exemplo, caso você tentar finalizar a instância de um objeto sem ter criando: conn.Close(). Esse tipo de ação gera o erro de número 800A01A8. Antes de finalizar a instância do objeto o mesmo deve ser criado. (Set conn = Server.CreateObject("ADODB.Connection"))

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.