Steven Tyler

galera, boa tarde gostaria de saber se alguém pode me ajudar no seguinte.. tenho um sisteminha que faz a estatisticas de visitas em clientes, e nessa estatística, tem a parte percentual... pois bem, nessa parte, sai o resultado em porcentagem, exemplo.... 15,65 ........ 34,54 .............. 21,00 ........... 32,34 beleza, só que as vezes sai assim..... 33,333333333333 ............. 66,6666666666666 ............. e eu gostaria que quando fosse 33,333333333333 saisse 33,33.. entenderam ? eu poderia fazer um esquema de sempre depois da virgula preservar somente os 2 proximos caracteres, mais n sei como fazer, alguém pode me ajudar nisso? Obrigado Ramon

valeu galera, deu certo, eu fiz assim !!!! res_45 = DateDiff( "n", rs_all("hora_saida_pree"), rs_all("hora_pree") ) if cint(res_45) > 45 then EntregueForaCliente = EntregueForaCliente + 1 else EntregueDoCliente = EntregueDoCliente + 1 end if deu certinho, valeu ai !!!

ola passoal !!! gostaria de saber se alguém pode me ajudar...é o seguinte...... tenho uma determinada hora......exemplo..... 15:30:00 e gostaria de saber como que eu faco para comparar uma hora com a outra e tirar uma diferenca !!! exemplo... tenho uma hora..15:30:00 e outra hora.... 16:25:00 a diferenca entre elas é de 55 minutos....como que eu obtenho este valor ? porque tenho que fazer o seguinte, tenho que comparar 0 1° horario com o 2° horario, e se o 2° for 45 minutos maior que o 1°, então faco uma acao, senao faco outra acao !!! alguém pode me ajudar por favor, é muito importante !!! Abraços Ramon

olá pessoal gostaria de saber, um exemplo de como eu pesquisar registros num banco da seguinte maneira... seria por exemplo das 10:00 até 15:06 .... igual data.... de 01/01/2005 até 01/01/2006 SÓ QUE HORÁRIO.... e um script sem problemas, porque os para data normalmente não dão certo algumas vezes. Obrigado Ramon

pessoal, alguém pode me ajudar, é o seguite....... tenho um campo no banco que ele armazena hora, exemplo.. 10:00:00 mais este campo esta no formato text, e sei quem no tipo date eu converto um campo text em data atraves do comando cdate() e no caso de horario, como converter? valeu

andreia, n achei nada la, tem muita coisa, voce pode dar uma forca ai ? é que não consegui achar.. obrigado

galera, to fazendo um esquema ai, de mandar email......gostaria que no conteudo, ou corpo n sei , do email eu dfinisse um negrito, ou italico, ou ate mudar de cor, mais n da p fazer, olhem....... Set msg = Server.CreateObject("CDONTS.NewMail") msg.From = vFrom msg.To="lucas@email.com.br" msg.Subject = "teste" msg.Body = v_Conteudo msg.Send Set msg = Nothing está ai a minha parte de email, reparem no vConteudo...essa variavel tem esse codigo.... v_Conteudo="" v_Conteudo = v_Conteudo + Sel_cha("comentario") & CHR(13) & CHR(10) & CHR(13) & CHR(10) & "CHAMADO DE: " + Sel_usu("username") & ", " & Sel_cli("cliente") & CHR(13) & CHR(10) & "ENVIADO EM: " & Sel_cha("data") & ", " & Sel_cha("hora") & CHR(13) & CHR(10) & "TÍTULO: " & Sel_cha("titulo") & CHR(13) & CHR(10) & "CATEGORIA: " & Sel_cat("categoria") & CHR(13) & CHR(10) & "STATUS: " & Sel_cha("status") & CHR(13) & CHR(10) & CHR(13) & CHR(10) & "" beleza, está tudo funfando, mais a fonte é ssempre a mesma, eu gostaria muito de mudar a cor da letra em determinadas partes do v_conteudo, se eu colocar ali um <b> por exemplo, n resolve, simplismente aparece no email esse <b>, tem algum jeito pessoal? me ajudem por favor...........

preciso fazer paginacao, eu ei fazer normal, so q com resgistros de banco de dados, usando banco de dados, no caso agora gostaria de usar fso, tipo assim...... <% set fs = Server.CreateObject("Scripting.FileSystemObject") set pasta = fs.getFolder(Server.MapPath("arquivos\")) For each file in pasta.Files next %> no caso q consegui fazer paginacao..é com banco...ou seja assim....... <% Set rs = Server.CreateObject("adodb.recordset") rs.open sql_query,conexao,3,3 While not rs.EOF 'AQUI EU FACO A PAGINACAO NUMA BOA wend %> galera, a duvida é q na parte q consigo fazer a paginacao, eu uso objetos como pagesize....absolutepage...etc... agora com fso eu n posso usar isso, tem como eu fazer paginacao usndo dados q são buscados de uma pasta usando fso....?

obrigado andreia, deu certinho, valeu mesmo, pode fechar o tópico o responsavel.

galera n consigo faze uma sintaxe de sql aqui, alguém pode me ajudar...? sql_query = "select * from tbl_nivel where nivel = "&vN1 and " nivel = "&vN2 a ideia é selecionar todos de uma tabela onde o campo nivel q é int seja igual a variavel já q é int também...... n sei o que ta errado, n manjo de sintaxe...alguém pode me ajudar?

maie eu uso, mais uma pagina de logof.... eu digo assim..... o cara sai do sistema sem fazer logof... ele simplismente esta no sistema, e do nada ele no mesmo navegador entra em outro site dai se ele quiser entrar no sistema de novo sem logar ele consegue...porque a session esta viva ainda....entendeu?

alguém me ajude por favor gente...... valeu..é urgente

nossa, na boa, n entendi nada andreia, n sei como eu iria adaptar, n faco nem ideia....... eu sei que preciso de um "for".....mais seila, mt foda..... se alguém puder me ajudar mais...por favor...preciso disso.....

galera, to fazendo um esquema de paginacao.......o resultado dela é esse...... e eu queria fazer tipo assim.... vejam o meu script q esta funcionando perfeitamente fazendo o 1° exemplo la em cima..... sql_query = "select * from tbl_chamado order by id_status,data_last desc, hora_last desc" 'Set rs = conexao.Execute(sql_query) Set rs = Server.CreateObject("adodb.recordset") rs.pagesize= 5 rs.open sql_query,conexao,3,3 if rs.EOF = false then IF Request.QueryString("pagina")="" then intpagina=1 ELSE IF cint(Request.QueryString("pagina"))<1 then intpagina=1 ELSE IF cint(Request.QueryString("pagina"))> RS.PageCount then intpagina=RS.PageCount ELSE intpagina=Request.QueryString("pagina") END IF END IF END IF rs.AbsolutePage = intpagina IntRec=0 While IntRec < rs.PageSize and not rs.EOF if var_cor = "DFE6F0" then var_cor = "E7EDF5" else var_cor = "DFE6F0" end if %> <% 'Vamos verificar se não é a página 1, para podermos colocar o link “anterior”. IF intpagina > 1 then %> <font class="texto">&nbsp;<a class="id_cha" href="index.asp?pagina=<%=intpagina-1%>&id=<%=id%>">Anterior</a> <% END IF 'Se não estivermos no último registro contado, então é mostrado o link p/ a próxima página IF strcomp(intpagina,rs.PageCount) <> 0 then %> <font class="texto">&nbsp;<a class="id_cha" href="index.asp?pagina=<%=intpagina + 1%>&id=<%=id%>">Próxima</a> <% END IF %> então, ta td funcionando....mais o mais correto seria colocar os n° entre o Anterior e Proxima, alguém pode me ajudar pelo amor de deus ?????? Obrigado

galera, eu gostaria de fazer um esquema assim...... na minha página inicial, faco uma busca por todos os registros..... mais se tiver mutos, fica muito grande a página, então gostaria de fazer assim.... se tiver mais que 20 registrros, cria uma outra página, dai teria 2 paginas, se tiver mais que 40, dai teria 3 paginas, seria como no forum aqui mesmo, aquela parte la embaixo la do.. Página(s) 1 2 3 só que não sei por onde comecar, alguém pode me passar um link de como fazer isso de um modo rapido e facil? valeu

me desculpe, mais n entendi isso de "setar o cursor"....... eu sei a logica doq você ta falando...mais n sei fazer, você pode me ajudar, ou alguém?

então, eu fiz isso, mais dai aparece q o recordcount = -1, sendo que acha 4 registros na pesquisa....olhem o código.... sql_query = "select * from tbl_chamado where 1=1" if vCat <> "" then sql_query = sql_query & " AND id_categoria LIKE " & vCat end if if vTit <> "" then sql_query = sql_query & " AND Ucase(titulo) LIKE '%" & Ucase(vTit) & "%'" end if if vStatus <> "" then sql_query = sql_query & " AND Ucase(status) LIKE '" & Ucase(vStatus) & "'" end if sql_query = sql_query & " order by data_last desc, hora_last desc" Set rs_all = conexao.Execute(sql_query) dai depois eu faco a parte do loop e tal, e depois eu mostro a mensagem......... Foram encontrados <b><%=rs_all.recordcount%></b> registro(s) dai aparece "-1", sendo que acha 4 registros, o que sera q aconteceu?

galera, eu gostaria de sabr, qual é o comando em asp, pare saber qnts registros foram encontrados em uma query... tipo.."foram encontrados<%='codigo q n sei'%> registros alguém sabe?

por favor , alguém ajuda......é igual testar um text...request.form(text) <> "" só q com checkbox, como q faz?

a lógica eu sei, mais n sei a sintaxe.... é o seguinte, tanto faz se na pagina do formulario esteja iniciando checked ou n o checkbox..... o importante é saber se na outra página esta habilidato ou n o checkbox, só isso

galera, tenho uma duvida.... numa pagina tem um formulario com 1 checkbox que comeca checked, com value= "1".... dai na proxima pagina n ta dando certo o teste, alguém pode me explicar como que eu faco um teste..... com a seguinte logica...... na pagina do form tem 1 checkbox q já ta checked, dai na proxima pagina ele executa um codigo se o checkbox estiver selecionado, se n tiver, ele n executa...alguém pode me dar um exemplo?

tipo, não vai n tem o que fazer........ te hora q vai do nada e errado as datas, parece q tipo assim numeros: 5 é maior que 1 data: 02/02/2006 é maior que 01/01/2006 mais parece q com a data não ta conseguindo fazer esse comparativo de maior e menos, eu n sei o que fazer mais !!!!! se alguém tem alguma ideia..por favor ajuem...

ta assim: select * from tbl_chamado where id_categoria LIKE 1 and titulo LIKE 'titulo teste' and status LIKE 'novo' and data >= 1/1/2006 and data <= 1/4/2006 order by data,hora desc

é tipo data....... n aparece erro simplismente n axa registro

infelizmente n da certo, desisto..... olha vou te passar o codigo, n tem nada errado.... na pagina pesq_dados tem esse codigo.... <meta http-equiv='refresh' content='3; url=res_pesq.asp?id=<%=vUsuLogin%>&cat=<%=vCat%>&tit=<%=vTit%>&status=<%=vStatus%>&dataini=<%=vDataIni%>&datafin=<%=vDataFin%>'/> dai envia os paramentros para a pagina "res_pesq.asp"..nessa pagina ta assim.... <% vCat = request.querystring("cat") vTit = request.querystring("tit") vStatus = request.querystring("status") vDataIni = request.querystring("dataini") vDataFin = request.querystring("datafin") if vCat <> "" and vTit <> "" and vStatus <> "" and vDataIni <> "" and vDataFin <> "" then sql_query = "select * from tbl_chamado where id_categoria LIKE "&vCat&" and titulo LIKE '"&vTit&"' and status LIKE '"&vStatus&"' and data BETWEEN "&Cdate(vDataIni)&" AND "&Cdate(vDataFin)&" order by data,hora desc" Set rs_all = conexao.Execute(sql_query) if rs_all.EOF = false then do until rs_all.EOF 'executa os codigos rs_all.movenext loop end if end if %> simplismente n o rs_all dica EOF, dai ele n vai executar os codigos q desejo, sendo q ta td certo o que eu digito la nos campos, identico ao do bd OBS: se eu tirar essa parte de datas de comparar as datas, dai da certo, mais é na data q o bicho pega, n da certo, n sei o que fazer, por favor alguém me ajude...valeu..