Ir para conteúdo
Fórum Script Brasil

Steven Tyler

Membros
  • Total de itens

    185
  • Registro em

  • Última visita

Posts postados por Steven Tyler

  1. 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

  2. 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 !!!

  3. 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

  4. 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

  5. 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

  6. 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...........

  7. 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....?

  8. 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?

  9. 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?

  10. 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.....

  11. galera, to fazendo um esquema de paginacao.......o resultado dela é esse......

    Anterior      Próximo

    e eu queria fazer tipo assim....

    Anterior      1 2 3 4 5        Proximo

    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

  12. 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

  13. 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?

  14. 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?

  15. 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

  16. 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?

  17. 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...

  18. 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..

×
×
  • Criar Novo...