Ir para conteúdo
Fórum Script Brasil

Legionáriors

Membros
  • Total de itens

    158
  • Registro em

  • Última visita

Sobre Legionáriors

  • Data de Nascimento 05/02/1980

Contatos

  • MSN
    peres_sens@hotmail.com

Perfil

  • Gender
    Male
  • Location
    Ararangua / SC

Últimos Visitantes

1.723 visualizações

Legionáriors's Achievements

0

Reputação

  1. Legionáriors

    Erro na busca

    Boa tarde pessoal, Será que alguém pode me dar uma luz sobre isso? Vou postar o código mas acontece o seguinte: Mesmo com os itens configurados para não serem mostrados ele continua mostrando mas somente quando faço a pesquisa. Tem outros modos de listar todos os itens estes funcionam perfeitamente mas na pesquisa acontece isso. Se alguém poder ajudar agradeço. <% Dim col,colu,lista,cid_id,cid_nome,nome,lista_anunciante,msgnada lista=Request.querystring("lista") cid_id=Request.querystring("cid_id") cid_nome=Request.querystring("cid_nome") nome=Request.querystring("nome") %> <div class="site-section bg-light"> <div class="container"> <div class="row justify-content-center mb-5"> <div class="col-md-7 text-center border-primary"> <h3><font color="green">Anunciantes Ativos</font></h3> </div> </div> <div class="row"> <% Select Case lista Case "cidade" set lista_anunciante = lojaDB.Execute("SELECT * FROM anunciantes WHERE cid_id="& cid_id &" AND disp='S' ORDER BY nome") msgnada = "<h5>No momento não dispomos de nenhum comércio nesta região.</h5>" Case "busca" set lista_anunciante = lojaDB.Execute("SELECT * FROM anunciantes WHERE nome LIKE '%"& nome &"%' OR descricaop LIKE '%"& nome &"%' OR descricaog LIKE '%"& nome &"%' OR imagem LIKE '%"& nome &"%' OR imagem2 LIKE '%"& nome &"%' OR imagem3 LIKE '%"& nome &"%' OR imagem4 LIKE '%"& nome &"%' OR imagem5 LIKE '%"& nome &"%' OR imagem6 LIKE '%"& nome &"%' OR imagem7 LIKE '%"& nome &"%' OR imagem8 LIKE '%"& nome &"%' OR imagem9 LIKE '%"& nome &"%' OR imagem10 LIKE '%"& nome &"%' AND disp='S' ORDER BY nome") msgnada = "<h5>Nenhum comércio localizado com esse nome.</h5>" Case Else %> <script>window.location="./index.asp"</script> <% End Select If lista_anunciante.EOF Then Response.Write "" & msgnada & "" Else %> <% col=1 if not lista_anunciante.eof then colu=2 response.write "" while not lista_anunciante.eof Dim com_cid_id,com_id,com_nome,com_descricaop,com_imagem,com_data,com_mapalink,com_whats while not lista_anunciante.EOF com_cid_id = lista_anunciante("cid_id") com_id = lista_anunciante("id") com_nome = lista_anunciante("nome") com_descricaop = lista_anunciante("descricaop") com_imagem = lista_anunciante("imagem") com_data = lista_anunciante("data") com_mapalink = lista_anunciante("mapalink") com_whats = lista_anunciante("whats") %> <div class="col-md-6 mb-4 mb-lg-4 col-lg-4"> <div class="listing-item"> <div class="listing-image"> <img src="images/<%=com_imagem%>" alt="<%=com_nome%>" class="img-fluid"> </div> <div class="listing-item-content"> <a href="<%=com_mapalink%>" class="bookmark" data-toggle="tooltip" data-placement="left" title="Localização" target="new"><span class="icon-map"></span></a> <h2><a href="http://api.whatsapp.com/send?1=pt_BR&phone=<%=com_whats%>" style="position:absolute; top:-30px;" class="bookmark" target="new"><span class="icon-whatsapp"></span></a></h2> <h2 class="mb-1"><a href="detalheanunciante.asp?com_id=<%=com_id%>&url_comp=<%=Server.UrlEncode(Request.ServerVariables("QUERY_STRING"))%>"><%=left(com_nome ,23) %>...</a></h2> <span class="address"><%=com_descricaop%></span> </div> </div> </div> <% if colu=col then response.write "<tr><td>" colu=1 else response.write "<td>" colu=colu+1 end if lista_anunciante.movenext wend wend response.write "" end if end if lista_anunciante.close set lista_anunciante=nothing %> </div> </div> </div>
  2. Legionáriors

    Mostra Imagem

    Boa noite pessoal, Vou postar o código inteiro da página quem sabe alguém me ajuda... abraço!!! <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd"> <html xmlns="http://www.w3.org/1999/xhtml"> <% Dim veic_id,veic_nome,veic_tipocambio,veic_tipocombustivel,veic_placa,veic_km,veic_tipomarca,veic_tipoportas,veic_tipocabine,veic_tiposuspensao,veic_tipotracao,veic_comp_valor,veic_obs,veic_anofabricacao,veic_anomodelo,veic_cor,veic_preco,veic_img_01,veic_img_02,veic_img_03,veic_img_04,veic_img_05,veic_img_06,veic_img_07,veic_img_08,veic_img_09,veic_img_10,veic_img_11,veic_img_12,veic_img_13,veic_img_14,veic_img_15,veic_airbag,veic_airbagduplo,veic_alarme,veic_arcondicionado,veic_arquente,veic_bagageiro,veic_bancoseletricos,veic_bancosdecouro,veic_blindado,veic_cameradere,veic_cdplayer,veic_computadordebordo,veic_contagiros,veic_desembacador,veic_direcaohidraulica,veic_disqueteira,veic_faroldeneblina,veic_freiosabs,veic_freiosadisco,veic_interface,veic_kitmultimidia,veic_limpadortraseiro,veic_lonamaritima,veic_mp3player,veic_partidaeletrica,veic_pilotoautomatico,veic_protetordecacamba,veic_radio,veic_retrovisoreseletricos,veic_rodasdeligaleve,veic_sensordechuva,veic_sensordeestacionamento,veic_tetosolar,veic_travaseletricas,veic_turbo,veic_vidroseletricos,veic_vidrosverdes,veic_volanteregulaaltura,veic_deficiente,veic_interclima,veic_intercooler,veic_rodoar,veic_sofacama,veic_detalhe,url_comp veic_id = Request.querystring("veic_id") url_comp = Server.UrlEncode(Request.querystring("url_comp")) set veic_detalhe = lojaDB.Execute("SELECT * FROM veiculos WHERE id="& veic_id &" AND disp='S'") veic_nome = veic_detalhe("nome") veic_anofabricacao = veic_detalhe("anofabricacao") veic_anomodelo = veic_detalhe("anomodelo") veic_cor = veic_detalhe("cor") veic_tipocambio = veic_detalhe("tipocambio") veic_tipocombustivel = veic_detalhe("tipocombustivel") veic_placa = veic_detalhe("placa") veic_km = veic_detalhe("km") veic_tipomarca = veic_detalhe("tipomarca") veic_tipoportas = veic_detalhe("tipoportas") veic_tipocabine = veic_detalhe("tipocabine") veic_tiposuspensao = veic_detalhe("tiposuspensao") veic_tipotracao = veic_detalhe("tipotracao") veic_comp_valor = veic_detalhe("comp_valor") veic_obs = veic_detalhe("obs") veic_preco = veic_detalhe("preco") veic_img_01 = veic_detalhe("img_01") veic_img_02 = veic_detalhe("img_02") veic_img_03 = veic_detalhe("img_03") veic_img_04 = veic_detalhe("img_04") veic_img_05 = veic_detalhe("img_05") veic_img_06 = veic_detalhe("img_06") veic_img_07 = veic_detalhe("img_07") veic_img_08 = veic_detalhe("img_08") veic_img_09 = veic_detalhe("img_09") veic_img_10 = veic_detalhe("img_10") veic_img_11 = veic_detalhe("img_11") veic_img_12 = veic_detalhe("img_12") veic_img_13 = veic_detalhe("img_13") veic_img_14 = veic_detalhe("img_14") veic_img_15 = veic_detalhe("img_15") veic_airbag = veic_detalhe("airbag") veic_airbagduplo = veic_detalhe("airbagduplo") veic_alarme = veic_detalhe("alarme") veic_arcondicionado = veic_detalhe("arcondicionado") veic_arquente = veic_detalhe("arquente") veic_bagageiro = veic_detalhe("bagageiro") veic_bancoseletricos = veic_detalhe("bancoseletricos") veic_bancosdecouro = veic_detalhe("bancosdecouro") veic_blindado = veic_detalhe("blindado") veic_cameradere = veic_detalhe("cameradere") veic_cdplayer = veic_detalhe("cdplayer") veic_computadordebordo = veic_detalhe("computadordebordo") veic_contagiros = veic_detalhe("contagiros") veic_desembacador = veic_detalhe("desembacador") veic_direcaohidraulica = veic_detalhe("direcaohidraulica") veic_disqueteira = veic_detalhe("disqueteira") veic_faroldeneblina = veic_detalhe("faroldeneblina") veic_freiosabs = veic_detalhe("freiosabs") veic_freiosadisco = veic_detalhe("freiosadisco") veic_interface = veic_detalhe("interface") veic_kitmultimidia = veic_detalhe("kitmultimidia") veic_limpadortraseiro = veic_detalhe("limpadortraseiro") veic_lonamaritima = veic_detalhe("lonamaritima") veic_mp3player = veic_detalhe("mp3player") veic_partidaeletrica = veic_detalhe("partidaeletrica") veic_pilotoautomatico = veic_detalhe("pilotoautomatico") veic_protetordecacamba = veic_detalhe("protetordecacamba") veic_radio = veic_detalhe("radio") veic_retrovisoreseletricos = veic_detalhe("retrovisoreseletricos") veic_rodasdeligaleve = veic_detalhe("rodasdeligaleve") veic_sensordechuva = veic_detalhe("sensordechuva") veic_sensordeestacionamento = veic_detalhe("sensordeestacionamento") veic_tetosolar = veic_detalhe("tetosolar") veic_travaseletricas = veic_detalhe("travaseletricas") veic_turbo = veic_detalhe("turbo") veic_vidroseletricos = veic_detalhe("vidroseletricos") veic_vidrosverdes = veic_detalhe("vidrosverdes") veic_volanteregulaaltura = veic_detalhe("volanteregulaaltura") veic_deficiente = veic_detalhe("deficiente") veic_interclima = veic_detalhe("interclima") veic_intercooler = veic_detalhe("intercooler") veic_rodoar = veic_detalhe("rodoar") veic_sofacama = veic_detalhe("sofacama") veic_detalhe.Close set veic_detalhe = Nothing %> <!-- main --> <div id="main2"> <div id="intro2"> <h2><font color=red><%=veic_nome%></font> - <a href="<%=Request.ServerVariables("HTTP_REFERER")%>">Voltar</a></h2> </div> <!-- bits --> <div id="bits"> <div class="bit"> <div class="photo"> <img src="./images/<%=veic_img_01%>" width=680 title="<%=veic_nome%>" /> </div> <p><b>Opcionais e Observações:</b></p> <div class="bit last2"> <%If veic_airbag="Air Bag, " Then Response.Write "Air Bag, " End If%> <%If veic_airbagduplo="Air Bag Duplo, " Then Response.Write "Air Bag Duplo, " End If%> <%If veic_alarme="Alarme, " Then Response.Write "Alarme, " End If%> <%If veic_arcondicionado="Ar Condicionado, " Then Response.Write "Ar Condicionado, " End If%> <%If veic_arquente="Ar Quente, " Then Response.Write "Ar Quente, " End If%> <%If veic_bagageiro="Bagageiro, " Then Response.Write "Bagageiro, " End If%> <%If veic_bancoseletricos="Bancos Elétricos, " Then Response.Write "Bancos Elétricos, " End If%> <%If veic_bancosdecouro="Bancos de Couro, " Then Response.Write "Bancos de Couro, " End If%> <%If veic_blindado="Blindado, " Then Response.Write "Blindado, " End If%> <%If veic_cameradere="Camera de Ré, " Then Response.Write "Camera de Ré, " End If%> <%If veic_cdplayer="CD Player, " Then Response.Write "CD Player, " End If%> <%If veic_computadordebordo="Computador de Bordo, " Then Response.Write "Computador de Bordo, " End If%> <%If veic_contagiros="Contagiros, " Then Response.Write "Contagiros, " End If%> <%If veic_desembacador="Desembaçador, " Then Response.Write "Desembaçador, " End If%> <%If veic_direcaohidraulica="Direcão Hidráulica, " Then Response.Write "Direcão Hidráulica, " End If%> <%If veic_disqueteira="Disqueteira, " Then Response.Write "Disqueteira, " End If%> <%If veic_faroldeneblina="Farol de Neblina, " Then Response.Write "Farol de Neblina, " End If%> <%If veic_freiosabs="Freios ABS, " Then Response.Write "Freios ABS, " End If%> <%If veic_freiosadisco="Freios a Disco, " Then Response.Write "Freios a Disco, " End If%> <%If veic_interface="Interface, " Then Response.Write "Interface, " End If%> <%If veic_kitmultimidia="Kit Multimidia, " Then Response.Write "Kit Multimidia, " End If%> <%If veic_limpadortraseiro="Limpador Traseiro, " Then Response.Write "Limpador Traseiro, " End If%> <%If veic_lonamaritima="Lona Marítima, " Then Response.Write "Lona Marítima, " End If%> <%If veic_mp3player="MP3 Player, " Then Response.Write "MP3 Player, " End If%> <%If veic_partidaeletrica="Partida Elétrica, " Then Response.Write "Partida Elétrica, " End If%> <%If veic_pilotoautomatico="Piloto Automático, " Then Response.Write "Piloto Automático, " End If%> <%If veic_protetordecacamba="Protetor de Caçamba, " Then Response.Write "Protetor de Caçamba, " End If%> <%If veic_radio="Rádio, " Then Response.Write "Rádio, " End If%> <%If veic_retrovisoreseletricos="Retrovisores Elétricos, " Then Response.Write "Retrovisores Elétricos, " End If%> <%If veic_rodasdeligaleve="Rodas de Liga Leve, " Then Response.Write "Rodas de Liga Leve, " End If%> <%If veic_sensordechuva="Sensor de Chuva, " Then Response.Write "Sensor de Chuva, " End If%> <%If veic_sensordeestacionamento="Sensor de Estacionamento, " Then Response.Write "Sensor de Estacionamento, " End If%> <%If veic_tetosolar="Teto Solar, " Then Response.Write "Teto Solar, " End If%> <%If veic_travaseletricas="Travas Elétricas, " Then Response.Write "Travas Elétricas, " End If%> <%If veic_turbo="Turbo, " Then Response.Write "Turbo, " End If%> <%If veic_vidroseletricos="Vidros Elétricos, " Then Response.Write "Vidros Elétricos, " End If%> <%If veic_vidrosverdes="Vidros Verdes, " Then Response.Write "Vidros Verdes, " End If%> <%If veic_volanteregulaaltura="Volante c/ Reg. de Altura, " Then Response.Write "Volante c/ Reg. de Altura, " End If%> <%If veic_deficiente="Adapt. para Deficiente, " Then Response.Write "Adapt. para Deficiente, " End If%> <%If veic_interclima="Inter Clima, " Then Response.Write "Inter Clima, " End If%> <%If veic_intercooler="Inter Cooler, " Then Response.Write "Inter Cooler, " End If%> <%If veic_rodoar="Rodoar, " Then Response.Write "Rodoar, " End If%> <%If veic_sofacama="Sofa-cama, " Then Response.Write "Sofa-cama, " End If%> <br><br><br> Obs.: <%=veic_obs%> </div> </div> <div class="clear"></div> </div> <!-- /bits --> </div> <!-- /main --> <!-- side --> <% Dim lista_veiculos,malha1,temp1,lista_categoria,lista,cat_id,lista_fabricacoes,anofabricacao,lista_modelos,anomodelo,lista_cambios,tipocambio,lista_combustiveis,tipocombustivel,lista_marcas,tipomarca,lista_porta,tipoportas,lista_cabines,tipocabine,lista_suspensoes,tiposuspensao,lista_tracoes,tipotracao set lista_veiculos = lojaDB.Execute("SELECT * FROM veiculos WHERE id="& veic_id &" AND disp='S'") If Not (lista = "nao") Then %> <% While not lista_veiculos.EOF set lista_marcas = lojaDB.Execute("SELECT nome FROM marca WHERE id=" & lista_veiculos("tipomarca")) set lista_cabine = lojaDB.Execute("SELECT nome FROM cabine WHERE id=" & lista_veiculos("tipocabine")) set lista_fabricacoes = lojaDB.Execute("SELECT nome FROM fabricacao WHERE id=" & lista_veiculos("anofabricacao")) set lista_modelos = lojaDB.Execute("SELECT nome FROM modelo WHERE id=" & lista_veiculos("anomodelo")) set lista_cambios = lojaDB.Execute("SELECT nome FROM cambio WHERE id=" & lista_veiculos("tipocambio")) set lista_combustiveis = lojaDB.Execute("SELECT nome FROM combustivel WHERE id=" & lista_veiculos("tipocombustivel")) set lista_porta = lojaDB.Execute("SELECT nome FROM portas WHERE id=" & lista_veiculos("tipoportas")) set lista_suspensoes = lojaDB.Execute("SELECT nome FROM suspensao WHERE id=" & lista_veiculos("tiposuspensao")) set lista_tracoes = lojaDB.Execute("SELECT nome FROM tracao WHERE id=" & lista_veiculos("tipotracao")) %> <div id="side"> <h2>Mais Informações</h2> <div class="news"> <h3>Preço:</h3> <p><font size="5" color="red"><b><%If lista_veiculos("preco")>"R$ 0.00" Then Response.Write lista_veiculos("preco") End If%><%If lista_veiculos("preco")="R$ 0.00" Then Response.Write "(48)3522-1122" End If%></b></font></p> <h3><%=veic_comp_valor%></h3> </div> <div class="news"> <h3>Dados:</h3> <p>Marca: <% If lista_marcas.EOF Then %> <font color=red><font size=1><b>Sem Informação</b></font></font> <% Else Response.Write lista_marcas("nome") End If %> <br> Fabricação/Modelo: <% If lista_fabricacoes.EOF Then %> <font color=red><font size=1><b>Sem Informação</b></font></font> <% Else Response.Write lista_fabricacoes("nome") End If %> / <% If lista_modelos.EOF Then %> <font color=red><font size=1><b>Sem Informação</b></font></font> <% Else Response.Write lista_modelos("nome") End If %> <br> Câmbio: <% If lista_cambios.EOF Then %> <font color=red><font size=1><b>Sem Informação</b></font></font> <% Else Response.Write lista_cambios("nome") End If %> <br> Combustível: <% If lista_combustiveis.EOF Then %> <font color=red><font size=1><b>Sem Informação</b></font></font> <% Else Response.Write lista_combustiveis("nome") End If %> <br> Portas: <% If lista_porta.EOF Then %> <font color=red><font size=1><b>Sem Informação</b></font></font> <% Else Response.Write lista_porta("nome") End If %> <br> Suspensão: <% If lista_suspensoes.EOF Then %> <font color=red><font size=1><b>Sem Informação</b></font></font> <% Else Response.Write lista_suspensoes("nome") End If %> <br> Tração: <% If lista_tracoes.EOF Then %> <font color=red><font size=1><b>Sem Informação</b></font></font> <% Else Response.Write lista_tracoes("nome") End If %> <br> Cabine: <% If lista_cabine.EOF Then %> <font color=red><font size=1><b>Sem Informação</b></font></font> <% Else Response.Write lista_cabine("nome") End If %> <br> Cor: <%=veic_cor%> <br> Placa: <%=veic_placa%> <br> Km: <%=veic_km%> </p> </div> <div class="news"> <h3>Mais fotos:</h3> <p> <a href="./images/<%=veic_img_01%>" rel="lightbox[roadtrip]" title="<%=veic_nome%>"><img src="./images/<%=veic_img_01%>" width=71 height=40 title="<%=veic_nome%>" /></a> <a href="./images/<%=veic_img_02%>" rel="lightbox[roadtrip]" title="<%=veic_nome%>"><img src="./images/<%=veic_img_02%>" width=71 height=40 title="<%=veic_nome%>" /></a> <a href="./images/<%=veic_img_03%>" rel="lightbox[roadtrip]" title="<%=veic_nome%>"><img src="./images/<%=veic_img_03%>" width=71 height=40 title="<%=veic_nome%>" /></a> <a href="./images/<%=veic_img_04%>" rel="lightbox[roadtrip]" title="<%=veic_nome%>"><img src="./images/<%=veic_img_04%>" width=71 height=40 title="<%=veic_nome%>" /></a> <a href="./images/<%=veic_img_05%>" rel="lightbox[roadtrip]" title="<%=veic_nome%>"><img src="./images/<%=veic_img_05%>" width=71 height=40 title="<%=veic_nome%>" /></a> <a href="./images/<%=veic_img_06%>" rel="lightbox[roadtrip]" title="<%=veic_nome%>"><img src="./images/<%=veic_img_06%>" width=71 height=40 title="<%=veic_nome%>" /></a> <a href="./images/<%=veic_img_07%>" rel="lightbox[roadtrip]" title="<%=veic_nome%>"><img src="./images/<%=veic_img_07%>" width=71 height=40 title="<%=veic_nome%>" /></a> <a href="./images/<%=veic_img_08%>" rel="lightbox[roadtrip]" title="<%=veic_nome%>"><img src="./images/<%=veic_img_08%>" width=71 height=40 title="<%=veic_nome%>" /></a> <a href="./images/<%=veic_img_09%>" rel="lightbox[roadtrip]" title="<%=veic_nome%>"><img src="./images/<%=veic_img_09%>" width=71 height=40 title="<%=veic_nome%>" /></a> <a href="./images/<%=veic_img_10%>" rel="lightbox[roadtrip]" title="<%=veic_nome%>"><img src="./images/<%=veic_img_10%>" width=71 height=40 title="<%=veic_nome%>" /></a> <a href="./images/<%=veic_img_11%>" rel="lightbox[roadtrip]" title="<%=veic_nome%>"><img src="./images/<%=veic_img_11%>" width=71 height=40 title="<%=veic_nome%>" /></a> <a href="./images/<%=veic_img_12%>" rel="lightbox[roadtrip]" title="<%=veic_nome%>"><img src="./images/<%=veic_img_12%>" width=71 height=40 title="<%=veic_nome%>" /></a> <a href="./images/<%=veic_img_13%>" rel="lightbox[roadtrip]" title="<%=veic_nome%>"><img src="./images/<%=veic_img_13%>" width=71 height=40 title="<%=veic_nome%>" /></a> <a href="./images/<%=veic_img_14%>" rel="lightbox[roadtrip]" title="<%=veic_nome%>"><img src="./images/<%=veic_img_14%>" width=71 height=40 title="<%=veic_nome%>" /></a> <a href="./images/<%=veic_img_15%>" rel="lightbox[roadtrip]" title="<%=veic_nome%>"><img src="./images/<%=veic_img_15%>" width=71 height=40 title="<%=veic_nome%>" /></a> </p> </div> <h3>Contato ou visita clique abaixo:</h3> <p> <a href="contato.asp"><img src="./images/solicitar.png" title="Solicitar" width=100 border=0 /></a> </p> </div> <!-- /side --> <% lista_veiculos.MoveNext Wend %> <% End If %> [/code]
  3. Legionáriors

    Mostra Imagem

    Boa tarde pessoal, Tenho a seguinte linha de código: <%If veic_img_01="" Then Response.Write "" End If%><%If veic_img_01 > "" Then Response.Write "<a href=""images/<%=veic_img_01%>"" rel=""lightbox[roadtrip]"" title=""<%=veic_nome%>""><img src=""./images/<%=veic_img_01%>"" width=""71"" height=""40"" title=""<%=veic_nome%>"" /></a>" End If%> Se funcionasse corretamente ela iria mostrar a imagem se houvesse algo registrado no banco se não, não mostraria nada. Ela até faz isso mas não mostra a imagem quando ela está cadastrada fica como se não houvesse imagem mesmo tendo ele dá erro nos itens a seguir: <%=veic_img_01%> - Aparece duas vezes pois uma é a miniatura da imagem e a outra é o lightbox <%=veic_nome%> - Nome da imagem. Se puderem me ajudar ou tiverem alguma solução diferente pra fazer isso agradeço.
  4. Podem fechar o tópico, está resolvido. muito obrigado!
  5. Cara valeu!!! Valeu muito, consegui resolver um problema de 1 mês de incomodação!!! A principio está funcionando como preciso caso de algum problema eu volto a postar!!! Muito obrigado mesmo!!!
  6. Bom dia Rafael, Muito obrigado por responder já havia perdido as esperanças... Eu estou recuperando os dados desta forma: <script> window.onload = function(){ document.getElementById('img_01').value = document.getElementById('upimg_01').value; document.getElementById('img_02').value = document.getElementById('upimg_02').value; document.getElementById('img_03').value = document.getElementById('upimg_03').value; document.getElementById('img_04').value = document.getElementById('upimg_04').value; document.getElementById('img_05').value = document.getElementById('upimg_05').value; document.getElementById('img_06').value = document.getElementById('upimg_06').value; document.getElementById('img_07').value = document.getElementById('upimg_07').value; document.getElementById('img_08').value = document.getElementById('upimg_08').value; document.getElementById('img_09').value = document.getElementById('upimg_09').value; document.getElementById('img_10').value = document.getElementById('upimg_10').value; document.getElementById('img_11').value = document.getElementById('upimg_11').value; document.getElementById('img_12').value = document.getElementById('upimg_12').value; document.getElementById('img_13').value = document.getElementById('upimg_13').value; document.getElementById('img_14').value = document.getElementById('upimg_14').value; document.getElementById('img_15').value = document.getElementById('upimg_15').value; } </script> Como colocar os valores desta forma? Tem como?
  7. Boa tarde pessoal, Tenho o seguinte trecho do cód. <%response.buffer=true Server.ScriptTimeout = 99999999%> <% Set Upload = Server.CreateObject("Persits.Upload.1") Upload.IgnoreNoPost = True Upload.Save "xxx" For Each File in Upload.Files Response.Write "<input type=text size=10 id=upimg_01 value="&File.Filename&">" Next %> Nele eu consigo visualizar nome por nome dos arquivos enviados mas dispostos da seguinte forma: "imagem1.jpg, imagem2.jpg... assim por diante até a imagem 15 pois o upload feito tem 15 imagens no total. Eu preciso que sejam mostrados os nomes das imagens separados pois preciso atribuir uma "id" para cada nome de imagem que será repassado para um novo formulário que ai realiza o cadastro. Só preciso separar o nome de cada imagem em uma input diferente mas não consigo. Se alguém puder ajudar agradeço.
  8. Boa noite pessoal, Ninguém??? Abraço!
  9. Podem fechar o tópico, já resolvi o problema... Obrigado!!!
  10. Boa tarde pessoal, Alguém saberia me dizer porque o script abaixo não mostra o que está no "response.write"? Ele envia os arquivos pra pasta destino mas não mostra o nome do arquivo. Pode ser um erro bobo mas estou tanto tempo emcima disso e de outros scripts que não to vendo o erro... se alguém poder ajudar agradeço muito... Em tempo: o form é tipo multiple... <!--#include file="conexao2.inc"--> <!--#include file="estilo.inc"--> <h3>Arquivos enviados</h3><br> <table width=960> <tr><td> <fieldset><legend>Info</legend>Seus arquivos foram enviados. Verifique se foram estas as fotos enviadas, se estiver tudo correto clique em "Enviar para cadastro" e finalize o cadastramento do veículo.</fieldset></td> </td></tr> </table> <br><br> <form method="post" name="upload" action="cad_veiculos.asp"> <%response.buffer=true Server.ScriptTimeout = 99999999%> <% 'AspUpload Set Upload = Server.CreateObject("Persits.Upload") Upload.ProgressID = Request.QueryString("PID") 'faz parte do carregando Upload.OverwriteFiles = False pasta = Server.MapPath("../images/") Upload.Save pasta Set Fotos = Upload.Files("img_01,img_02,img_03,img_04,img_05,img_06,img_07,img_08,img_09,img_10,img_11,img_12,img_13,img_14,img_15") nome_arquivo1 = Fotos.Filename("img_01") nome_arquivo2 = Fotos.Filename("img_02") nome_arquivo3 = Fotos.Filename("img_03") nome_arquivo4 = Fotos.Filename("img_04") nome_arquivo5 = Fotos.Filename("img_05") nome_arquivo6 = Fotos.Filename("img_06") nome_arquivo7 = Fotos.Filename("img_07") nome_arquivo8 = Fotos.Filename("img_08") nome_arquivo9 = Fotos.Filename("img_09") nome_arquivo10 = Fotos.Filename("img_10") nome_arquivo11 = Fotos.Filename("img_11") nome_arquivo12 = Fotos.Filename("img_12") nome_arquivo13 = Fotos.Filename("img_13") nome_arquivo14 = Fotos.Filename("img_14") nome_arquivo15 = Fotos.Filename("img_15") response.Write"<table border=0>" response.Write"<td><fieldset><legend>Foto da Capa" response.Write"</legend>" response.Write"<input type=text size=26 name=img_01 value=" response.write nome_arquivo2 response.Write"></fieldset></td>" response.Write"<td><fieldset><legend>Foto da Capa" response.Write"</legend>" response.Write"<input type=text size=26 name=img_01 value=" response.write nome_arquivo2 response.Write"></fieldset></td>" response.Write"<td><fieldset><legend>Foto da Capa" response.Write"</legend>" response.Write"<input type=text size=26 name=img_01 value=" response.write nome_arquivo3 response.Write"></fieldset></td>" response.Write"<td><fieldset><legend>Foto da Capa" response.Write"</legend>" response.Write"<input type=text size=26 name=img_01 value=" response.write nome_arquivo4 response.Write"></fieldset></td>" response.Write"<td><fieldset><legend>Foto da Capa" response.Write"</legend>" response.Write"<input type=text size=26 name=img_01 value=" response.write nome_arquivo5 response.Write"></fieldset></td>" response.Write"<td><fieldset><legend>Foto da Capa" response.Write"</legend>" response.Write"<input type=text size=26 name=img_01 value=" response.write nome_arquivo6 response.Write"></fieldset></td>" response.Write"<td><fieldset><legend>Foto da Capa" response.Write"</legend>" response.Write"<input type=text size=26 name=img_01 value=" response.write nome_arquivo7 response.Write"></fieldset></td>" response.Write"<td><fieldset><legend>Foto da Capa" response.Write"</legend>" response.Write"<input type=text size=26 name=img_01 value=" response.write nome_arquivo8 response.Write"></fieldset></td>" response.Write"<td><fieldset><legend>Foto da Capa" response.Write"</legend>" response.Write"<input type=text size=26 name=img_01 value=" response.write nome_arquivo9 response.Write"></fieldset></td>" response.Write"<td><fieldset><legend>Foto da Capa" response.Write"</legend>" response.Write"<input type=text size=26 name=img_01 value=" response.write nome_arquivo10 response.Write"></fieldset></td>" response.Write"<td><fieldset><legend>Foto da Capa" response.Write"</legend>" response.Write"<input type=text size=26 name=img_01 value=" response.write nome_arquivo11 response.Write"></fieldset></td>" response.Write"<td><fieldset><legend>Foto da Capa" response.Write"</legend>" response.Write"<input type=text size=26 name=img_01 value=" response.write nome_arquivo12 response.Write"></fieldset></td>" response.Write"<td><fieldset><legend>Foto da Capa" response.Write"</legend>" response.Write"<input type=text size=26 name=img_01 value=" response.write nome_arquivo13 response.Write"></fieldset></td>" response.Write"<td><fieldset><legend>Foto da Capa" response.Write"</legend>" response.Write"<input type=text size=26 name=img_01 value=" response.write nome_arquivo14 response.Write"></fieldset></td>" response.Write"<td><fieldset><legend>Foto da Capa" response.Write"</legend>" response.Write"<input type=text size=26 name=img_01 value=" response.write nome_arquivo15 response.Write"></fieldset></td>" response.Write"<td><fieldset><legend>Enviar Fotos" response.Write"</legend>" response.Write"<input class=submit-button type=submit value=""&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Enviar para cadastro&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;"">" response.Write"</form>" response.Write"</fieldset></td></td></tr>" response.Write"</table>" %> <br><br> <br><br> <br>
  11. Boa tarde pessoal, Estou a dias quebrando a cabeça pra descobrir porque o script que vou postar grava no banco mas não retorna os valores atualizados na tela. Se puderem me ajudar agradeço. Segue o código. <h3>Consulta,alteração e exclusão de Veículos</h3><%Dim lista_veiculos,lista_categoria,veic_id,lista_veic,tempcat,acao,lista,lista_marcas,lista_fabricacoes,lista_modelos,lista_cambios,lista_combustiveis,lista_porta,lista_cabines,lista_suspensoes,lista_tracoesacao = Request.QueryString("acao")veic_id = Request.QueryString("veic_id")If IsEmpty(Request.QueryString("veic_id")) Then %><script>window.location='./con_veiculos.asp'</script><%End IfIf Request.Form("cat_id") = "nulo" Then%><h3><font color=red>Selecione a Categoria</font></h3><%acao = "X"End IfIf Request.Form("tipomarca") = "nulo" Then%><h3><font color=red>Selecione a Marca</font></h3><%acao = "X"End IfIf Request.Form("anofabricacao") = "nulo" Then%><h3><font color=red>Selecione o Ano de Fabricação</font></h3><%acao = "X"End IfIf Request.Form("anomodelo") = "nulo" Then%><h3><font color=red>Selecione o ano do Modelo</font></h3><%acao = "X"End IfIf Request.Form("tipocambio") = "nulo" Then%><h3><font color=red>Selecione o Câmbio</font></h3><%acao = "X"End IfIf Request.Form("tipocombustivel") = "nulo" Then%><h3><font color=red>Selecione o Combustível</font></h3><%acao = "X"End IfIf Request.Form("tipoportas") = "nulo" Then%><h3><font color=red>Selecione as Portas</font></h3><%acao = "X"End IfIf Request.Form("tipocabine") = "nulo" Then%><h3><font color=red>Selecione o tipo de Cabine</font></h3><%acao = "X"End IfIf Request.Form("tiposuspensao") = "nulo" Then%><h3><font color=red>Selecione o tipo de Suspensão</font></h3><%acao = "X"End IfIf Request.Form("tipotracao") = "nulo" Then%><h3><font color=red>Selecione o tipo de Tração</font></h3><%acao = "X"End IfSelect Case acaoCase "apagar"lojaDB.Execute("DELETE FROM veiculos WHERE id=" & veic_id)%><h3>Veículo Removido</h3><%lista = "não"Case "atualizar"lojaDB.Execute("UPDATE veiculos set cat_id='" & Request.Form("cat_id") & "',tipomarca='" & Request.Form("tipomarca") & "',anofabricacao='" & Request.Form("anofabricacao") & "',anomodelo='" & Request.Form("anomodelo") & "',tipocambio='" & Request.Form("tipocambio") & "',tipocombustivel='" & Request.Form("tipocombustivel") & "',tipoportas='" & Request.Form("tipoportas") & "',tipocabine='" & Request.Form("tipocabine") & "',tiposuspensao='" & Request.Form("tiposuspensao") & "',tipotracao='" & Request.Form("tipotracao") & "',nome='" & Request.Form("nome") & "',placa='" & Request.Form("placa") & "',km='" & Request.Form("km") & "',cor='" & Request.Form("cor") & "',comp_valor='" & Request.Form("comp_valor") & "',obs='" & Request.Form("obs") & "',preço='" & FormatNumber(Request.Form("preço"),2,-1,0,-1) & "',img_01='" & Request.Form("img_01") & "',img_02='" & Request.Form("img_02") & "',img_03='" & Request.Form("img_03") & "',img_04='" & Request.Form("img_04") & "',img_05='" & Request.Form("img_05") & "',img_06='" & Request.Form("img_06") & "',img_07='" & Request.Form("img_07") & "',img_08='" & Request.Form("img_08") & "',img_09='" & Request.Form("img_09") & "',img_10='" & Request.Form("img_10") & "',img_11='" & Request.Form("img_11") & "',img_12='" & Request.Form("img_12") & "',img_13='" & Request.Form("img_13") & "',img_14='" & Request.Form("img_14") & "',img_15='" & Request.Form("img_15") & "',airbag='" & Request.Form("airbag") & "',airbagduplo='" & Request.Form("airbagduplo") & "',alarme='" & Request.Form("alarme") & "',arcondicionado='" & Request.Form("arcondicionado") & "',arquente='" & Request.Form("arquente") & "',bagageiro='" & Request.Form("bagageiro") & "',bancoseletricos='" & Request.Form("bancoseletricos") & "',bancosdecouro='" & Request.Form("bancosdecouro") & "',blindado='" & Request.Form("blindado") & "',cameradere='" & Request.Form("cameradere") & "',cdplayer='" & Request.Form("cdplayer") & "',computadordebordo='" & Request.Form("computadordebordo") & "',contagiros='" & Request.Form("contagiros") & "',desembacador='" & Request.Form("desembacador") & "',direcaohidraulica='" & Request.Form("direcaohidraulica") & "',disqueteira='" & Request.Form("disqueteira") & "',faroldeneblina='" & Request.Form("faroldeneblina") & "',freiosabs='" & Request.Form("freiosabs") & "',freiosadisco='" & Request.Form("freiosadisco") & "',interface='" & Request.Form("interface") & "',kitmultimidia='" & Request.Form("kitmultimidia") & "',limpadortraseiro='" & Request.Form("limpadortraseiro") & "',lonamaritima='" & Request.Form("lonamaritima") & "',mp3player='" & Request.Form("mp3player") & "',partidaeletrica='" & Request.Form("partidaeletrica") & "',pilotoautomatico='" & Request.Form("pilotoautomatico") & "',protetordecacamba='" & Request.Form("protetordecacamba") & "',radio='" & Request.Form("radio") & "',retrovisoreseletricos='" & Request.Form("retrovisoreseletricos") & "',rodasdeligaleve='" & Request.Form("rodasdeligaleve") & "',sensordechuva='" & Request.Form("sensordechuva") & "',sensordeestacionamento='" & Request.Form("sensordeestacionamento") & "',tetosolar='" & Request.Form("tetosolar") & "',travaseletricas='" & Request.Form("travaseletricas") & "',turbo='" & Request.Form("turbo") & "',vidroseletricos='" & Request.Form("vidroseletricos") & "',vidrosverdes='" & Request.Form("vidrosverdes") & "',volanteregulaaltura='" & Request.Form("volanteregulaaltura") & "',deficiente='" & Request.Form("deficiente") & "',interclima='" & Request.Form("interclima") & "',intercooler='" & Request.Form("intercooler") & "',rodoar='" & Request.Form("rodoar") & "',sofacama='" & Request.Form("sofacama") & "',chcdestaque='" & Request.Form("chcdestaque") & "',disp='" & Request.Form("disp") & "' WHERE id=" & veic_id)%><h3>Veículo Atualizado</h3><%End SelectIf Not (lista = "não") Then'Exibe veiculosset lista_veiculos = lojaDB.Execute("SELECT * FROM veiculos WHERE id=" & veic_id) set lista_categoria = lojaDB.Execute("SELECT * FROM categorias WHERE id=" & lista_veiculos("cat_id"))If Not (lista_categoria.EOF) Then tempcat = lista_categoria("id") End If set lista_marcas = lojaDB.Execute("SELECT * FROM marca WHERE id=" & lista_veiculos("tipomarca"))If Not (lista_marcas.EOF) Then tempcat = lista_marcas("id") End If set lista_fabricacoes = lojaDB.Execute("SELECT * FROM fabricacao WHERE id=" & lista_veiculos("anofabricacao"))If Not (lista_fabricacoes.EOF) Then tempcat = lista_fabricacoes("id") End If set lista_modelos = lojaDB.Execute("SELECT * FROM modelo WHERE id=" & lista_veiculos("anomodelo"))If Not (lista_modelos.EOF) Then tempcat = lista_modelos("id") End If set lista_cambios = lojaDB.Execute("SELECT * FROM cambio WHERE id=" & lista_veiculos("tipocambio"))If Not (lista_cambios.EOF) Then tempcat = lista_cambios("id") End If set lista_combustiveis = lojaDB.Execute("SELECT * FROM combustivel WHERE id=" & lista_veiculos("tipocombustivel"))If Not (lista_combustiveis.EOF) Then tempcat = lista_combustiveis("id") End If set lista_porta = lojaDB.Execute("SELECT * FROM portas WHERE id=" & lista_veiculos("tipoportas"))If Not (lista_porta.EOF) Then tempcat = lista_porta("id") End If set lista_cabines = lojaDB.Execute("SELECT * FROM cabine WHERE id=" & lista_veiculos("tipocabine"))If Not (lista_cabines.EOF) Then tempcat = lista_cabines("id") End If set lista_suspensoes = lojaDB.Execute("SELECT * FROM suspensao WHERE id=" & lista_veiculos("tiposuspensao"))If Not (lista_suspensoes.EOF) Then tempcat = lista_suspensoes("id") End If set lista_tracoes = lojaDB.Execute("SELECT * FROM tracao WHERE id=" & lista_veiculos("tipotracao"))If Not (lista_tracoes.EOF) Then tempcat = lista_tracoes("id") End If If Not (lista_veiculos.EOF) Then %> <!--#include file="estilo.inc"--> <form method=post action="./con_veiculos_detalhes.asp?veic_id=<%=veic_id%>&acao=atualizar"> <table border="0"><td><table><tr><td><fieldset><legend>Veículo Id</legend><center><font size=3><b><%=lista_veiculos("id")%></b></font></center></fieldset></td><td><fieldset><legend>Modelo</legend><input type=text size=39 name=nome value="<%=lista_veiculos("nome")%>"></fieldset></td></td></tr></table><table> <tr><td><fieldset><legend>Categoria</legend><select name=cat_id><option value=nulo>Selecione</option><%set lista_categoria = lojaDB.Execute("SELECT * FROM categorias")While not lista_categoria.EOF%><option value="<%=lista_categoria("id")%>" <%If (lista_categoria("id") = tempcat) Then Response.Write "selected" End If%>><%=lista_categoria("nome")%></option><%lista_categoria.MoveNextWend%></select></fieldset></td> <td><fieldset><legend>Marca</legend><select name=tipomarca><option value=nulo>Selecione</option><%set lista_marcas = lojaDB.Execute("SELECT * FROM marca")While not lista_marcas.EOF%><option value="<%=lista_marcas("id")%>" <%If (lista_marcas("id") = tempcat) Then Response.Write "selected" End If%>><%=lista_marcas("nome")%></option><%lista_marcas.MoveNextWend%></select></fieldset></td></tr> <td><fieldset><legend>Ano Fabricação</legend><select name=anofabricacao><option value=nulo>Selecione</option><%set lista_fabricacoes = lojaDB.Execute("SELECT * FROM fabricacao")While not lista_fabricacoes.EOF%><option value="<%=lista_fabricacoes("id")%>" <%If (lista_fabricacoes("id") = tempcat) Then Response.Write "selected" End If%>><%=lista_fabricacoes("nome")%></option><%lista_fabricacoes.MoveNextWend%></select></fieldset></td> <td><fieldset><legend>Ano Modelo</legend><select name=anomodelo><option value=nulo>Selecione</option><%set lista_modelos = lojaDB.Execute("SELECT * FROM modelo")While not lista_modelos.EOF%><option value="<%=lista_modelos("id")%>" <%If (lista_modelos("id") = tempcat) Then Response.Write "selected" End If%>><%=lista_modelos("nome")%></option><%lista_modelos.MoveNextWend%></select></fieldset></td></tr> <td><fieldset><legend>Câmbio</legend><select name=tipocambio><option value=nulo>Selecione</option><%set lista_cambios = lojaDB.Execute("SELECT * FROM cambio")While not lista_cambios.EOF%><option value="<%=lista_cambios("id")%>" <%If (lista_cambios("id") = tempcat) Then Response.Write "selected" End If%>><%=lista_cambios("nome")%></option><%lista_cambios.MoveNextWend%></select></fieldset></td> <td><fieldset><legend>Combustível</legend><select name=tipocombustivel><option value=nulo>Selecione</option><%set lista_combustiveis = lojaDB.Execute("SELECT * FROM combustivel")While not lista_combustiveis.EOF%><option value="<%=lista_combustiveis("id")%>" <%If (lista_combustiveis("id") = tempcat) Then Response.Write "selected" End If%>><%=lista_combustiveis("nome")%></option><%lista_combustiveis.MoveNextWend%></select></fieldset></td></tr> <td><fieldset><legend>Portas</legend><select name=tipoportas><option value=nulo>Selecione</option><%set lista_porta = lojaDB.Execute("SELECT * FROM portas")While not lista_porta.EOF%><option value="<%=lista_porta("id")%>" <%If (lista_porta("id") = tempcat) Then Response.Write "selected" End If%>><%=lista_porta("nome")%></option><%lista_porta.MoveNextWend%></select></fieldset></td> <td><fieldset><legend>Cabine</legend><select name=tipocabine><option value=nulo>Selecione</option><%set lista_cabines = lojaDB.Execute("SELECT * FROM cabine")While not lista_cabines.EOF%><option value="<%=lista_cabines("id")%>" <%If (lista_cabines("id") = tempcat) Then Response.Write "selected" End If%>><%=lista_cabines("nome")%></option><%lista_cabines.MoveNextWend%></select></fieldset></td></tr> <td><fieldset><legend>Suspensão</legend><select name=tiposuspensao><option value=nulo>Selecione</option><%set lista_suspensoes = lojaDB.Execute("SELECT * FROM suspensao")While not lista_suspensoes.EOF%><option value="<%=lista_suspensoes("id")%>" <%If (lista_suspensoes("id") = tempcat) Then Response.Write "selected" End If%>><%=lista_suspensoes("nome")%></option><%lista_suspensoes.MoveNextWend%></select></fieldset></td> <td><fieldset><legend>Tração</legend><select name=tipotracao><option value=nulo>Selecione</option><%set lista_tracoes = lojaDB.Execute("SELECT * FROM tracao")While not lista_tracoes.EOF%><option value="<%=lista_tracoes("id")%>" <%If (lista_tracoes("id") = tempcat) Then Response.Write "selected" End If%>><%=lista_tracoes("nome")%></option><%lista_tracoes.MoveNextWend%></select></fieldset></td></tr> <td><fieldset><legend>Placa</legend><input type=text size=22 name=placa value="<%=lista_veiculos("placa")%>"></fieldset></td><td><fieldset><legend>Km</legend><input type=text size=22 name=km value="<%=lista_veiculos("km")%>"></fieldset></td></td></tr> <td><fieldset><legend>Cor</legend><input type=text size=22 name=cor value="<%=lista_veiculos("cor")%>"></fieldset></td><td><fieldset><legend>Valor R$</legend><input type=text size=22 name=preço value="<%=FormatNumber(lista_veiculos("preço"),2,-1,0,-1)%>"></fieldset></td></td></tr></table> <table border="0"><tr><td><fieldset><legend>Definições de pagamento</legend><input type=text size=53 name=comp_valor value="<%=lista_veiculos("comp_valor")%>"></fieldset></td></td></tr></table> <table border="0"><tr><td><fieldset><legend>Observações</legend><textarea cols="30" rows="5" name=obs value="obs"><%=lista_veiculos("obs")%></textarea></fieldset></td></td></tr></table> <table border="0"> <td><fieldset><legend>Alterar foto de capa</legend><input type=text size=22 name=img_01 value="<%=lista_veiculos("img_01")%>"><br><br><center><img src="../images/<%=lista_veiculos("img_01")%>" width=186></center></fieldset></td><td><fieldset><legend>Alterar foto 02</legend><input type=text size=23 name=img_02 value="<%=lista_veiculos("img_02")%>"><br><br><center><img src="../images/<%=lista_veiculos("img_02")%>" width=186></center></fieldset></td></td></tr> <td><fieldset><legend>Alterar foto 03</legend><input type=text size=22 name=img_03 value="<%=lista_veiculos("img_03")%>"><br><br><center><img src="../images/<%=lista_veiculos("img_03")%>" width=186></center></fieldset></td><td><fieldset><legend>Alterar foto 04</legend><input type=text size=23 name=img_04 value="<%=lista_veiculos("img_04")%>"><br><br><center><img src="../images/<%=lista_veiculos("img_04")%>" width=186></center></fieldset></td></td></tr> <td><fieldset><legend>Alterar foto 05</legend><input type=text size=22 name=img_05 value="<%=lista_veiculos("img_05")%>"><br><br><center><img src="../images/<%=lista_veiculos("img_05")%>" width=186></center></fieldset></td><td><fieldset><legend>Alterar foto 06</legend><input type=text size=23 name=img_06 value="<%=lista_veiculos("img_06")%>"><br><br><center><img src="../images/<%=lista_veiculos("img_06")%>" width=186></center></fieldset></td></td></tr> <td><fieldset><legend>Alterar foto 07</legend><input type=text size=22 name=img_07 value="<%=lista_veiculos("img_07")%>"><br><br><center><img src="../images/<%=lista_veiculos("img_07")%>" width=186></center></fieldset></td><td><fieldset><legend>Alterar foto 08</legend><input type=text size=23 name=img_08 value="<%=lista_veiculos("img_08")%>"><br><br><center><img src="../images/<%=lista_veiculos("img_08")%>" width=186></center></fieldset></td></td></tr> <td><fieldset><legend>Alterar foto 09</legend><input type=text size=22 name=img_09 value="<%=lista_veiculos("img_09")%>"><br><br><center><img src="../images/<%=lista_veiculos("img_09")%>" width=186></center></fieldset></td><td><fieldset><legend>Alterar foto 10</legend><input type=text size=23 name=img_10 value="<%=lista_veiculos("img_10")%>"><br><br><center><img src="../images/<%=lista_veiculos("img_10")%>" width=186></center></fieldset></td></td></tr> <td><fieldset><legend>Alterar foto 11</legend><input type=text size=22 name=img_11 value="<%=lista_veiculos("img_11")%>"><br><br><center><img src="../images/<%=lista_veiculos("img_11")%>" width=186></center></fieldset></td><td><fieldset><legend>Alterar foto 12</legend><input type=text size=23 name=img_12 value="<%=lista_veiculos("img_12")%>"><br><br><center><img src="../images/<%=lista_veiculos("img_12")%>" width=186></center></fieldset></td></td></tr> <td><fieldset><legend>Alterar foto 13</legend><input type=text size=22 name=img_13 value="<%=lista_veiculos("img_13")%>"><br><br><center><img src="../images/<%=lista_veiculos("img_13")%>" width=186></center></fieldset></td><td><fieldset><legend>Alterar foto 14</legend><input type=text size=23 name=img_14 value="<%=lista_veiculos("img_14")%>"><br><br><center><img src="../images/<%=lista_veiculos("img_14")%>" width=186></center></fieldset></td></td></tr> <td><fieldset><legend>Alterar foto 15</legend><input type=text size=22 name=img_15 value="<%=lista_veiculos("img_15")%>"><br><br><center><img src="../images/<%=lista_veiculos("img_15")%>" width=186></center></fieldset></td></td> <td><fieldset><legend>Mostra no site</legend><select name=disp><option value="S" <%If lista_veiculos("disp")="S" Then Response.Write "selected" End If%>>Sim</option><option value="N" <%If lista_veiculos("disp")="N" Then Response.Write "selected" End If%>>Não</option></select></fieldset></td></tr> </table> </td><td valign=top> <table width="200"><tr><td><fieldset><legend>Opcionais</legend><input name="airbag" type="checkbox" id="airbag" value="ON">&nbsp;Air bag<br><input name="airbagduplo" type="checkbox" id="airbagduplo" value="ON">&nbsp;Air bag duplo<br><input name="alarme" type="checkbox" id="alarme" value="ON">&nbsp;Alarme<br><input name="arcondicionado" type="checkbox" id="arcondicionado" value="ON">&nbsp;Ar condicionado<br><input name="arquente" type="checkbox" id="arquente" value="ON">&nbsp;Ar quente<br><input name="bagageiro" type="checkbox" id="bagageiro" value="ON">&nbsp;Bagageiro<br><input name="bancoseletricos" type="checkbox" id="bancoseletricos" value="ON">&nbsp;Bancos Elétricos<br><input name="bancosdecouro" type="checkbox" id="bancosdecouro" value="ON">&nbsp;Bancos de Couro<br><input name="blindado" type="checkbox" id="blindado" value="ON">&nbsp;Blindado<br><input name="cameradere" type="checkbox" id="cameradere" value="ON">&nbsp;Camera de Ré<br><input name="cdplayer" type="checkbox" id="cdplayer" value="ON">&nbsp;CD Player<br><input name="computadordebordo" type="checkbox" id="computadordebordo" value="ON">&nbsp;Computador de Bordo<br><input name="contagiros" type="checkbox" id="contagiros" value="ON">&nbsp;Contagiros<br><input name="desembacador" type="checkbox" id="desembacador" value="ON">&nbsp;Desembacador<br><input name="direcaohidraulica" type="checkbox" id="direcaohidraulica" value="ON">&nbsp;Direcão Hidráulica<br><input name="disqueteira" type="checkbox" id="disqueteira" value="ON">&nbsp;Disqueteira<br><input name="faroldeneblina" type="checkbox" id="faroldeneblina" value="ON">&nbsp;Farol de Neblina<br><input name="freiosabs" type="checkbox" id="freiosabs" value="ON">&nbsp;Freios ABS<br><input name="freiosadisco" type="checkbox" id="freiosadisco" value="ON">&nbsp;Freios a Disco<br><input name="interface" type="checkbox" id="interface" value="ON">&nbsp;Interface<br><input name="kitmultimidia" type="checkbox" id="kitmultimidia" value="ON">&nbsp;Kit Multimidia<br><input name="limpadortraseiro" type="checkbox" id="limpadortraseiro" value="ON">&nbsp;Limpador Traseiro<br><input name="lonamaritima" type="checkbox" id="lonamaritima" value="ON">&nbsp;Lona Marítima<br><input name="mp3player" type="checkbox" id="mp3player" value="ON">&nbsp;MP3 Player<br><input name="partidaeletrica" type="checkbox" id="partidaeletrica" value="ON">&nbsp;Partida Elétrica<br><input name="pilotoautomatico" type="checkbox" id="pilotoautomatico" value="ON">&nbsp;Piloto Automático<br><input name="protetordecacamba" type="checkbox" id="protetordecacamba" value="ON">&nbsp;Protetor de Caçamba<br><input name="radio" type="checkbox" id="radio" value="ON">&nbsp;Rádio<br><input name="retrovisoreseletricos" type="checkbox" id="retrovisoreseletricos" value="ON">&nbsp;Retrovisores Elétricos<br><input name="rodasdeligaleve" type="checkbox" id="rodasdeligaleve" value="ON">&nbsp;Rodas de Liga Leve<br><input name="sensordechuva" type="checkbox" id="sensordechuva" value="ON">&nbsp;Sensor de Chuva<br><input name="sensordeestacionamento" type="checkbox" id="sensordeestacionamento" value="ON">&nbsp;Sensor de Estacionam.<br><input name="tetosolar" type="checkbox" id="tetosolar" value="ON">&nbsp;Teto Solar<br><input name="travaseletricas" type="checkbox" id="travaseletricas" value="ON">&nbsp;Travas Elétricas<br><input name="turbo" type="checkbox" id="turbo" value="ON">&nbsp;Turbo<br><input name="vidroseletricos" type="checkbox" id="vidroseletricos" value="ON">&nbsp;Vidros Elétricos<br><input name="vidrosverdes" type="checkbox" id="vidrosverdes" value="ON">&nbsp;Vidros Verdes<br><input name="volanteregulaaltura" type="checkbox" id="volanteregulaaltura" value="ON">&nbsp;Volante c/ Reg. de Altura<br><input name="deficiente" type="checkbox" id="deficiente" value="ON">&nbsp;Adapt. para Deficiente<br><input name="interclima" type="checkbox" id="interclima" value="ON">&nbsp;Inter Clima<br><input name="intercooler" type="checkbox" id="intercooler" value="ON">&nbsp;Inter Cooler<br><input name="rodoar" type="checkbox" id="rodoar" value="ON">&nbsp;Rodoar<br><input name="sofacama" type="checkbox" id="sofacama" value="ON">&nbsp;Sofa-cama<br></td></tr></table></table><table border="1"><tr><td><fieldset><legend>Incluir destaque</legend><input type="checkbox" name="chcdestaque" value="ON">Marque para incluir em destaque.</fieldset></td><td><fieldset><legend>Retirar destaque</legend><input type="checkbox" name="chcdestaque" value="OFF">Marque para excluir se não é mais destaque.</fieldset></td></tr><td><fieldset><legend>Status Destaque ON/OFF</legend><%=lista_veiculos ("chcdestaque")%></fieldset></td></td></tr> <td><fieldset><legend>Atualizar</legend><input type=submit value="Atualizar" name=acao onClick="this.value='Aguarde!'"></form></td> <td><fieldset><legend>Deletar</legend><form method=post action="./con_veiculos_detalhes.asp?veic_id=<%=veic_id%>&acao=apagar"><input type=submit value="Apagar" onClick="this.value='Aguarde!'"></form></td></tr> <td><fieldset><legend>Informação</legend>Ao apagar o veículo todos os dados serão perdidos permanentemente. Antes de remover um veículo recomendamos que você anote os dados e tenha certeza do que vai fazer.</td></tr> </table><%End IfEnd If%></table>
  12. Legionáriors

    Formulário

    Boa tarde, Obrigado pela ajuda bareta, gostaria de saber se existe algum script asp pronto para colocar troca de linguagem no site... Att, Legionário
  13. Legionáriors

    Formulário

    Bom dia pessoal, Gostaria de saber se alguém tem um exemplo de um formulário que é tipo um contrato que ao preencher e enviar ele grava no banco e mostra o que foi preenchido em uma outra página para impressão. Obrigado a todos os amigos do fórum Legionário
  14. Boa noite Bareta, Problema resolvido você sem duvidas é fera cara, valeu mesmo pela ajuda me salvou a vida. Só mais uma ajudinha se não for muito abuso. Agor aquando eu faço o cadastro por exemplo 01/05/2010 quando clico em cadastrar a data vem invertida desta forma 05/01/2010 sabe me dizer o que pode ser agora? Valeu irmão!!!
×
×
  • Criar Novo...