Jump to content


Photo

Puxar Algumas Informação Do Meu Bd


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

#16 crazybaby

crazybaby

    Cyber Eye

  • Banidos
  • PipPipPipPipPipPipPipPipPip
  • 1112 posts
  • Sexo:Não informado
  • Localidade:Divinopolis-MG
  • Interesses:ASP & Design

Posted 27/09/2003, 14:54

entaum... faz um select no seu bd com o valor dessa session....

como fazer isso fuck?

<%
variavel = session("logado")

sql = "select * from tabela where login="&variavel

set rs = conexao.execute(sql)

%>


seria assim?

#17 mokus

mokus

    Normal

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

Posted 27/09/2003, 17:10

assim está do mesmo jeito que estava, estou vendo todos formulários no banco de dados e não só os meus com meu usuario logado

#18 mokus

mokus

    Normal

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

Posted 27/09/2003, 17:16

Aqui esta o meu listar



<html>
<head>
<title>Listar Relatórios </title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<STYLE><!--
.TABLE { border-color: #000000 #000000 black; border-style: solid; border-top-width: 1px; border-right-width: 1px; border-bottom-width: 1px; border-left-width: 1px}
a:link { font-family: Arial, Helvetica, sans-serif; color: #000000; text-decoration: none}
a:hover { font-family: Arial, Helvetica, sans-serif; color: #CCCCCC; text-decoration: none}
a:visited { font-family: Arial, Helvetica, sans-serif; text-decoration: none}
a:active { font-family: Arial, Helvetica, sans-serif; color: #666666; text-decoration: none}
--></STYLE>
</head>

<body bgcolor="#FFFFFF" text="#000000" link="#000000" vlink="#000000" alink="#000000" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<%




Set conexao = Server.CreateObject("ADODB.Connection")

Conexao.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ="& Server.MapPath("../dados/form.mdb")


variavel = session("logado")



SQL="Select * From Emails order by firma"

set rs = conexao.execute(sql)






Set RS = conexao.execute(sql)%>
<table width="548" border="0" cellspacing="0" cellpadding="1" align="center">
<tr>
<td bgcolor="#FFFFFF" width="544">
<div align="center">&nbsp;</div>
<div align="center">&nbsp;</div>
<div align="center"><font size="3" face="Tahoma"><b>Listando Relatórios</b></font></div>
<div align="center">&nbsp;</div>
<div align="center">&nbsp;</div>
</td>
</tr>
<%do while not rs.EOF %>
<tr>
<td width="544">
<div align="center"><a href="usuarios.asp?id=<%=rs("id")%>">
<font size="2" face="Arial, Helvetica, sans-serif"><%=rs("firma")%> &nbsp;&nbsp; <%=rs("tec")%>&nbsp;&nbsp;<%=rs("dia1")%>&nbsp;&nbsp;<%=rs("dia2")%>
</font></a></div>
<div align="center"><a href="usuarios.asp?id=<%=rs("id")%>"><font size="2" face="Arial, Helvetica, sans-serif">&nbsp;&nbsp;
</font></a></div>
</td>
</tr>
<%rs.MoveNext%>
<%Loop%>
</table>
<p>&nbsp;</p>
<p align="center">&nbsp;</p>
</body>
</html>

#19 crazybaby

crazybaby

    Cyber Eye

  • Banidos
  • PipPipPipPipPipPipPipPipPip
  • 1112 posts
  • Sexo:Não informado
  • Localidade:Divinopolis-MG
  • Interesses:ASP &amp; Design

Posted 27/09/2003, 17:19

naum entendi o q vc quis dizer!

#20 Rodrigo

Rodrigo

    oi!

  • Usuários
  • 995 posts
  • Sexo:Não informado
  • Interesses:Diretório de sites - http://www.acheinobrasil.com.br

Posted 27/09/2003, 18:19

entaum... faz um select no seu bd com o valor dessa session....

como fazer isso fuck?

<%
variavel = session("logado")

sql = "select * from tabela where login="&variavel

set rs = conexao.execute(sql)

%>


seria assim?

isso msm

#21 mokus

mokus

    Normal

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

Posted 27/09/2003, 19:40

a conecção com meu bd esta assim agora

Set conexao = Server.CreateObject("ADODB.Connection")

Conexao.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ="& Server.MapPath("../dados/email.mdb")


variavel = session("logado")



SQL="Select * From Emails order by firma"






Set RS = conexao.execute(sql)%>




vai ficar asssim?


<%
variavel = session("logado")

sql = "select * from emails where login="&tecnico

set rs = conexao.execute(sql)

%>

#22 crazybaby

crazybaby

    Cyber Eye

  • Banidos
  • PipPipPipPipPipPipPipPipPip
  • 1112 posts
  • Sexo:Não informado
  • Localidade:Divinopolis-MG
  • Interesses:ASP &amp; Design

Posted 27/09/2003, 22:41

isso depoiius de criar a conexao vc coloka esse codigo como eu passei

#23 Bob

Bob

     

  • Usuários
  • 536 posts
  • Sexo:Masculino

Posted 27/09/2003, 22:49

Aproveitando o assunto do tópico:

' Tenho esse tipo de busca
Nome = Request("BuscaNomes")
SQL = "Select * From Cadastro Where Nome = '" & Nome & "'"

' Mas ele não encontra nada. Há algo de errado ?

#24 crazybaby

crazybaby

    Cyber Eye

  • Banidos
  • PipPipPipPipPipPipPipPipPip
  • 1112 posts
  • Sexo:Não informado
  • Localidade:Divinopolis-MG
  • Interesses:ASP &amp; Design

Posted 27/09/2003, 22:56

vc naum deu o execute?
<%
Nome = Request("BuscaNomes")
set rs = conexao.execute("Select * From Cadastro Where Nome = '" & Nome & "'")
%>

#25 Bob

Bob

     

  • Usuários
  • 536 posts
  • Sexo:Masculino

Posted 27/09/2003, 23:01

Nesse caso não vai precisar.

#26 crazybaby

crazybaby

    Cyber Eye

  • Banidos
  • PipPipPipPipPipPipPipPipPip
  • 1112 posts
  • Sexo:Não informado
  • Localidade:Divinopolis-MG
  • Interesses:ASP &amp; Design

Posted 27/09/2003, 23:08

eh tah certo...

vc verifikou se o requet esta correto?o campo do form?

#27 Bob

Bob

     

  • Usuários
  • 536 posts
  • Sexo:Masculino

Posted 27/09/2003, 23:12

Sim verifiquei tudo, até atribui um nome que está no banco a variável Nome pra vê se buscava, mas nada...
A seleção funciona normal se eu tirar a função Where.

#28 mokus

mokus

    Normal

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

Posted 28/09/2003, 02:02

Agora ta começando a melhorar, nenhum formulário aparece


<%




Set conexao = Server.CreateObject("ADODB.Connection")

Conexao.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ="& Server.MapPath("../dados/form.mdb")




variavel = session("logado")


SQL = "Select * From Emails Where tec = '" & tec & "'"




set rs = conexao.execute(sql)

%>

#29 crazybaby

crazybaby

    Cyber Eye

  • Banidos
  • PipPipPipPipPipPipPipPipPip
  • 1112 posts
  • Sexo:Não informado
  • Localidade:Divinopolis-MG
  • Interesses:ASP &amp; Design

Posted 28/09/2003, 08:27

tenta o seguinte codigo

<html>
<head><title>teste</title></head>
<body>
<%
Set conexao = Server.CreateObject("ADODB.Connection")

Conexao.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ="& Server.MapPath("../dados/form.mdb")

tec = session("logado")

set rs = conexao.execute("Select * From Emails Where tec = '" & tec & "'")


%>

<b><%=rs("tec")%></b>

</body>
</html>



a unika coisa q vc deve substituir é o valor da session, talvez vc naum deu o nome de "logado" para a session!este é um nome q eu atribui para se indetifikar em geral!

Edição feita por: crazybaby, 28/09/2003, 08:29.


#30 mokus

mokus

    Normal

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

Posted 29/09/2003, 11:42

Olá galera

Quando coloco
<%=rs("tec")%> como diz o texto anterior dar erro no bd

está assim agora


<html>
<head>
<title>Listar Relatórios </title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<STYLE><!--
.TABLE { border-color: #000000 #000000 black; border-style: solid; border-top-width: 1px; border-right-width: 1px; border-bottom-width: 1px; border-left-width: 1px}
a:link { font-family: Arial, Helvetica, sans-serif; color: #000000; text-decoration: none}
a:hover { font-family: Arial, Helvetica, sans-serif; color: #CCCCCC; text-decoration: none}
a:visited { font-family: Arial, Helvetica, sans-serif; text-decoration: none}
a:active { font-family: Arial, Helvetica, sans-serif; color: #666666; text-decoration: none}
--></STYLE>
</head>

<body bgcolor="#FFFFFF" text="#000000" link="#000000" vlink="#000000" alink="#000000" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">

<%
Set conexao = Server.CreateObject("ADODB.Connection")
Conexao.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ="& Server.MapPath("../dados/email.mdb")
usuarios = session("usuarios")
set rs = conexao.execute("Select * From Emails Where tec = '" & tec & "'")%>
<table width="548" border="0" cellspacing="0" cellpadding="1" align="center">
<tr>
<td bgcolor="#FFFFFF" width="544">
<div align="center">&nbsp;</div>
<div align="center">&nbsp;</div>
<div align="center"><font size="3" face="Tahoma"><b>Listando Relatórios</b></font></div>
<div align="center">&nbsp;</div>
<div align="center">&nbsp;</div>
</td>
</tr>
<%do while not rs.EOF %>
<tr>
<td width="544">
<div align="center"><a href="usuarios.asp?id=<%=rs("id")%>">
<font size="2" face="Arial, Helvetica, sans-serif"><%=rs("firma")%> &nbsp;&nbsp; <%=rs("tec")%>&nbsp;&nbsp;<%=rs("dia1")%>&nbsp;&nbsp;<%=rs("dia2")%>
</font></a></div>
<div align="center"><a href="usuarios.asp?id=<%=rs("id")%>"><font size="2" face="Arial, Helvetica, sans-serif">&nbsp;&nbsp;
</font></a></div>
</td>
</tr>
<%rs.MoveNext%>
<%Loop%>
</table>
<p>&nbsp;</p>
<p align="center">&nbsp;</p>
<p align="center"></p>
<p align="center"><html>
<head><title>teste</title></head>
<body>


</body>
</html>></p>
</body>
</html>




0 user(s) are reading this topic

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

IPB Skin By Virteq