Busca de dados

Tigger · Julho 5, 2005

Gostaria de uma ajuda quanto a fazer um script de busca de downlaods efetuados...

bem como seria isso.

Tenho os seguintes campos com o qual eu posso fazer a busca...

NOME_USUARIO

EMAIL_USUARIO

DATA

MODULO

o detalhe e o seguinte, nao estou aguentando mais, fazer esse tipo de codigo por varios erros de resultado que aparecem...quando eu faco uma busca por DATA INCIAL e FINAL por exemplo...os resultados obtidos sao um desatre....

Por que ele busca corretamente o dia, mais o mes vem todo difetenre em relacao a busca...se eu boto 01/06/2005 A 05/07/2005 o resultado vem do mes 05 ate 06

isso eu estou utilizando um campo DATE/TIME no Access onde a busca faco com o seguinte caracter...#..#..

Um outro ponto, e que quando quero buscar em um periodo de data estipulado um determinadao MODULO ele nao busca para MIM, na verdade ele busca todoso os modulos, existente....no BD...

A unica coisa, que conseigo fazer direito e o NOME_USUARIO, E O EMAIL_USUARIO...

Segue o codigo das variaveis que estou utilizando...

ASP

[*]

[*]

[*]<%

[*]StrNome = Request.Form("nome")

[*]StrEmail = Request.Form("email")

[*]StrInicio = Request.Form("DATA_INICIO")

[*]StrFinal = Request.Form("DATA_FINAL")

[*]StrModulo = Request.Form("modulo")

[*]

[*]D1Dia = Left (Request.Form("DATA_INICIO"),2)

[*]D1Mes = Mid (Request.Form("DATA_INICIO"),4,2)

[*]D1Ano = Right (Request.Form("DATA_INICIO"),4)

[*]

[*]D2Dia = Left (Request.Form("DATA_FINAL"),2)

[*]D2Mes = Mid (Request.Form("DATA_FINAL"),4,2)

[*]D2Ano = Right (Request.Form("DATA_FINAL"),4)

[*]

[*]StrDataAtual = RIGHT("0" & DAY(DATE()),2) & "/" & RIGHT("0" & MONTH(DATE()),2) & "/" & YEAR(DATE())

[*]

[*]Data1 = D1Mes & "/" & D1Dia & "/" & D1Ano

[*]Data2 = D2Mes & "/" & D2Dia & "/" & D2Ano

[*]

[*]%>

[*]

~

Se alguma pessoa puder me ajudar, ficariam muito grato... :joia:

ultra · Julho 5, 2005

Tenta mudar a sua SQL assim:"Select * from campo where data >= '" & Data_inicial & "' AND data <= '" & Data_final & "' "Lembrando q você deve ver qual é a forma correta da data do seu BD, se é mm/dd/aaaa ou outro formato.

Tigger · Julho 5, 2005

Sim mais e isso que estou fanzendo, o negocio e que nao vem o mes correto....e nao aguento mais, ver erros, na minha frete, alguem poderia me ajudar construir o script .....ajudem-me...

Mário Monteiro · Julho 5, 2005

como esta seu select que pega as datas??

Salgado · Julho 5, 2005

Sempre que for fazer qualquer coisa usando Datas com BD procure usar o formato MM/DD/AAAA, exceto para o MySQL que é diferente.

Tigger · Julho 5, 2005

estou disponibilizando a visualizacao da pagina para teste....

Segue o codigo que estou utilizando.... Imagem Postada

ASP

[*]

[*]

[*]

[*]<%

[*]StrNome = Request.Form("nome")

[*]StrEmail = Request.Form("email")

[*]StrInicio = Request.Form("DATA_INICIO")

[*]StrFinal = Request.Form("DATA_FINAL")

[*]StrModulo = Request.Form("modulo")

[*]StrCondicao = Request.QueryString("condicao")

[*]

[*]D1Dia = Left (Request.Form("DATA_INICIO"),2)

[*]D1Mes = Mid (Request.Form("DATA_INICIO"),4,2)

[*]D1Ano = Right(Request.Form("DATA_INICIO"),4)

[*]

[*]D2Dia = Left (Request.Form("DATA_FINAL"),2)

[*]D2Mes = Mid (Request.Form("DATA_FINAL"),4,2)

[*]D2Ano = Right(Request.Form("DATA_FINAL"),4)

[*]

[*]StrDataAtual = RIGHT("0" & DAY(DATE()),2) & "/" & RIGHT("0" & MONTH(DATE()),2) & "/" & YEAR(DATE())

[*]

[*] Data1 = D1Mes & "/" & D1Dia & "/" & D1Ano

[*]Data2 = D2Mes & "/" & D2Dia & "/" & D2Ano

[*]

[*]IF StrCondicao = "1" THEN

[*]SQL = "SELECT * FROM DOWNLOADS_EFETUADOS"

[*]SQL = SQL & " WHERE "

[*]SQL = SQL & " DE_DATA >="&"#"&StrDataAtual&"#"

[*] SQL = SQL & " AND DE_DATA <= "&"#"&StrDataAtual&"#"

[*]SET RS2 = Cnn.execute(SQL)

[*]END IF

[*]

[*]IF StrModulo <> "N" THEN '**** SOMENTE PELO MODULO

[*]SQL = "SELECT * FROM DOWNLOADS_EFETUADOS"

[*]SQL = SQL & " WHERE DE_MODULO = " & StrModulo

[*]SET RS2 = Cnn.execute(SQL)

[*]END IF

[*]

[*]IF StrInicio <> "" AND StrFinal <> "" THEN '**** SOMENTE DATAS

[*] SQL = "SELECT * FROM DOWNLOADS_EFETUADOS"

[*] SQL = SQL & " WHERE "

[*] SQL = SQL & " DE_DATA >="&"#"&Data1&"#"

[*] SQL = SQL & " AND DE_DATA <= "&"#"&Data2&"#"

[*] SQL = SQL & " ORDER BY DE_CODIGO DESC "

[*] SET RS2 = Cnn.execute(SQL)

[*]END IF

[*]

[*]IF StrInicio <> "" AND StrFinal <> "" AND StrModulo <> "N" THEN '**** SOMENTE DATAS E MODULOS

[*]SQL = "SELECT * FROM DOWNLOADS_EFETUADOS"

[*]SQL = SQL & " WHERE "

[*]SQL = SQL & " DE_DATA >="&"#"&Data1&"#"

[*]SQL = SQL & " AND DE_DATA <= "&"#"&Data2&"#"

[*] SQL = SQL & " AND DE_MODULO = " & StrModulo

[*]SET RS2 = Cnn.execute(SQL)

[*]END IF

[*]

[*]IF StrNome <> "" THEN '**** SOMENTE O NOME

[*]SQL = "SELECT * FROM DOWNLOADS_EFETUADOS"

[*]SQL = SQL & " WHERE "

[*]SQL = SQL & " DE_NOME = '"&StrNome&"' "

[*]SET RS2 = Cnn.execute(SQL)

[*]END IF

[*]

[*]IF StrEmail <> "" THEN '**** SOMENTE O EMAIL

[*]SQL = "SELECT * FROM DOWNLOADS_EFETUADOS"

[*]SQL = SQL & " WHERE "

[*]SQL = SQL & " DE_EMAIL = '"&StrEmail&"' "

[*]SET RS2 = Cnn.execute(SQL)

[*]END IF

[*]

[*]IF StrInicio = "" AND StrFinal = "" AND StrNome = "" AND StrEmail = "" AND StrModulo = "N" THEN '**** SE TODOS OS CAMPOS FOREM VAZIOS

[*]SQL = "SELECT * FROM DOWNLOADS_EFETUADOS"

[*]SET RS2 = Cnn.execute(SQL)

[*]END IF

[*]

[*] %>

[*]

[*]<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">

[*]

[*]<HTML>

[*]<HEAD>

[*]<TITLE>AMZ Soluções - Informática Sem Limite</TITLE>

[*]<META http-equiv=Content-Type content="text/html; charset=windows-1252">

[*]<STYLE type=text/css>A:active {

[*]FONT-SIZE: 8pt; COLOR: #800000; FONT-FAMILY: Verdana, Arial, Helvetica, sans-serif; TEXT-DECORATION: none

[*]}

[*]A:visited {

[*]FONT-SIZE: 8pt; COLOR: #800000; FONT-FAMILY: Verdana, Arial, Helvetica, sans-serif; TEXT-DECORATION: none

[*]}

[*]A:link {

[*]FONT-SIZE: 8pt; COLOR: #800000; FONT-FAMILY: Verdana, Arial, Helvetica, sans-serif; TEXT-DECORATION: none

[*]}

[*]A:hover {

[*]FONT-SIZE: 8pt; COLOR: #183cb8; FONT-FAMILY: Verdana, Arial, Helvetica, sans-serif; TEXT-DECORATION: none

[*]}

[*].unnamed1 { font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 9pt; background-color: #FFFFFF; border: 1px solid; color: #000000; border-color: 000000 #330033 000000 #003333}

[*].unnamed2 { font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 9pt; border: 1px solid; border-color: 000000 00000 000000 000000}

[*]

[*]</STYLE>

[*]<META content="MSHTML 6.00.2800.1400" name=GENERATOR>

[*]<script language="JavaScript" type="text/JavaScript">

[*]<!--

[*]function MM_openBrWindow(theURL,winName,features) { //v2.0

[*]window.open(theURL,winName,features);

[*]}

[*]//-->

[*]</script>

[*]

[*]</HEAD>

[*]

[*]<BODY bgProperties=fixed bgColor=#c0c0c0 leftMargin=0 topMargin=0 >

[*]<DIV align=center>

[*]<p> </p>

[*]</DIV>

[*]<DIV align=center>

[*]<CENTER>

[*]<div align=center>

[*]<table bordercolor=#bc9f67 cellspacing=0 cellpadding=0 width=750 border=1 align="center">

[*]<tbody>

[*]<tr>

[*]<td width="100%">

[*]<table height="100%" cellspacing=0 cellpadding=0 width="100%" border=0>

[*]<tbody>

[*]<tr>

[*]<td colspan=2>

[*]<table bordercolor=#000000 cellspacing=0 cellpadding=0 width="100%"

[*]border=0>

[*]<tbody>

[*]<tr>

[*]<td><a name=topo><img height=91

[*]src="../manutencao_arquivos/banner_amz2.jpg"

[*]width=746></a></td>

[*]</tr>

[*]</tbody>

[*]</table>

[*]</td>

[*]</tr>

[*]<tr>

[*]<center>

[*]<td height="205" colspan="2" valign=top bgcolor=#ffffff>

[*]<div align="left"></div>

[*]<div align="left">

[*]<table width="100%" border="0">

[*]<tr>

[*]<td width="35%" colspan="2"> <font face="Verdana, Arial, Helvetica, sans-serif" size="2"><b> ::

[*]Downloads Efetuados</b></font></td>

[*]<td width="10%"> </td>

[*]<td width="29%"> </td>

[*]<td width="26%"> </td>

[*]</tr>

[*]<tr>

[*]<td height="14"> <div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="2"> <a href="cad_downloads_efetuados.asp">Novo(s)

[*]Conteúdo(s)</a></font> <br>

[*]</div></td>

[*]<td height="14" colspan="3"> </td>

[*]<td height="14"> </td>

[*]</tr>

[*]</table>

[*]<hr width="90%" align="center">

[*]

[*]<form name="form1" method="post" action="downloads_efetuados.asp">

[*]<table width="90%" border="0" align="center" class="unnamed1">

[*]<tr>

[*]<td height="18" colspan="3" bgcolor="#990000"> <div align="center"><font color="#FFFFFF" size="2" face="Verdana, Arial, Helvetica, sans-serif"><strong>Digite

[*]um período para ter a relação

[*]de downloads efetuados </strong></font>

[*]</div>

[*]<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="2">

[*] &nb

Tigger · Julho 5, 2005

Segue link

http://www.amznet.com.br/administracao/tes...s_efetuados.asp

Tigger · Julho 5, 2005

Seguinte, tenho que fazer a busca por todos os campos que estao no form disponivel para o USER...So que na verdade eu nao estou conseguindo....ou melhor..as vezes eu consigo e as vezes nao....os resultados quando consigo vem fora da minha determinacao...Gostaria de quem pudesse me ajudar...a resolver esse probleminha...

Salgado · Julho 5, 2005

Recebi esse erro:

Microsoft VBScript runtime error '800a01a8'
Object required: ''

/administracao/teste/downloads_efetuados.asp, line 216

E analizando sua programação, pode acontecer algum erro, pois a meu ver sua lógica na montagem da pesquiza não está correta.

Reveja e analize esses IFS.

Tigger · Julho 5, 2005

Pois entao salgado...nao querendo ser chato, mais ja sendo...caranao tenho muita experiencia nesse lance de busca com muitos campo, principalmente se um desse campos for DATE/TIME.Gostaria entao que alguem pudesse me dar uma forcinah para que eu possa montar a logica correta.....A respeito do erro na linha 216, e porque ele nao achou o RECORDSET...pelo arquivo nao ter nenhuma programacao de busca.....ajudem -me...

Tigger · Julho 5, 2005

Galera

O negocio e o seguinte, eu conseigo fazer a busca direito masi tem hora que nao da certo....alguem que seja expert em busca de dados e que possa me ajudar por favor.......nao aguenta ver mais tanto erro na minha frente

Alguem que pudesse fazer uma especie de passo a passo comigo, para que eu possa conseguir a resolver esse pro....

Salgado · Julho 5, 2005

Fala ai o do Sucrilhos (piadinha infame essa heim)!

Dá uma olhada nesse TÓPICO e veja a lógica que o amigo usou, conforme for pintando duvidas vai postando. Se mesmo assim não rolar iremos fazendo aos poucos.

ultra · Julho 5, 2005

Acho melhor você achar antes o formato correto da data do seu bdcrie uma página de testes, e nela põe o seguinte código:Set Rs = Cnn.execute("Select campo from tabela")Response.write Rs("campo") & "<BR><BR>"Response.write "Dia: "& Day(Rs("campo"))Response.write "Mês: "& Month(Rs("campo"))Response.write "Ano: "& Year(Rs("campo"))e veja se os dados batem realmente.... experimenta registros onde a data é maior q 12, pra ver se num tá nada invertido aí

Tigger · Julho 5, 2005

cara, eu nao to passando os codigo via GET.... sera que vai dar certo..

Mário Monteiro · Julho 5, 2005

a logica eh a mesmo tenta o exemplo que o salgado passou e conforme pinatr duvidas posta aqui...pois seu codigo já ta muito grande e complexo de entender eh melhor começar denovo e prestando o maximo de atenção agora...

Tigger · Julho 5, 2005

Realmente, tem hora que eu me perco!!por mais que eu coloque Comentario,fica meio complica...amanha estarei tentando o que o salgado me passou....no mais agradeco a disponibilidade de vcs....

Mário Monteiro · Julho 6, 2005

Realmente, tem hora que eu me perco!!

por mais que eu coloque Comentario,fica meio complica...

amanha estarei tentando o que o salgado me passou....no mais agradeco a disponibilidade de vcs....

ok então tiozinho amanha a gente ve isso

Tigger · Julho 6, 2005

O codigo que você´s me passaram pelo menos erro, nao esta dando...

(nao aguento mais ver esses erros...)

Mais funcionando tambem nao esta.... Imagem Postada

Tigger · Julho 6, 2005

Codigo que estou utilizando...

ASP

[*]

[*]

[*]

[*]<%

[*] StrNome = (Request("nome"))

[*]StrEmail = (Request("email"))

[*]StrInicio = (Request("DATA_INICIO"))

[*]StrFinal = (Request("DATA_FINAL"))

[*]StrModulo = (Request("modulo"))

[*]

[*]status = 1

[*]

[*]SET RS2 = Server.CreateObject("ADODB.Recordset")

[*]

[*]SQL = "SELECT * FROM DOWNLOADS_EFETUADOS"

[*]SQL = SQL & " WHERE DE_EMAIL = '"&StrEmail&"' "

[*]

[*] IF (Request.QueryString("nome") <> "" ) THEN

[*]SQL = SQL & " AND DE_NOME '%" & request.QueryString("nome") & "%'"

[*] END IF

[*]

[*] IF (Request.QueryString("DATA_INICIO") <> "") THEN

[*]SQL = SQL & " AND DE_DATA >= "&"#" & request.QueryString("DATA_INICIO") & "#"

[*] END IF

[*]

[*] IF (Request.QueryString("DATA_FINAL") <> "") THEN

[*]SQL = SQL & " AND DE_DATA <= "&"#" & request.QueryString("DATA_FINAL") & "#"

[*] END IF

[*]

[*] IF (Request.QueryString("modulo") <> "" ) THEN

[*]SQL = SQL & " AND DE_MODULO '%" & request.QueryString("modulo") & "%'"

[*] END IF

[*]

[*]SQL = SQL & " ORDER BY DE_CODIGO DESC "

[*]

[*] RS2.Open SQL, Cnn, 1,3

[*] %>

[*]

Com esse codigo, eu so consigo recuperar o valor do EMAIL....

Tigger · Julho 6, 2005

SOCOOOOROOOOO, me ajudem !!!

Arquivado

Busca de dados

Recommended Posts

Tigger 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

ultra 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

Tigger 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

Mário Monteiro 179

Compartilhar este post

Link para o post

Compartilhar em outros sites

Salgado 4

Compartilhar este post

Link para o post

Compartilhar em outros sites

Tigger 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

Tigger 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

Tigger 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

Salgado 4

Compartilhar este post

Link para o post

Compartilhar em outros sites

Tigger 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

Tigger 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

Salgado 4

Compartilhar este post

Link para o post

Compartilhar em outros sites

ultra 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

Tigger 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

Mário Monteiro 179

Compartilhar este post

Link para o post

Compartilhar em outros sites

Tigger 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

Mário Monteiro 179

Compartilhar este post

Link para o post

Compartilhar em outros sites

Tigger 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

Tigger 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

Tigger 0