Ir para conteúdo
Fórum Script Brasil

douglasdamame

Membros
  • Total de itens

    103
  • Registro em

  • Última visita

Tudo que douglasdamame postou

  1. Olá Pessoal, Estou querendo fazer um select mas não estou conseguindo encontrar a lógica. Banco de dados: Título Descrição Categoria No caso terei a categoria A, B, C e D Quero mostrar 10 produtos randomicos mas da seguinte forma: Item 1 - Categoria A Item 2 - Categoria B Item 3 - Categoria C Item 4 - Categoria D Item 5 - Categoria A Item 6 - Categoria B Item 7 - Categoria C Item 8 - Categoria D Item 9 - Categoria A Item 10 - Categoria B Acho que terei que fazer alguns Ifs para isso funcionar. OBS: O número de categorias irão variar com o tempo, então não daria para fazer IF categoria = D then Categoria = A End if Não consigo entender a lógica para resolver isso. Se puderam me ajudar agradeceria muito Douglas Damame
  2. douglasdamame

    ERRO

    Posta o Código fonte...
  3. Eu ao invés de utilizar Localhost determinei um IP (127.0.0.1) no IIS, ai acesso pelo IE e pelo Firefox sem problemas ou solicitações de senha. Testo minhas páginas http:// 127.0.0.1/minhapasta/default.asp
  4. Olá Marianne, antes de gravar na pasta você quer alterar o nome. Pelo que eu entendi, COUNT é o nome do campo onde esta o arquivo a ser enviado, certo? Você esta fazendo um Request para pegar este arquivo? Exemplo: Count = UploadRequest.Item("Count").Item("Value") Abaixo disso você altera o nome: If not Count = "" Then Count= "arquivo_"&day(now)&"_"&hour(now)&"_"&minute(now)&"_"&second(now)&".jpg" Else End if ' -------------> Isso fará com que o nome fique por exemplo arquivo_23_2_45_36.jpg ou seja, arquivo_dia_hora_minuto_segundo.jpg Ai você envia para a pasta Set Upload = Server.CreateObject("Persits.Upload") Count = Upload.Save("E:\home\sitedoamary.com\wwwroot\fotos") Response.Write Count & " arquivo(s) salvo(s) !!!" Espero ter ajudado. Douglas Damame http://www.u2net.com.br
  5. Olá, A solução é como o Bareta falou!! 1 - Faça uma página com formulário para envio do arquivo e utilizando um componente de upload envie o swf para o servidor. 2 - Pegue o nome do arquivo e coloque no banco de dados 3 - Em uma página, faça a busca no BD pelo arquivo e mostre para seus visitantes!! Tenta fazer e mostra o que conseguiu e te ajudamos. Se quiser pronto tente procurar como Upload e BD, se não achar e não souber fazer, ai,....... só pagando para alguém !! Douglas Damame http://www.u2net.com.br
  6. Olá, Da para adaptar em seu código sim <%if CodigoUtilizados = "" then CodigoUtilizados = "0" set RSDestaque = Server.CreateObject("AdoDB.RecordSet") SQL = "Select top 12 Vei.*, Mar.Marca, Mode.Modelo, Mode.Versao " & chr(13) & _ "from Veiculos Vei, Marcas Mar, Modelos Mode " & chr(13) & _ "where Vei.CodigoMarca = Mar.CodigoMarca " & chr(13) & _ "and Vei.CodigoModelo = Mode.CodigoModelo " & chr(13) & _ "and Vei.CodigoVeiculo not in ( " & CodigoUtilizados & ") order by RND(INT(NOW*CodigoVeiculo)-NOW*iCodigoVeiculo)" & chr(13) RSDestaque.open SQL, conn, 1%> Vê se funciona !!! Douglas Damame http://www.u2net.com.br
  7. Mostrando os dados do BD No exemplo abaixo, pega contando do último Post e mostra do 9° ao 12° <% Set RS = Server.CreateObject("ADODB.Recordset") cellnum = 1 RS.ActiveConnection = Conn SQL = "SELECT* FROM tabela ORDER BY ID Desc" RS.Open SQL, conn, 1, 3 'inicio do loop Dim reg reg = 1 Do While reg < 9 ' -------> aqui determina quntos pular andes de mostrar, no caso aqui vai aparecer a partir do 9° rs.movenext reg = reg + 1 Loop 'Fim do loop ' ----------> Se quiser mostrar do 9° ao 12° x = 0 For x = 1 to 3 If rs.eof then Exit For Else %> Aqui aparecem os dados buscados do BD <%=rs("id")%> <%rs.MoveNext End If Next%> No exemplo abaixo, pega contando um Post determinado <% Set RS = Server.CreateObject("ADODB.Recordset") cellnum = 1 RS.ActiveConnection = Conn SQL = "SELECT* FROM tabela ORDER BY ID Desc" RS.Open SQL, conn, 1, 3 'inicio do loop Dim reg reg = 1 Do While reg < 3 ' -------> aqui determina quntos pular andes de mostrar, no caso aqui vai aparecer a partir do 3° rs.movenext reg = reg + 1 Loop 'Fim do loop ' ----------> Se quiser mostrar do 9° ao 12° x = 0 For x = 1 to 1 If rs.eof then Exit For Else %> Aqui aparecem os dados buscados do BD <%=rs("id")%> <%rs.MoveNext End If Next%> Da para melhorar este código, mas acho que te resolveria! Espero ter ajudado. Douglas Damame www.u2net.com.br
  8. Olá Thiago, Obrigado pela ajuda. Resolvi da seguinte forma: <% '--------------Mostra Ofertas Set ofertas = Server.CreateObject("ADODB.Recordset") SQL = "SELECT top 2 * FROM produtos where idprod <> "&intProdID&" order by RND(INT(NOW*idprod)-NOW*idprod)" ofertas.Open SQL, abredb, 1, 3 n = 1 c = 2 Do while not ofertas.Eof produto = ofertas("idprod") intPrice = ofertas("preço") precitonx = formatnumber(intPrice,2) estoque_atual_ofertas = "" %> As variáveis de busca devem ficar depois da instrução Do While, se ficar antes, os valores e repetem. Apenas hoje notei que os valores dos produtos também se repetiam, ai matei o problema, pois antes só achava que era o estoque... Muito obrigado pela sua disposição em me ajudar. Douglas
  9. Bom dia Pessoal, Estou com uma loja virtual onde eu quero mostrar duas ofertas em uma determinada página. Estas ofertas aperecem lado a lado e na descrição eu idico se tem ou não estoque deste produto. O caso é que eu estou utilizando a variável estoque_atual_ofertas para pegar o valor do BD e dizer se tem estoque ou não, mas não zera o valor para o próximo produto, então se o produto 1 não estiver estoque o produto 2 também já ondica que não tem, apesar de ter. <% '--------------Mostra Ofertas Set ofertas = Server.CreateObject("ADODB.Recordset") SQL = "SELECT top 2 * FROM produtos where idprod <> "&intProdID&" order by RND(INT(NOW*idprod)-NOW*idprod)" ofertas.Open SQL, abredb, 1, 3 produto = ofertas("idprod") intPrice = ofertas("preço") precitonx = formatnumber(intPrice,2) %> <table width="100%" border="0" cellspacing="0" cellpadding="0"> <tr> <td><p><b><%=strLg52%></b> <table align="center" border="0" cellspacing="0" cellpadding="5" width="100%" bordercolor="#003366"> <tr> <% n = 1 c = 2 Do while not ofertas.Eof %> <td valign="bottom" align="center" height="128" width="50%"> <table width="100%" BORDER="0" CELLPADDING="2" CELLSPACING="0" style="border:1px solid #cccccc"> <tr> <td bgcolor=#ffffff> <table width=100% height="135" align=center cellpadding="1" cellspacing="1"> <tr> <td align="center" valign=center> <p align="left"><font style="font-size:11px;font-family:<%=fonte%>"><b><font color="000000"> <a href="produtos.asp?produto=<%=ofertas("idprod")%>" onMouseOut="window.status='';return true;" onMouseOver="window.status='+ Detalhes';return true;" style <%=fontebranca%>";text-decoration:none;"><IMG src="produtos/<%=ofertas("impeq")%>" alt='<%=ofertas("nome")%>' border=0 align="left" ></A></font></b></font><font color="000000" style="font-size:11px;font-family:<%=fonte%>"> </font><font style="font-size:11px;font-family:<%=fonte%>"><b><font color="000000"> <%=ofertas("nome")%></font></b></font><font color="000000" style="font-size:11px;font-family:<%=fonte%>"><b> <br><br> <font face="<%=fonte%>" style="font-size:11px;color:000000"><%=strLg37%> <br> <font face="<%=fonte%>" style="font-size:12px;color:cc0000"><b><%=strlgmoeda & " " & precitonx%></b></font><br><b><%=strLg28%></b></b> <% '*** Verifica se tem Estoque do Produto estoque_atual_ofertas="" set rs_estoque_ofertas = abredb.execute("SELECT estoque FROM estoque WHERE idproduto="&produto&";") if not rs_estoque_ofertas.eof then estoque_atual_ofertas=rs_estoque_ofertas("estoque") rs_estoque_ofertas.close set rs_estoque_ofertas = nothing %> <%if estoque_atual_ofertas > 0 then response.write "&s trLg26 "& else response.write "<font color=red>" & strLg27 & "</font>" end if%> </font></p> <p align="right"><font style="font-size:11px;font-family:<%=fonte%>"><a href="produtos.asp?produto=<%=ofertas("idprod")%>" onMouseOut="window.status='';return true;" onMouseOver="window.status='<%=strLg30%>';return true;" style="color:#FFFFFF;text-decoration:none;"><img src=linguagens/portuguesbr/imagens/detalhes.gif width="78" height="32" border="0" align=absbottom></a></font><font><font color="000000"></font></font></p></td> </tr> </table> </table> </td> <% n = n + 1 ofertas.Movenext If n > c then response.write "</tr><tr>" n = 1 End If Loop %>
  10. Obrigado pela informação, mas Java script consegue juntar as duas imagens? Pensei que para isso seria preciso o aspjpeg ou aspimagem Valeu
  11. Olá pessoal, Neste site, http://www.retratosagua.com , existe a possibilidade de você escolher um efeito, fazer o upload de uma foto e o efeito fica sobre a foto que você enviou. O efeito e a foto se juntam formando uma nova imagem. Alguém teria idéia de como fazer isso?? Obrigado, Douglas
  12. Obrigado pelas informações... Realmente a única forma é abrindo uma página, sendo eu ou um visitante. Bareta, não entendi porque fazer em um iframe, isso melhoraria algo?? Vamos dizer que tenho centenas de e-mails por dia para serem enviados, isso não faria com que a página ficasse demorando para abrir?? Obrigado
  13. Olá Pessoal, Estou fazendo um sistema onde no banco de dados terá um ítem que expira em uma determinada data: Um dos campos estará como data 12/02/2008 Gostaria de saber se teria um script que fizesse todos os dias em uma determinada hora uma varredura em meu banco de dados buscando os ítens que expiraram (data()>12/02/2008) e os excluíssem automaticamente, sem que eu tenha que deletar manualmente. Esta mesma função seria utilizada para eu estar enviando e-mails de Feliz Aniversário aos meus clientes cadastrados. Obrigado, Douglas Obs: pelo que eu vi aqui no fórum, a solução seria criar um script que ao abrir o index enviaria os e-mails e verificaria o BD, se alguém tiver outra idéia que não fosse preciso abrir nenhuma página, agradeceria a ajuda
  14. Geleiaskt obrigado pela ajuda. O problema real esta no código ASP. Abaixo deixo para todos o código do SlideShow - tmFerreira funcionando perfeitamente em ASP <% dim dsn dim Conn dsn="DBQ=" & Server.Mappath("dados/banco.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};" Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open dsn Set rs = Server.CreateObject("ADODB.Recordset") RS.ActiveConnection = Conn %> <html> <head> <title>S l i d e S h o w - by tmferreira </title> <style><!-- * { margin: 0; padding: 0; list-style: none; text-decoration: none; font-family: Verdana, Arial, Helvetica, Sans-Serif; } div#slideshow { height: 200px; width: 500px; border: 1px solid black; } div#slideshow #links { float: right; clear: both; width: 10%; text-align: center; } div#slideshow #links li { font-size: 12px; border-top: 1px solid white; line-height: 49px; } div#slideshow #links li.inativo { background: #EEEEEE; } div#slideshow #links li.ativo { background: #D9D9D9; } div#slideshow #slides { background: #BBBBBB; height: 100%; color: white; font-size: 14px; } div#slideshow #slides .visible { display: block; } div#slideshow #slides .hidden { display: none; } div#slideshow #slides div span { display: block; } div#slideshow #slides .titulo{ font-weight: bold; font-size: 16px; padding: 5px 0 0 5px; } div#slideshow #slides .conteudo { padding: 0 0 0 5px; } --></style> <script type="text/javascript"> var tempo; var intervalo = 2000; //Intervalo entra as mudanças de slides. Definido em milisegundos. function $(campo) { return document.getElementById(campo); } //Trecho de código criado por Wilker, pego em http://forum.imasters.com.br/index.php?s=&...st&p=660522 var $A = Array.from = function(iterable) { if (!iterable) return []; if (iterable.toArray) { return iterable.toArray(); } else { var results = []; for (var i = 0; i < iterable.length; i++) results.push(iterable[i]); return results; } }; Function.prototype.bind = function() { var __method = this, args = $A(arguments), object = args.shift(); return function() { return __method.apply(object, args.concat($A(arguments))); }; }; //Fim do trecho de código criado por Wilker function addEvent(obj, evType, fn) { //Função adaptada da original de Christian Heilmann, em http://www.onlinetools.org/articles/unobtr...t/chapter4.html if (typeof obj == "string") { if (null == (obj = document.getElementById(obj))) { throw new Error("Elemento HTML não encontrado. Não foi possível adicionar o evento."); } } if (obj.attachEvent) { return obj.attachEvent(("on" + evType), fn); } else if (obj.addEventListener) { return obj.addEventListener(evType, fn, true); } else { throw new Error("Seu browser não suporta adição de eventos."); } } function nextSlide() { var divs = $('slides').getElementsByTagName('div'); var i; for (i = 0; i < divs.length; i++) { if (divs[i].className == 'visible') { divs[i].className = 'hidden'; $('link' + (i + 1)).className = 'inativo' i = (i == divs.length - 1) ? 0 : i + 1; divs[i].className = 'visible'; $('link' + (i + 1)).className = 'ativo' break; } } } function init() { var as = $('links').getElementsByTagName('a'); var i; for (i = 0; i < as.length; i++) { var f = function(v) { setSlide(as[v]); } addEvent(as[i], 'click', f.bind(this, i)); } tempo = setInterval('nextSlide()', intervalo); } function setSlide(link) { var divs = $('slides').getElementsByTagName('div'); var i; for (i = 0; i < divs.length; i++) { divs[i].className = 'hidden'; } var lis = $('links').getElementsByTagName('li'); for (i = 0; i < lis.length; i++) { lis[i].className = 'inativo'; } link.parentNode.className = 'ativo'; i = parseInt(link.firstChild.data); $('slide' + i).className = 'visible'; clearInterval(tempo); } addEvent(window, 'load', init); </script> </head> <body> <div id="slideshow"> <div id="links"> <ul> <% Dim contadorb contadorb = 1 class2="ativo" Set rsb = Conn.Execute("SELECT top 4 * FROM TABELA order by data") If not rsb.EOF Then Do until rsb.eof %> <li id="link<%=contadorb%>"class="<%=class2%>"><a href="#"><%=contadorb%></a></li> <% rsb.MoveNext contadorb = contadorb + 1 class2="inativo" Loop Else Response.Write(" <p>Pedimos desculpa pois ouve um problema.</p> ") End if %> </ul> </div> <div id="slides"> <% Dim contador contador = 1 class1="visible" Set rs = Conn.Execute("SELECT top 4 * FROM TABELA order by data") If not rs.EOF Then Do until rs.eof %> <div id="slide<%=contador%>" class="<%=class1%>"> <img src="noticias_inicial/<%=rs("foto")%>" style="float:left; margin: 0px; margin-right: 1px;" /> <%=Rs("titulo")%> <br /> <%=Rs("data")%> <br /> </div> <% rs.MoveNext contador = contador + 1 class1="hidden" Loop Else Response.Write(" <p>Pedimos desculpa pois ouve um problema.</p> ") End if %> </div> </div> </body> </html>
  15. Olá pessoal, Estou tentando fazer um slide show em ASP, mas estou tendo problemas na parte CSS. Abaixo coloco o código: <% conexão banco de dados %> <html> <head> <title>S l i d e S h o w - by tmferreira </title> <style><!-- * { margin: 0; padding: 0; list-style: none; text-decoration: none; font-family: Verdana, Arial, Helvetica, Sans-Serif; } div#slideshow { height: 200px; width: 500px; border: 1px solid black; } div#slideshow #links { float: right; clear: both; width: 10%; text-align: center; } div#slideshow #links li { font-size: 12px; border-top: 1px solid white; line-height: 49px; } div#slideshow #links li.inativo { background: #EEEEEE; } div#slideshow #links li.ativo { background: #D9D9D9; } div#slideshow #slides { background: #BBBBBB; height: 100%; color: white; font-size: 14px; } div#slideshow #slides .visible { display: block; } div#slideshow #slides .hidden { display: none; } div#slideshow #slides div span { display: block; } div#slideshow #slides .titulo{ font-weight: bold; font-size: 16px; padding: 5px 0 0 5px; } div#slideshow #slides .conteudo { padding: 0 0 0 5px; } --></style> <script type="text/javascript"> var tempo; var intervalo = 2000; //Intervalo entra as mudanças de slides. Definido em milisegundos. function $(campo) { return document.getElementById(campo); } //Trecho de código criado por Wilker, pego em http://forum.imasters.com.br/index.php?s=&...st&p=660522 var $A = Array.from = function(iterable) { if (!iterable) return []; if (iterable.toArray) { return iterable.toArray(); } else { var results = []; for (var i = 0; i < iterable.length; i++) results.push(iterable[i]); return results; } }; Function.prototype.bind = function() { var __method = this, args = $A(arguments), object = args.shift(); return function() { return __method.apply(object, args.concat($A(arguments))); }; }; //Fim do trecho de código criado por Wilker function addEvent(obj, evType, fn) { //Função adaptada da original de Christian Heilmann, em http://www.onlinetools.org/articles/unobtr...t/chapter4.html if (typeof obj == "string") { if (null == (obj = document.getElementById(obj))) { throw new Error("Elemento HTML não encontrado. Não foi possível adicionar o evento."); } } if (obj.attachEvent) { return obj.attachEvent(("on" + evType), fn); } else if (obj.addEventListener) { return obj.addEventListener(evType, fn, true); } else { throw new Error("Seu browser não suporta adição de eventos."); } } function nextSlide() { var divs = $('slides').getElementsByTagName('div'); var i; for (i = 0; i < divs.length; i++) { if (divs[i].className == 'visible') { divs[i].className = 'hidden'; $('link' + (i + 1)).className = 'inativo' i = (i == divs.length - 1) ? 0 : i + 1; divs[i].className = 'visible'; $('link' + (i + 1)).className = 'ativo' break; } } } function init() { var as = $('links').getElementsByTagName('a'); var i; for (i = 0; i < as.length; i++) { var f = function(v) { setSlide(as[v]); } addEvent(as[i], 'click', f.bind(this, i)); } tempo = setInterval('nextSlide()', intervalo); } function setSlide(link) { var divs = $('slides').getElementsByTagName('div'); var i; for (i = 0; i < divs.length; i++) { divs[i].className = 'hidden'; } var lis = $('links').getElementsByTagName('li'); for (i = 0; i < lis.length; i++) { lis[i].className = 'inativo'; } link.parentNode.className = 'ativo'; i = parseInt(link.firstChild.data); $('slide' + i).className = 'visible'; clearInterval(tempo); } addEvent(window, 'load', init); </script> </head> <body> <div id="slideshow" name="slideshow"> <div id="links" name="links"> <ul> <% Dim contadorb contadorb = 1 Set rsb = Conn.Execute("SELECT top 4 * FROM noticias order by data") If not rsb.EOF Then Do until rsb.eof %> <li id="link<%=contadorb%>" name="link<%=contadorb%>" class="ativo"><a href="#"><%=contadorb%></a></li> <% rsb.MoveNext contadorb = contadorb + 1 Loop Else Response.Write(" <p>Pedimos desculpa pois ouve um problema.</p> ") End if %> </ul> </div> <div id="slides" name="slides"> <% Dim contador contador = 1 Set rs = Conn.Execute("SELECT top 4 * FROM noticias order by data") If not rs.EOF Then Do until rs.eof %> <div id="slide<%=contador%>" name="slide<%=contador%>" class="visible"> <img src="noticias/<%=rs("foto")%>" width="250px" height="160px" style="float:left; margin: 0px; margin-right: 1px;" /> <%=Rs("titulo")%> <br /> <%=Rs("data")%> <br /> </div> <% rs.MoveNext contador = contador + 1 Loop Else Response.Write(" <p>Pedimos desculpa pois ouve um problema.</p> ") End if %> </div> </div> </body> </html> Neste código o sistema mostra 4 notícias Vou descrever os problemas: Ao abrir a página ela mostra todas as 4 notícias uma abaixo da outra. Após o primeiro ciclo de slides ele vai apagando até que fique normal. O problema seria nesta linha: <div id="slide<%=contador%>" name="slide<%=contador%>" class="visible"> Porque esta como class="visible", mas se eu colocar hidden não aparece nada. Existe alguma forma de resolver isso??? Por favor pessoal estou a semanas quebrando a cabeça nisso... Obrigado Douglas Obs.: A parte em ASP esta OK Estou querendo também colocar Fade nas transações das imagens, mas acho que isso é com o pessoal do JS, né!?
  16. douglasdamame

    Data No Access

    Oi Pessoal !!! Será que alguém poderia me ajudar??
  17. douglasdamame

    Data No Access

    Olá Pessoal, estou me matando a dias e não consigo resolver !! estou fazendo um sistema de classificados e meu servidor é extrangeiro... Quando eu envio o anuncio ele está salvando em data mm/dd/aaa Já coloquei o Session.LCID = 1046 e me resolveu muita coisa, mas agora percebi que é no access. O campo DATA_EXP da tabela esta como Data/Hora. Se eu imprimir na tela o NOW() esta ok !! (DD/MM/AAAA) O meu campo do formulario esta assim: <input name="data_EXP" type="hidden" id="data_EXP" value="<%=now+30%>"> Então eu sei que ele esta indo direito para a tabela, mas não sei porque ao salvar os dados ele inverte !! Se eu altero o campo da tabela DATA_EXP para Texto, ai ao fazer a comparação no select: SQL1 = "SELECT * from Class WHERE ID_cat Like '"& id_t &"' and data_exp >= NOW()" Da ERRO!! pois eu estaria comparando data com texto Como resolver isso??????? O sistema esta rodando perfeitamente no meu computador, IIS...
  18. Olá Bareta,primeirametnte obrigado por me responder... Bem, jogar o conteúdo para o BD, é sem problemas,mas eu nãoqueria fazer isso,pois queria que as páginas fossem criadas mersmo, on-line.... se não seria como um sistema de notícias ou artigos... O que eu queria entender é como criar as páginas dinamicamente, tipo.... eu vou fazer uma página sobre um Evento. gostaria de criar a página Festa2007.html ou asp , então como colocar o conteúdo digitado por ele, texto e fotos feito no editor para esta página? Como salvar de forma que seja criada a página sem ser com o conteúdo enviado ao bd? Enviando para o BD achjo que éaté facil, sem problemas, mas o link fica ruim (eventos.asp?id=102) até eu explicar como este link funcionaria... Pois também gostaria de criar um sistema para elemesmo colocar os banners ou fotos utilizando o link (isso eu não tenhoproblemas para fazer) Bem, se você acha que é muito complicado fazer as páginas serem criadas on-line eu faço então com o BD.. Este projeto seria muito interessante para mim, pois para breve estava pensando em fazer um sistema, onde a pessoa de cadastraria no site e automaticamente seria criado uma pasta com o nome da pessoa e nela uma página Index pré-configurada, mas isso tudo automaticamente,,,, e a pessoa iria acessar seu espaço por www.meusite.com/seunome ...... isso seria viável?? O que acha? Obrigado pela atenção, Douglas Damame
  19. Olá pessoal, Bem, estou precisando montar um editor de páginas, ou seja, no admnistrativo do site o meu cliente poderá fazer novas página on-line e salvar, mas como fazer isso?? Eu preciso que ele crie as páginas e não apenas o conteúdo. Ele poderá por exemplo fazer uma página com fotos e textos , para isso eu pensei no FCKeditor, mas to perdito, sem a menor idéia de como fazer isso... Seria um Editor On-line como os que existe em muitos host por ai. Para terem um exemplo seria isto : http://kingeditor.kinghost.com.br/editor/index.asp Gostaria de entender a lógica deste sistema... Se alguém tiver alguma idéiaou algum sistema parecido agradeceria muito a ajuda. Douglas
  20. Bem, Ou você coloca todoas as imagens do mesmo tamanho ou você usa o ASPJpeg para tratar o tamanho da imagem ao slvá-la
  21. rajneesh, Muitíssimo obrigado !!! Funcionou quando eu coloquei as aspas simples deste modo: document.getElementById("URL").href="java script:abre_foto('" + URL + "')"; Valeu mesmo !!!!! Aproveitando, como o meu objetivo é aprender, Por que funciou colocando este + entre a variável?? Obrigado Douglas Damame
  22. Pessoal, Por favor, preciso muito da ajuda de vocês ... Bem, modifiquei o código acima totalmente, estou conseguindo mostrar a descrição de cada foto, mas agora tenho que ao clicar sobre a imagem maior ela abra em uma popup para mostrar a imagem com tamanho real. Bem como estou fazendo: 1 - O script que pega as variaveis <script language="javascript"> function MostraFoto(NomeFoto, URL, Legenda,Texto ){ document.getElementById("FotoSelecionada").src=NomeFoto; document.getElementById("URL").href="java script:abre_foto('URL')"; document.getElementById("LegendaFoto").innerHTML=Legenda.replace("(#Apostrofo#)", "'"); } //--> </SCRIPT> 2 - As variáveis que ao clicar sobre as miniaturas mostram em imagem média e ao clicar na média abriria uma popup <%if Rs("Foto1") <> "" then %> <a href='java script:MostraFoto("Fotos-eventos/destaque_<%=Rs("Foto1")%>", "fotos-eventos/<%=RS("foto1")%>", "<%=Rs("Texto_Foto1")%>", "")'><img src='Fotos-eventos/ssmall_<%=RS("Foto1")%>' hspace="3" vspace="3" border="0" ></a>&nbsp; <% end if%> Como descrevi acima, são 10 fotos Quais são os erros: Não consigo acertar a variável URL por causa dos "" Para funcionar ele deveria estar deste jeito: document.getElementById("URL").href="java script:abre_foto('URL')"; Mas assim o script não entende que a URL é uma variável Se eu colocar: document.getElementById("URL").href="java script:abre_foto("URL")"; Dá erro Tentei também: <a href='java script:MostraFoto("Fotos-eventos/destaque_<%=Rs("Foto1")%>", "java script:abre_foto('fotos-eventos/<%=RS("foto1")%>') ", "<%=Rs("Texto_Foto1")%>", "")'><img src='Fotos-eventos/ssmall_<%=RS("Foto1")%>' hspace="3" vspace="3" border="0" ></a>&nbsp; <% end if%> E colocar no java: document.getElementById("URL").href=URL Mas dão os mesmos problemas!! Ou seja , já tentei e várias formas e não consegui, Por favor, me deem uma ajudinha !!!!
  23. Olá Pessoal, Estou fazendo um album de fotos para eventos e cada evento terá 10 fotos. Estou fazendo em Javascript + ASP. Já estou alternando as fotos sem problemas mas tenho alternar juntos a descrição de cada foto, que esta sendo este o meu problema. Segue abaixo o código. <TABLE width="100%" height="250" border=1 cellPadding=2 cellSpacing=0 bordercolor="f5f5f5"> <TR> <TD width="319" height="255" vAlign=middle><div align="center"> <div align="center"> <% Foto=rs("foto") Foto1=rs("foto1") Foto2=rs("foto2") Foto3=rs("foto3") Foto4=rs("foto4") Foto5=rs("foto5") Foto6=rs("foto6") Foto7=rs("foto7") Foto8=rs("foto8") Foto9=rs("foto9") If not foto = "" then fotoinicial = foto Else If not foto1 = "" then fotoinicial = foto1 else If not foto2 = "" then fotoinicial = foto2 Else If not foto3 = "" then fotoinicial = foto3 Else If not foto4 = "" then fotoinicial = foto4 Else If not foto5 = "" then fotoinicial = foto5 Else If not foto6 = "" then fotoinicial = foto6 Else If not foto7 = "" then fotoinicial = foto7 Else If not foto8 = "" then fotoinicial = foto8 Else If not foto9 = "" then fotoinicial = foto9 Else End if End if End if End if End if End if End if End if End if End if %> <% if not fotoinicial = "" then %> <A id=url_imagem onclick="abre_foto('Fotos-eventos/<%=fotoinicial%>')"><IMG id=img_ampliada src="Fotos-eventos/destaque_<%=fotoinicial%>" border=0 style='CURSOR: hand'></A> <A onclick="abre_foto('Fotos-eventos/<%=fotoinicial%>')"> </A> </div> <div id="texto" align="center"><%=RS("texto_foto")%> </div> </TD> <% else %> <img src="Fotos-eventos/ssmall_semfoto_250.gif"> <% end if %> <TD width="155" bgcolor="f5f5f5"> <div align="center"> <%if Rs("Foto") <> "" then%> <IMG src="Fotos-eventos/ssmall_<%=RS("Foto")%>" hspace="3" vspace="3"border=0 style="CURSOR: hand; BORDER-BOTTOM: #ffffff 2px solid" onclick="img_ampliada.src=this.src1; url_imagem='java script:abre_foto(\'Fotos-eventos/<%=Rs("Foto")%>\')'" src1="Fotos-eventos/destaque_<%=Rs("Foto")%>">&nbsp; <%end if if Rs("Foto1") <> "" then%> <IMG src="Fotos-eventos/ssmall_<%=Rs("Foto1")%>" hspace="3" vspace="3"border=0 style="CURSOR: hand; BORDER-BOTTOM: #ffffff 2px solid" onclick="img_ampliada.src=this.src1; url_imagem='java script:abre_foto(\'Fotos-eventos/<%=Rs("Foto1")%>\')'" src1="Fotos-eventos/destaque_<%=Rs("Foto1")%>">&nbsp; <%end if if Rs("Foto2") <> "" then%> <IMG src="Fotos-eventos/ssmall_<%=Rs("Foto2")%>" hspace="3" vspace="3"border=0 style="CURSOR: hand; BORDER-BOTTOM: #ffffff 2px solid" onclick="img_ampliada.src=this.src1; url_imagem='java script:abre_foto(\'Fotos-eventos/<%=Rs("Foto2")%>\')'" src1="Fotos-eventos/destaque_<%=Rs("Foto2")%>">&nbsp; <%end if if Rs("Foto3") <> "" then%> <IMG src="Fotos-eventos/ssmall_<%=Rs("Foto3")%>" hspace="3" vspace="3" border=0 style="CURSOR: hand; BORDER-BOTTOM: #ffffff 2px solid" onclick="img_ampliada.src=this.src1; url_imagem='java script:abre_foto(\'Fotos-eventos/<%=Rs("Foto3")%>\')'" src1="Fotos-eventos/destaque_<%=Rs("Foto3")%>">&nbsp; <%end if if Rs("Foto4") <> "" then%> <IMG src="Fotos-eventos/ssmall_<%=Rs("Foto4")%>" hspace="3" vspace="3" border=0 style="CURSOR: hand; BORDER-BOTTOM: #ffffff 2px solid" onclick="img_ampliada.src=this.src1; url_imagem='java script:abre_foto(\'Fotos-eventos/<%=Rs("Foto4")%>\')'" src1="Fotos-eventos/destaque_<%=Rs("Foto4")%>">&nbsp; <%end if if Rs("Foto5") <> "" then%> <IMG src="Fotos-eventos/ssmall_<%=Rs("Foto5")%>" hspace="3" vspace="3" border=0 style="CURSOR: hand; BORDER-BOTTOM: #ffffff 2px solid" onclick="img_ampliada.src=this.src1; url_imagem='java script:abre_foto(\'Fotos-eventos/<%=Rs("Foto5")%>\')'" src1="Fotos-eventos/destaque_<%=Rs("Foto5")%>">&nbsp; <%end if if Rs("Foto6") <> "" then%> <IMG src="Fotos-eventos/ssmall_<%=Rs("Foto6")%>" hspace="3" vspace="3" border=0 style="CURSOR: hand; BORDER-BOTTOM: #ffffff 2px solid" onclick="img_ampliada.src=this.src1; url_imagem='java script:abre_foto(\'Fotos-eventos/<%=Rs("Foto6")%>\')'" src1="Fotos-eventos/destaque_<%=Rs("Foto6")%>">&nbsp; <%end if if Rs("Foto7") <> "" then%> <IMG src="Fotos-eventos/ssmall_<%=Rs("Foto7")%>" hspace="3" vspace="3" border=0 style="CURSOR: hand; BORDER-BOTTOM: #ffffff 2px solid" onclick="img_ampliada.src=this.src1; url_imagem='java script:abre_foto(\'Fotos-eventos/<%=Rs("Foto7")%>\')'" src1="Fotos-eventos/destaque_<%=Rs("Foto7")%>">&nbsp; <%end if if Rs("Foto8") <> "" then%> <IMG src="Fotos-eventos/ssmall_<%=Rs("Foto8")%>" hspace="3" vspace="3" border=0 style="CURSOR: hand; BORDER-BOTTOM: #ffffff 2px solid" onclick="img_ampliada.src=this.src1; url_imagem='java script:abre_foto(\'Fotos-eventos/<%=Rs("Foto8")%>\')'" src1="Fotos-eventos/destaque_<%=Rs("Foto8")%>">&nbsp; <%end if if Rs("Foto9") <> "" then%> <IMG src="Fotos-eventos/ssmall_<%=Rs("Foto9")%>" hspace="3" vspace="3" border=0 style="CURSOR: hand; BORDER-BOTTOM: #ffffff 2px solid" onclick="img_ampliada.src=this.src1; url_imagem='java script:abre_foto(\'Fotos-eventos/<%=Rs("Foto9")%>\')'" src1="Fotos-eventos/destaque_<%=Rs("Foto9")%>">&nbsp; <%end if%> </div></TD> </TR> </TABLE> Tentei colocar o texto em uma <DIV> com ID para chama-la, mas não consegui.. Se alguém puder me ajudar, agradeceria muitíssimo
  24. Obrigado Andreia !! Tinha esquecido .... Valeu. está funcionando..... Douglas
  25. Olá, Estou com uma dúvida em um select que estou fazendo... . . . ID = Session("login") SQL = "SELECT* FROM admin where id = '"& ID &"'" . . . Até ai beleza !! O meu problema esta em mostrar todos os resultados da busca menos o ID da pessoa... O que esu estou fazndo é um sistema admnistrativo, só que eu não quero o o administrador possa deletar a si próprio, mas pode deletar os outros. Ele poderá alterar seus dados e não os dos outros. Então na página de Excluir administradores, tenho que mostrar os cadastrados menos ele mesmo... No exemplo que dei acima para editar a si mesmo está OK, mas como farei para fazer o Select na página de Excluir ?? Valeu, Douglas
×
×
  • Criar Novo...