Ir ao conteúdo
  • Cadastre-se

Jessi1412

Membro Júnior
  • Posts

    15
  • Cadastrado em

  • Última visita

  1. Boa Tarde, Tenho o seguinte codigo, nele tem uma tabela com os campo (Codigo., Id, 1, 2, 3...) Preciso prencher toda essa tabela usando os ifs de compraçao para aparecer as bolinhas de acordo com sua data. Como posso fazer isso. A unica coisa que me disseram é que preciso fazer uma funçao para isso. Obs: Desculpe novamente a má explicação é que nunca trabalhei com asp e estou começando agora em programação. Desde ja grata <!DOCTYPE html><html><head><meta charset="UTF-8"><link rel="stylesheet" type="text/css" href="estilo/estilo.css"><meta name="viewport" content="width=device-width, initial-scale=1.0"><title>Lembretes Online</title></head><%'Conectar no banco de dados'Set Conecta=Server.CreateObject("ADODB.Connection") Conecta.Provider = "44444" Conecta.Properties("Data Source").value = "" Conecta.Properties("Initial Catalog").value = "" Conecta.Properties("User Id").value = "1111" Conecta.Properties("Password").value = "11111" Conecta.Open%><body><div class="corpo"> <div class="topo"> <div class="topo logo"> <table width="100%" border="0" cellspacing="1" cellpadding="1" class="tabela"> <tr> <td><img src=""></td> <td> </td> <td> <table width="100%" border="0" cellspacing="2" cellpadding="1" class="tabela"> <tr> <td> <div align="right"><font size="1"><a href="">Log Out (Sair)</a> | <a href="">Pendências</a></font></div> </td> </tr> </table> </td> </tr> <tr> <td> </td> <td> </td> </tr> </table> </div> </div> <div class="corpo_tabela"> <table class="table table-responsive" border="1"> <thead> <tr> <th style="text-align: center;" class="texto" >Codigo</th> <th style="text-align: center;" class="texto">Descrição</th> <th style="text-align: center;" class="texto">1</th> <th style="text-align: center;" class="texto">2</th> <th style="text-align: center;" class="texto">3</th> <th style="text-align: center;" class="texto">4</th> <th style="text-align: center;" class="texto">5</th> <th style="text-align: center;" class="texto">6</th> </tr> </thead> <% Set RS=CreateObject("ADODB.Recordset") SQL="SELECT DadosBasicos.id,dataprevista, dataprevista1, dataprevista2, dataprevista3, dataprevista4, dataprevista5, dataprevista6, datasaida, datasaida1, datasaida2 FROM DadosBasicos inner join eng_mac on DadosBasicos.id=carga.id WHERE CARGA.fot>='01/01/2014' AND CARGA.fot<='12/30/2015' order by CARGAENG.fotfabrica " RS.Open SQL, conecta, 1,1While Not RS.EOF If RS("id") <> "" Then Response.Write "<tbody> " Response.Write "<tr> " Response.Write "<td>" Response.Write (RS("id")) Response.Write "</td> " Response.Write "<td>Teste 1</td>" If RS("datasaida") <> "" Then 'If isNull(datasaida) Then 'se nao for null a data entra a bolinha verde' Response.Write "<td>" Response.Write "<div class='circulo_verde'><img src='imagens/bolaverde.png'></div> " Response.Write "<div class='descricao'>Passa o mouse e aparece o que conteudo da div, porém essa div</div>" Response.Write "</td>" 'elseif cdate(dataprevista) <= date() then Elseif RS("dataprevista") >= Date Then ' Verifica se a data prevista esta menor que a data de saida Response.Write "<td>" Response.Write "<div class='circulo_amarelo'><img src='imagens/bolaamarela.png'></div> " Response.Write "<div class='descricao'>Passa o mouse e aparece o que conteudo da div, porém essa div</div>" Response.Write "</td>" 'elseif cdate(dataprevista) > date() then Elseif RS("dataprevista") < DATE Then ' Verifica se a data passou do prazo Response.Write "<td>" Response.Write "<div class='circulo_vermelho'><img src='imagens/bolavermelho.png'></div>" Response.Write "<div class='descricao'>Passa o mouse e aparece o que conteudo da div, porém essa div precisa ter o tamanho da tela do usuario</div>" Response.Write "</td>" Else Response.Write "<td>" Response.Write "<p>Data de previsao vazia</p>" Response.Write "</td>" END IF Response.Write "</tr> " Response.Write "</tbody> " Else Response.Write "Nada encontrado" Response.Write "<br>" End If RS.MoveNext Wend rs.close set rs=nothing conecta.close set conecta = nothing %>
  2. Ola, Obrigado a todos problema resolvido. @Mog.Lucas usei o seu codigo só precisei fazer umas adaptaçoes no meu banco de dados e nessa linha de comando if IsDate(datasaida) then//Ficou assimIf RS("datasaida") <> "" Then
  3. Ai eu li sim, obrigado. O codigo sem indentaçao fica ruim mesmo desculpa. While Not RS.EOF If RS("id") <> "" Then Response.Write "<tbody> " Response.Write "<tr> " Response.Write "<td>" Response.Write (RS("id")) Response.Write "</td> " Response.Write "<td>Teste 1</td>" Response.Write "<td>" If Not isNull(datasaida) Then 'se nao for null a data entra a bolinha verde' Response.Write "<div class='circulo_verde'><img src='imagens/bolaverde.png'></div> " Response.Write "<div class='descricao'>Passa o mouse e aparece o que conteudo da div, porém essa div</div>" If dataprevista <= datasaida () Then ' Verifica se a data prevista esta menor que a data de saida Response.Write "<div class='circulo_amarelo'><img src='imagens/bolaamarela.png'></div> " Response.Write "<div class='descricao'>Passa o mouse e aparece o que conteudo da div, porém essa div</div>" Elseif dataprevista > datasaida() Then ' Verifica se a data passou do prazo Response.Write "<div class='circulo_vermelho'><img src='imagens/bolavermelho.png'></div>" Response.Write "<div class='descricao'>Passa o mouse e aparece o que conteudo da div, porém essa div precisa ter o tamanho da tela do usuario</div>" Else Response.Write "Não satisfez ND Erro...." END IF Else ' Caso a data seja nula ' Response.Write "Data encontra-se vazia" Response.Write "</td>" Response.Write "<tr> " Response.Write "</tbody> " End If Else Response.Write "Nada encontrado" Response.Write "<br>"End If RS.MoveNext Wend rs.close set rs=nothing conecta.close set conecta = nothing
  4. Olá @Mog.Lucas. Ve se fica melhor de entender com o codigo que tenho. Em alguns casos a datasaida nao esta preenchida, pois a mesma só pode ser preenchida quando terminou o trabalho, logo nao sei com comprar a dataprevista com a datasaida. While Not RS.EOFIf RS("id") <> "" Then Response.Write "<tbody> " Response.Write "<tr> " Response.Write "<td>" Response.Write (RS("id")) Response.Write "</td> " Response.Write "<td>Teste 1</td>" Response.Write "<td>" If Not isNull(datasaida) Then Response.Write "<div class='circulo_verde'><img src='imagens/bolaverde.png'></div> " Response.Write "<div class='descricao'>Passa o mouse e aparece o que conteudo da div, porém essa div</div>" If dataprevista <= datasaida () Then Response.Write "<div class='circulo_amarelo'><img src='imagens/bolaamarela.png'></div> " Response.Write "<div class='descricao'>Passa o mouse e aparece o que conteudo da div, porém essa div</div>" Elseif dataprevista > datasaida() Then Response.Write "<div class='circulo_vermelho'><img src='imagens/bolavermelho.png'></div>" Response.Write "<div class='descricao'>Passa o mouse e aparece o que conteudo da div, porém essa div precisa ter o tamanho da tela do usuario</div>" Else Response.Write "Não satisfez ND Erro...."END IF Else ' Caso a data seja nula ' Response.Write "Data encontra-se vazia" Response.Write "</td>" Response.Write "<tr> " Response.Write "</tbody> " End If Else Response.Write "Nada encontrado" Response.Write "<br>" End If RS.MoveNext Wend rs.close set rs=nothing conecta.close set conecta = nothing
  5. Bom dia, Não deu certo porque tenho algumas datas vazias, Alguem tem ideia do que posso tentar fazer? Obs: Minhas datas vem do banco de dados. Desde já grata.
  6. Bom dia, Galera Novamente estou com dificuldades com asp . Seguinte tenho 3 'regras' Verde = Finalizado Vermelho = em atraso amarelo = pendente Preciso criar uma logica para que Quando Data for diferente de null entra no if; Ai compara se data de saida esta preenchida status verde se a data prevista de entrega esta no prazo status amarelo se a data prevista de entrega passou do prazo vermelho porém nao tenho ideia de como fazer isso.
  7. Obrigado, segui o exeplo e deu certo só precisou de alguns ajustes
  8. Bom Dia. Galera estou precisando muito da ajuda de vocês.Pois não faço ideia de como fazer isso. Preciso criar uma tabela vinda do banco de dados dinamicamente, usando ASP. Acredito que vou precisar criar um while para toda vezes que tiver um id ele criar outra linha de tabela na tela do usuario.
  9. Bom dia, @Mog.Lucas e @dif então os dois resolveria o meu problema, porém nenhum funciona no internet explore. E preciso que funcione nesse navegador, se alguem poder me ajudar fico grata.
  10. Boa Tarde. tenho o seguinte codigo <div class="corpo"> <div class="corpo_tabela"> <table border="1" style="width:100%"> <tr> <td>Registro</td> <td>Descriçao</td> <td>Estado</td> </tr> <tr> <td>1111111</td> <td>Tetjskkdkskjdskjsdhkjsdhj</td> <td> <div class="circulo_verde"> <div class="descricao">Passa o mouse e aparece o que conteudo da div, porem essa div precisa ter o tamanho da tela do usuario</div> </div> </td> </tr> </table> </div> </div> @charset "utf-8"; *{font-family:Tahoma, Arial, Verdana, Helvetica, sans-serif; font-size:14px; margin:0; padding:0;} .corpo { /*background-color:blue; min-width:1024px; min-width:1024px; border-style: solid; border-color: #CFCFCF;*/ width:100%; height:100%; text-align: center; position: relative; } .circulo_verde, .circulo_amarelo, .circulo_vermelho{ border-radius: 100%; width: 20px; height: 20px; margin: auto; } .circulo_verde{ background-color:#32CD32; } .circulo_amarelo{ background-color:#FFD700; } .circulo_vermelho{ background-color:#FF0000; } .conteudo{ background-color:#191970; } .descricao{ background-color:blue; display: none; } .circulo_verde:hover .descricao{ display: block; } Na segunda linha da coluna chamada estado, tenho uma div em verde, quando passo o mouse aparece outra div, porém preciso que essa div que aparecer fique do tamanho da tela do usuario, como posso fazer isso? Obs: Precisa funcionar em todos os navegadores.
  11. Gostaria de saber, como poderia fazer o download de modo simples desse template: http://www.bootstrapzero.com/bootstrap-template/responsivedashboard Quando clico em download, eu tenho que ir por um lado muito trabalhoso, e o index.html possui alguns includes que não acompanharam o .zip baixado. Alguém poderia me ajudar a conseguir baixar e deixar da mesma forma que o "Live Preview" ? Obrigado.

Sobre o Clube do Hardware

No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas comunidades sobre tecnologia do Brasil. Leia mais

Direitos autorais

Não permitimos a cópia ou reprodução do conteúdo do nosso site, fórum, newsletters e redes sociais, mesmo citando-se a fonte. Leia mais

×
×
  • Criar novo...