Porque não pega a data e nem a quant.

[zanelati2002 0]

amigos estou tentando fazer um negocio mais ta complicado

tipo gostaria de mostrar para meus usuarios o dia e a data que teve maior cadastro dentro do site mais não ta aparecendo nada, olhem o codigo que fiz..

 

<%ConnectString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("db/site/siteusers.mdb")Set conexao = Server.CreateObject("ADODB.Connection")conexao.open ConnectStringpessoas=0set rs = server.CreateObject("ADODB.RecordSet")rs.open "select data from users group by data", conn, 3, 3if not rs.eof thenwhile not rs.eofset pessoasd = conn.execute("select count(data) as tot from users  where data = #"&rs("data")&"#")if pessoasd("tot") > pessoas thendata= rs("data")pessoas=pessoasd("tot")end ifrs.movenextwend %></font><font face="Verdana, Arial" size="1"><img height="16" src="../images/ico_total_pessoas.jpg" width="16" align="absMiddle">				</font><font face="Verdana">Nosso maior numero de cadastros foi <b><%=pessoas%></b> em <b><%=data%></b>.<%end if%>

o que pode estar dando errado...

[salmeida 0]

ja tentoutentou pondo po dia da data no banco de dados Day(now)

[zanelati2002 0]

mais ai como queia ficar isto sera que vai dar certo

[bgssilva 0]

amigos estou tentando fazer um negocio mais ta complicadotipo gostaria de mostrar para meus usuarios o dia e a data que teve maior cadastro dentro do site mais não ta aparecendo nada, olhem o codigo que fiz..

<%ConnectString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("db/site/siteusers.mdb")Set conexao = Server.CreateObject("ADODB.Connection")conexao.open ConnectStringpessoas=0set rs = server.CreateObject("ADODB.RecordSet")rs.open "select data from users group by data", conn, 3, 3if not rs.eof thenwhile not rs.eofset pessoasd = conn.execute("select count(data) as tot from users  where data = #"&rs("data")&"#")if pessoasd("tot") > pessoas thendata= rs("data")pessoas=pessoasd("tot")end ifrs.movenextwend %></font><font face="Verdana, Arial" size="1"><img height="16" src="../images/ico_total_pessoas.jpg" width="16" align="absMiddle">				</font><font face="Verdana">Nosso maior numero de cadastros foi <b><%=pessoas%></b> em <b><%=data%></b>.<%end if%>

o que pode estar dando errado...

faz o seguinte.... vamos por partes... primeiro imprime através do response.write as informações que você precisa pra ver realmente que valores estão sendo atribuidos as suas variaveis... isso sempre me ajuda.faz isso que talvez você se resolva sozinho. http://forum.imasters.com.br/public/style_emoticons/default/joia.gif qq dúvida depois disso fico grato em ajudar.

amigos estou tentando fazer um negocio mais ta complicadotipo gostaria de mostrar para meus usuarios o dia e a data que teve maior cadastro dentro do site mais não ta aparecendo nada, olhem o codigo que fiz..

<%ConnectString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("db/site/siteusers.mdb")Set conexao = Server.CreateObject("ADODB.Connection")conexao.open ConnectStringpessoas=0set rs = server.CreateObject("ADODB.RecordSet")rs.open "select data from users group by data", conn, 3, 3if not rs.eof thenwhile not rs.eofset pessoasd = conn.execute("select count(data) as tot from users  where data = #"&rs("data")&"#")[b]response.write "pessoas: " & pessoas & "<BR>"response.write "pessoasd(tot): " & pessoasd("tot") & "<BR>"response.write "rs(data): " & rs(data) & "<BR>"[/b]if pessoasd("tot") > pessoas thendata= rs("data")pessoas=pessoasd("tot")end ifrs.movenextwend %></font><font face="Verdana, Arial" size="1"><img height="16" src="../images/ico_total_pessoas.jpg" width="16" align="absMiddle">				</font><font face="Verdana">Nosso maior numero de cadastros foi <b><%=pessoas%></b> em <b><%=data%></b>.<%end if%>

o que pode estar dando errado...

faz o seguinte.... vamos por partes... primeiro imprime através do response.write as informações que você precisa pra ver realmente que valores estão sendo atribuidos as suas variaveis... isso sempre me ajuda.faz isso que talvez você se resolva sozinho. http://forum.imasters.com.br/public/style_emoticons/default/joia.gif qq dúvida depois disso fico grato em ajudar.

[zanelati2002 0]

sem eu colocar nada ta mostando assim

 

Nosso maior numero de cadastros foi 0 em Segunda-feira, 8/5/2006 às 17:12:54.

 

e cadastrei dois users já

 

agora com o teu codigo ta dando este erro...

 

 

ainda não deu olha o erro agora

 

Tipo de erro:ADODB.Recordset (0x800A0BB9)Os argumentos são incorretos, estão fora do intervalo aceitável ou estão em conflito./minhas webs/teste2.asp, line 7Tipo de navegador: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1)

[zanelati2002 0]

sera que alguem pode me dar uma forçinha.... para mim neste post

[PedBolo 0]

Zanelati,<%ConnectString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("db/site/siteusers.mdb")Set conexao = Server.CreateObject("ADODB.Connection")conexao.open ConnectStringpessoas=0set rs = server.CreateObject("ADODB.RecordSet")rs.open "SELECT TOP 1 data,Count(data) as total FROM users GROUP BY data ORDER BY total DESC", conn, 3, 3if not rs.eof then%></font><font face="Verdana, Arial" size="1"><img height="16" src="../images/ico_total_pessoas.jpg" width="16" align="absMiddle"> </font><font face="Verdana">Nosso maior numero de cadastros foi <b><%=Rs("Total")%></b> em <b><%=Rs("data")%></b>.<%end if%> somente isso...ateh

[zanelati2002 0]

cara não aparace nada nada mesmo e tem cadstros no db

[Salgado 4]

Como está o formato do campo da DATA? É data mesmo? grava Data e hora ou apenas a data do cadastro?

[zanelati2002 0]

tenho um campo hora e data e os dois estão como textos mais ambos pega a data do cadastro

[PedBolo 0]

se eh texto o codigo que e passei tinha que funcionarpassa seu script como ficou usando akele q te mandei

[zanelati2002 0]

nada ainda

 

<%ConnectString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("login/db/site/siteusers.mdb")Set conexao = Server.CreateObject("ADODB.Connection")conexao.open ConnectStringpessoas=0set rs = server.CreateObject("ADODB.RecordSet")rs.open "SELECT TOP 1 data,Count(data) as total FROM users GROUP BY data ORDER BY total DESC", conn, 3, 3if not rs.eof then%></font><font face="Verdana, Arial" size="1"><img height="16" src="images/ico_total_pessoas.jpg" width="16" align="absMiddle"></font><font face="Verdana">Nosso maior numero de cadastros foi <b><%=Rs("Total")%></b> em <b><%=Rs("data")%></b>.<%end if%>

 

o codigo é só assim

[Salgado 4]

É gravado apenas a DATA mesmo ou você usa o NOW()?

[PedBolo 0]

Acontece que no campo data você grava as horas tb, por isso ele naum soma, a naum ser que uma pessoa tenha cadastrado no mesmo segundo tbveja o que retorna o script a seguir<%Set Conexao = Server.CreateObject("ADODB.Connection")Conexao.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("login/db/site/siteusers.mdb")Set Rs = Server.CreateObject("ADODB.RecordSet")Set Rs = Conexao.Execute("SELECT data,Count(Left(data,10)) as Total FROM users GROUP BY data ORDER BY Total DESC")If Rs.EOF then%>Nenhum Cadastro foi encontrado.<%Else%>Nosso maior numero de cadastros foi <b><%=Rs("Total")%></b> em <b><%=Rs("data")%></b>.<%End If%>

[zanelati2002 0]

gravo assim a data

 

Sql = Sql & "VALUES('" & username & "', '" & senha & "', '" & nome & "', '" & idade & "', '" & cidade & "', '" & sexo & "', '" & estado & "', '" & Request.Form("birth_day") & "/" & Request.Form("birth_month") & "/" & Request.Form("birth_year") & "','"& Time() & "', '" & Request.Form("cad_dia") & "/" & Request.Form("cad_mes") & "/" & Request.Form("cad_ano") & "', '" & email & "', '" & msn & "', '" & site & "', '" & sobre_voce & "', '" & conheceu & "', '" & indicou & "', '" & sendemail & "', '" & foto & "', '" & codigo & "', '" & ip & "')"

 

 

 

com o script acima deu que nenhum cadastro foi encontrado...

[PedBolo 0]

e assim?"SELECT data,Count(Date(CDate(data))) as Total FROM users GROUP BY data ORDER BY Total DESC"tem que ir testando mesmo...

[zanelati2002 0]

tipo veja bem tem o campo data e o campo hora ambos separados

e assim?"SELECT data,Count(Date(CDate(data))) as Total FROM users GROUP BY data ORDER BY Total DESC"tem que ir testando mesmo...

continua dando que não exite nehum regitro

[PedBolo 0]

kra, eh dificil... pq tem q ir fazendo uns testes mesmo...por isso recomendo você imprimir o que tem no campo data"SELECT data FROM users"soh pra gente ver o que retorna o campo dataok?

[zanelati2002 0]

ele apareceu isto Nosso maior numero de cadastros foi em 8/5/2006. que foi realmente

[PedBolo 0]

bom mas naum funcionou pois apenas retornou a data do primeiro cadastro...eu naum sei pq naum estah funcionando, pq esse script q te passei roda legal no mysql, talvez no access seja diferente