Cybertrax

GALERA EU TO FAZENDO UMA GALERIA DE FOTOS EM MEU SITE EM FLASH, E ELA USA O SEGUINTE RECURSO: ELA POUXA UM ARQUIVO XML QUE TEM AS REFERÊNCIAS (ENDEREÇOS) DAS IMAGENS, A GALERIA É TODA EM FLASH E TEM PAGINAÇÃO TUDO AUTOMATICA MAS ELE FAZ A PAGINAÇÃO DE ACORDO COM A QUANTIDADE DE INSCRIÇÕES QUE TENHA NESSE ARQUIVOS XML. MAS É COMPLICADO EU TODA VEZ TER QUE COLOCAR A QUANTIDADE DE FOTOS, EU QUERIA UMA SOLUÇÃO PRA MEU ARQUIVO XML PARA QUE ELE LEIA QUANTOS ARQUIVOS (FOTOS) TENHA NA PASTA E ELE ESCREVA PRA QUE O ARQUIVO .SWF LEIA. De uma olhada no arquivo XML: (Neste caso eu tive que escrever tipo ai tem 9 fotos) ********************* fotos.xml ************************* <?xml version="1.0" encoding="UTF-8"?> <fotos> <foto fp="imgs/TN_agitavps1.jpg" fg="imgs/agitavps1.jpg"/> <foto fp="imgs/TN_agitavps2.jpg" fg="imgs/agitavps2.jpg"/> <foto fp="imgs/TN_agitavps3.jpg" fg="imgs/agitavps3.jpg"/> <foto fp="imgs/TN_agitavps4.jpg" fg="imgs/agitavps4.jpg"/> <foto fp="imgs/TN_agitavps5.jpg" fg="imgs/agitavps5.jpg"/> <foto fp="imgs/TN_agitavps6.jpg" fg="imgs/agitavps6.jpg"/> <foto fp="imgs/TN_agitavps7.jpg" fg="imgs/agitavps7.jpg"/> <foto fp="imgs/TN_agitavps8.jpg" fg="imgs/agitavps8.jpg"/> <foto fp="imgs/TN_agitavps9.jpg" fg="imgs/agitavps9.jpg"/> </fotos> ********************* fotos.xml ************************* alguém ME AJUDE POR FAVOR !!!!

GALERA OLHA AKI, SÓ TA DANDO ERRO HTTP 500 (ERRO DE SERVER) O QUE TEM DE ERRADO NO MEU SCRIPT ? O MEU BANDO DE DADOS ESTA NA MESMA PASTA, NO ASQUIVO ASP, E ELE SE CHAMA "fotos.mdb"... Neste banco de dados estão os link (url) das fotos que entraram na minha galeria... OLHA O SCRIPT AI, SE alguém PUDER ME AJUDAR EU FICO MUITO AGRADECIDO; '******************************************************* <% If session("PrimeiraVez") <> "não" then ConnectString = "dsn=fotos.mdb" Set Conn = server.CreateObject("ADODB.Connection") Conn.CursorLocation = 3 ' adUseClient Conn.Open ConnectString %> '******************************************************** <% Set rstTemp = server.CreateObject("ADODB.Recordset") rstTemp.PageSize = 20 ' define o tamanho da "página" rstTemp.CacheSize = 20 ' define o tamanho do cache com o mesmo tamanho da página rstTemp.AbsolutePage = 1 ' informa que a primeira página de registros será mostrada %> '*********************************************************** <% ConnectString= "dsn=banco;uid=usuário;pwd=senha" If Session("PrimeiraVez") <> "não" then ' Se é a primeira vez que a página é carregada Set Conn = Server.CreateObject("ADODB.Connection") Conn.CursorLocation = 3 ' é o mesmo que adUseClient Conn.Open ConnectString Set rstTemp = Server.CreateObject("ADODB.Recordset") rstTemp.CacheSize = 20 ' tamanho do cache rstTemp.PageSize = 20 ' tamanho da página de registros sql = "Select * from tabela" rstTemp.Open Sql, Conn session("Pagina") = 1 MostraDados Session("PrimeiraVez") = "não" Else ' Se a página já foi carregada, verifica se deve incrementar ou decrementar o contador de páginas if Request("Navegacao") = "Proxima" then Session("Pagina") = Session("Pagina") + 1 Else If Request("Navegacao") = "Anterior" then Session("Pagina") = Session("Pagina") - 1 End If End If Set Conn = Server.CreateObject("ADODB.Connection") Conn.CursorLocation = 3 ' adUseClient Conn.Open ConnectString Set rstTemp = Server.CreateObject("ADODB.Recordset") rstTemp.CacheSize = 20 rstTemp.PageSize = 20 sql = "Select * from tabela" rstTemp.Open Sql, Conn MostraDados End If Sub MostraDados() Dim Contador rstTemp.AbsolutePage = Session("Pagina") ' vai para o número da página que está armazenado em session("pagina") Response.Write "Existem " & rstTemp.RecordCount & " registros na tabela - Mostrando página " & Session("Pagina") & " de " & rstTemp.PageCount If Session("Pagina") <> 1 then response.write " [ Anterior ] " End If If Session("Pagina") <> rstTemp.PageCount then response.write "[ Proxima ] " End If response.write " " For contador = 1 to 20 Response.Write rstTemp("campo") & " " rstTemp.MoveNext If rstTemp.Eof then Exit For Next End Sub %> '*********************************************************** AGUARDO AJUDA !!

Galera não sei , mas pode ser feito em flash entaum , sem problema algum.... alguém tem o código ae ?

CARA NA BOA não SEI QUAL COMPONENTE É não !! POIS É UM FORMULARIO QUE FAZ O UPLOAD E ENVIA AS FOTOS PARA UMA PASTA E PEGA O NOME DELE E JOGA NO BANDO DE DADOS ACCESS!! VOU VOLAR O CÓDIGO FONTE AKI , DAI vocês DÃO UMA OLHADA !! ************************************************************** <!--#include file="config.asp"--> <% if session("usuario") = "" and session("senha") = "" then response.redirect "admin.asp" end if %> <html> <head> <title><%=TS%></title> <link rel="stylesheet" type="text/css" href="estilo.css"> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"></head> <body text="#000000"> <% If request.querystring("id")="1" then Set Connect = Server.CreateObject("adodb.connection") Connect.Open Dados ComandoSQL = "SELECT * FROM noticias order by id desc" Set bd = Connect.Execute(ComandoSQL) If Not bd.EOF Then nomefoto = bd("ID") Else End If %> <FORM ENCTYPE="multipart/form-data" ACTION="imagens/index.asp?func=2&nome=<%=nomefoto%>" METHOD=POST id=form name=form> <div align="center"><br> <img src="../img/Logotipo_AGITA_TRANSP.gif" width="400" height="130"> <br> <br> </div> <TABLE align="center" cellpadding="0" cellspacing="0" border="1" bordercolor="#000000" bgcolor="#FFFFFF" width="450"> <TR> <TD height="18" align="center" bgcolor="#FFCC00"><b><font size="2">Not&iacute;cia de ID.:<%=nomefoto%> cadastrada com sucesso.</font></b></TD> </TR> <TR> <TD height="18" align="center"><b><br> </b><a href="index.asp"><b>Clique aqui</b></a> para voltar ao site ou<br> <br> <font color="#990000"><b>Envie uma foto sua para colocarmos junto a not&iacute;cia.</b></font><br> <br> <INPUT NAME=File1 SIZE=30 TYPE=file> <BR> <INPUT type="submit" value="Enviar Arquivo"> <BR> <BR> <font size="1" color="#333333"><strong>Nota: Por favor seja paciente,<br> Voc&ecirc; n&atilde;o receber&aacute; nenhuma notifica&ccedil;&atilde;o at&eacute; que o arquivo seja totalmente trasnferido.</strong></font><BR> <BR> <p align="center"><a href="submit.asp"><b>Enviar outra not&iacute;cia</b></a></p> </TD> </TR> </TABLE> </form> <% Else Response.redirect "submit.asp" end if %> </body> </html> ******************************************************************

GALERA GOSTARIA DE SABER COMO FAZ PARA EU CRIAR UMA PASTA NO SERVER , POIS TENHO UM SITE DE FESTAS DAI CRIEI UM ADMIN PARA ENVIAR AS FOTOS E TIPO UMA GALERIA TUDO AUTOMATICA, MAS PARA QUE AS FOTOS DO UPLOAD IREM PARA A PASTA EU TENHO ANTES CRIAR ELA PELO FTP DEPOIS DIRECIONAR VIA FORMULÁRIO PRA QUAL PASTA IRAM OS UPLOADS.. POR EXEMPLO : Quero que as fotos que eu estou postando (via upload) irem para uma pasta de nome "SABADO" no endereço "http://www.xxxx.com.br/fotos/2005/out/ **** " mas o nome e destino da pasta deverá ser inserido (via formulário) ... alguém ME AJUDE .. POR FAVOR !!

Cara eu tenho um sistema que ele envia os uploads sim pra dentro de uma pasta, o nome ele modifica mas pode alterar se quizer manda o teu e-mail ai que eu mando ai pra vc !! É um sistema de noticias e de criação de próximos agitos, se quizer eu mando pra tu e você tira o necessário ! Ele tem senha parte de admin e mais uma porrada de coisa.. Se quizer da um toquer ai !!

ISSO AI GALERA INSTALEI ESSE SOFTWARE AQUI EM MINHA MAQUINA !! NÃO VI GRANDES MUDANÇAS NÃO, POIS AINDA É EM INGLÊS E USEI ELE AINDA MUITO POUCO MAS VISUALMENTE É MELHOR COM ALGUMAS NOIDADES, OS ARQUIVOS ABERTOS FICAM EM JANELAS, MELHORES OPÇÕES PARA EXPORTAÇÃO. VEJA AI ALGUMAS IMAGENS DESTE SOFTWARE... IMAGEM 1 DO FIREWORKS 8.0 IMAGEM 2 DO FIREWORKS 8.0

GALERA EU TENHO UM SITE E GOSTARIA DE SABER SE alguém TEM ALGUM SCRIPT QUE TIPO, MEDE A VELOCIDADE DA CONEXÃO DO VISITANTE ANTES QUE ELE ENTRE NO SITE, POIS SE ELE TIVER COM UMA CONEXÃO LENTA ELE REDIRECIONA PARA UM SITE MAIS LEVE E SE TIVER BANDA LARGA DAI ELE REDIRECIONA PARA UM SITE COM MAIS COISAS EM FLASH E ETC ?? alguém PODE ME DIZER, QUE TEM ESTA POSSIBILIDADE ???