cadastros de ontem e de hoje

[zanelati2002 0]

como eu faria para saber em asp acess o db quantos cadastros tive ontem e hoje alguém me ajude não consgui fazer isto

[birobirosk8 0]

você num marca a data de cadastro na tabela, tipo quando o cara se cadastra você marca a data q ele se cadastrou.dai depois é só você fazer o select entre datas para saber...

[Davidmg 0]

Concordo, tem que gravar as datas do cadastro para dar o select depois....

[zanelati2002 0]

olha o que fiz mais não deu certo aaprece nada

 

<%ConnectString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("login/db/site/siteusers.mdb")Set conn = Server.CreateObject("ADODB.Connection")conn.open ConnectStringRstParametros.Open " Select (select Count(*) from users where xdt_disponivel <= Getdate()-1) Ontem, (select Count(*) from users	where xdt_disponivel <= Getdate()) Hoje ", Conn	'Declaração de Variáveis		TotOntem = RstParametros("Ontem")		TotHoje = RstParametros("Hoje")		TotGeral = TotOntem+TotHoje	'Fim das declarações (Variáveis)	%>	<table>	<tr>		<td style="BORDER-LEFT: #ffffff 1px solid; BORDER-BOTTOM: #c5c5c5 1px solid; BORDER-TOP: #ffffff 1px solid; PADDING-RIGHT: 3px; PADDING-LEFT: 3px; FONT-SIZE: 11px; PADDING-BOTTOM: 3px; COLOR: white; PADDING-TOP: 3px; TEXT-DECORATION: none" align="Left" bgColor="#999999" colSpan=2 >		<font color="#006600" face="Arial" size="-1">Total Geral ---> <%=TotGeral%></Font>		</td>	</tr>	</table>	<table>	<tr>		<td style="BORDER-LEFT: #ffffff 1px solid; BORDER-BOTTOM: #c5c5c5 1px solid; BORDER-TOP: #ffffff 1px solid; PADDING-RIGHT: 3px; PADDING-LEFT: 3px; FONT-SIZE: 11px; PADDING-BOTTOM: 3px; COLOR: white; PADDING-TOP: 3px; TEXT-DECORATION: none" align="Left" bgColor="#9999CC" colSpan=2 >		<font color="#339999" face="Arial" size="-1">Total Hoje ---> <%=TotHoje%></Font>		</td>	</tr>	</table>	<table>	<tr>		<td style="BORDER-LEFT: #ffffff 1px solid; BORDER-BOTTOM: #c5c5c5 1px solid; BORDER-TOP: #ffffff 1px solid; PADDING-RIGHT: 3px; PADDING-LEFT: 3px; FONT-SIZE: 11px; PADDING-BOTTOM: 3px; COLOR: white; PADDING-TOP: 3px; TEXT-DECORATION: none" align="Left" bgColor="#FF3333" colSpan=2 >		<font color="#3399FF" face="Arial" size="-1">Total Ontem ---> <%=TotOntem%></Font>		</td>	</tr>	</table><%	'Finalizando as conexões	   Set Conn = nothing	   Set RstParametros = nothing 	%>

[zanelati2002 0]

to tentando assim mais mesmo assim

 

<%ConnectString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("login/db/site/siteusers.mdb")Set conn = Server.CreateObject("ADODB.Connection")conn.open ConnectStringset rs = conn.execute("select count(*) as nconta from users")response.write(" "&rs("nconta"))%></font></b></TD></TR>					<TR><%ConnectString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("login/db/banco/siteusers.mdb")Set conn = Server.CreateObject("ADODB.Connection")conn.open ConnectStringset rs = conn.execute("select Count(*) from users where xdt_disponivel <= Getdate()-1) Ontem")conn.open ConnectStringset rs = conn.execute("select Count(*) from users where xdt_disponivel <= Getdate()) Hoje")'Declaração de Variáveis		TotOntem = RstParametros("Ontem")		TotHoje = RstParametros("Hoje")		TotGeral = TotOntem+TotHoje	'Fim das declarações (Variáveis)	%><%=TotHoje%><%=TotOntem%><%	'Finalizando as conexões	   Set Conn = nothing	   Set RstParametros = nothing 	%>

[Davidmg 0]

Tenta assim:

 

<%ConnectString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("login/db/site/siteusers.mdb")Set conn = Server.CreateObject("ADODB.Connection")conn.open ConnectStringRstParametros.Open " Select (select Count(*) from users where xdt_disponivel <=date()-1) Ontem, (select Count(*) from users	where xdt_disponivel <=date()) Hoje ", Conn	'Declaração de Variáveis		TotOntem = RstParametros("Ontem")		TotHoje = RstParametros("Hoje")		TotGeral = TotOntem+TotHoje	'Fim das declarações (Variáveis)	%>	<table>	<tr>		<td style="BORDER-LEFT: #ffffff 1px solid; BORDER-BOTTOM: #c5c5c5 1px solid; BORDER-TOP: #ffffff 1px solid; PADDING-RIGHT: 3px; PADDING-LEFT: 3px; FONT-SIZE: 11px; PADDING-BOTTOM: 3px; COLOR: white; PADDING-TOP: 3px; TEXT-DECORATION: none" align="Left" bgColor="#999999" colSpan=2 >		<font color="#006600" face="Arial" size="-1">Total Geral ---> <%=TotGeral%></Font>		</td>	</tr>	</table>	<table>	<tr>		<td style="BORDER-LEFT: #ffffff 1px solid; BORDER-BOTTOM: #c5c5c5 1px solid; BORDER-TOP: #ffffff 1px solid; PADDING-RIGHT: 3px; PADDING-LEFT: 3px; FONT-SIZE: 11px; PADDING-BOTTOM: 3px; COLOR: white; PADDING-TOP: 3px; TEXT-DECORATION: none" align="Left" bgColor="#9999CC" colSpan=2 >		<font color="#339999" face="Arial" size="-1">Total Hoje ---> <%=TotHoje%></Font>		</td>	</tr>	</table>	<table>	<tr>		<td style="BORDER-LEFT: #ffffff 1px solid; BORDER-BOTTOM: #c5c5c5 1px solid; BORDER-TOP: #ffffff 1px solid; PADDING-RIGHT: 3px; PADDING-LEFT: 3px; FONT-SIZE: 11px; PADDING-BOTTOM: 3px; COLOR: white; PADDING-TOP: 3px; TEXT-DECORATION: none" align="Left" bgColor="#FF3333" colSpan=2 >		<font color="#3399FF" face="Arial" size="-1">Total Ontem ---> <%=TotOntem%></Font>		</td>	</tr>	</table><%	'Finalizando as conexões	   Set Conn = nothing	   Set RstParametros = nothing 	%>

[zanelati2002 0]

não deu certo porque to tentando fazer em sql é precios fazer em acesscerto alguém pode me ajudar

[Davidmg 0]

Mais como está a data em seu bd?

[birobirosk8 0]

manooooeiwwwwaxo q nom precisa de nata dissoo....faiz assim, na tabela q você grava os registros adiciona oum campo data(do tipo data), toda hora q você fizer um insert você faz o insert nakele campo da data atual (date()).depois, quando você quiser selecionar produtos entre tais datas, é só você fazer uma instrução utilizando between.se entendeu a logika da parada ???se tiver alguma duvida grita ae

[zanelati2002 0]

cara não entendi nada do que disse o que quero já falei neste post que por sinal até já houve algumas respostase respondendo a pergunta a data no cadastro esta como texto gravo quandoo cara se cadastra.

[Davidmg 0]

Comparar data no access é f***...

 

Tenta assim:

 

RstParametros.Open " Select (select Count(*) from users where xdt_disponivel <=CDATE(date()-1)) Ontem, (select Count(*) from users	where xdt_disponivel <=CDATE(date())) Hoje ", Conn

[Davidmg 0]

Ou mude em seu bd o campo onde grava as datas para tipo DATA.....

[bareta 0]

seguinte você grava a data né...

 

coloque a data como data/hora mesmo...

para fazer o select entre datas use o between...

 

http://www.crieseuwebsite.com/artigos/arti...ria=access&id=4

 

da uma olhada ai... acho que vai ajudar

[zanelati2002 0]

e não vai nem com este link do bareta consegui fazer

[Michlos 0]

Cara... seguinte.. pelo que entendi você tah usando o campo MDB com campo texto. se você NÃO tiver gravando no MDB com campo DATA você pode tentar isso o tanto de vez q kizer q nao vai dar...se tiver em TEXTO você vai ter que converter os dados gravando em uma variável pra poder achar... isso se nao kiser converter o campo em DATA...Mas pra salvar você eh melhor alterar o campo pra DATA.

[zanelati2002 0]

então é isto mesmo que disse mais quero mostrar isto em acess tipo meu db é users.mdb e é texto o campo data como que faço para pegar a quant. da cadastros d eontem e de hoje

[Felipe Fonseca 0]

Amigo eh mto fácil!!!você precisa realmente colocar o campo como data e receber como valor padrão a data..aí quando o cara logar vai receber o momento exato de seu Login .. Faça o Seguinte:Coloque um Capo DATA do tipo Data/ Hora ... e no valor padrão você coloca Now()depois você faz as consultas a partir desta tabela pegando o campo data, aqui fica mei complicado de te explicar, se quiser manda o BD para feliepe@gmail.com que faço pra você sem problemas!!Farei tudo no ACCESS nada de SQL, tudo no access assim fica bem mais facil!!OK?!QQ coisa da um grito aew ...Agora mudando de asusnto galera preciso muito de um HELP no meu topico do smart UPLOAd preciso colocar um SAVE AS ... se alguem souber da um help la pra mim pq to precisando mto.!vlw]

[zanelati2002 0]

olha o que tentei fazer mais mesmo assim não vai

 

<%	ConnectString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("SiteUsers\siteusers.mdb")	Set conexao = Server.CreateObject("ADODB.Connection")	conexao.open ConnectString		set rs1 = server.CreateObject("ADODB.RecordSet")	set rs2 = server.CreateObject("ADODB.RecordSet")		rs1.open "select count(*) as Ontem from Users where data = Now-1", conexao	rs2.open "select count(*) as Hoje  from Users where data = Now", conexao		totOntem = rs1("Ontem")	totHoje =  rs2("Hoje")			%>	<table>	<tr bgcolor="#00CCFF">		<td>				Total de Cadastros Ontem: <%=totOntem%>		</td>	</tr>	</table>	<table>	<tr bgcolor="#00CCFF">		<td>				Total de Cadastros Hoje		: <%=totHoje%>					</td>	</tr>	</table>	<table>	<tr bgcolor="#CC0033">		<td>				Total de Cadastros Geral	: <%=totHoje+totontem%>

ta aparecendo 0