Marianne

Obrigadaa !!!

O Endereço esta fora do ar.. Procurei no site dos correios mas não tem o banco para download. alguém tem o banco ou sabe onde posso baixa-lo? Obrigada demais :) Mary marianne@gmail.com

Oi Isso ocultaria o 2 telefone né... Algeum pode me ajudar a formatar esta query que não oculte o segundo telefone.. Obrigada

Tenho a query abaixo mas quando rodo ela ela exibe 2 linahs no recordset, isso porque este cliente tem 2 telefones na tabelea de endereco.. Como posso otimizar para que mostra apenas 1 linha ? Tem como :) SELECT Empresa.Id AS EmpresaId, Empresa.Nome AS EmpresaNome, Empresa.Status AS EmpresaStatus, EmpresaEndereco.Endereco, EmpresaEndereco.Bairro, EmpresaEndereco.Cidade, EmpresaEndereco.Estado, EmpresaEndereco.Cep, EmpresaEndereco.Status AS EmpresaEnderecoStatus, EmpresaTelefone.DDD, EmpresaTelefone.Telefone, EmpresaTelefone.Ramal, EmpresaTelefone.Status AS EmpresaTelefoneStatus, EmpresaTipo.Nome AS EmpresaTipoNome, EnderecoTipo.Nome AS EnderecoTipoNome, TelefoneTipo.Nome AS TelefoneTipoNome FROM ((((Empresa INNER JOIN EmpresaEndereco ON Empresa.Id = EmpresaEndereco.EmpresaId) INNER JOIN EmpresaTelefone ON Empresa.Id = EmpresaTelefone.EmpresaId) INNER JOIN EmpresaTipo ON Empresa.EmpresaTipoId = EmpresaTipo.Id) INNER JOIN EnderecoTipo ON EmpresaEndereco.EnderecoTipoId = EnderecoTipo.Id) INNER JOIN TelefoneTipo ON EmpresaTelefone.TelefoneTipoId = TelefoneTipo.Id WHERE (((Empresa.Nome) LIKE '%maria%'))

Oi Amigos ! Estou fazendo um sisteminha de loja que a pessoa pesquisa um endereço pelo codigo postal. alguém sabe com o posso ter o banco de dados de ruas, cep etc? Ou Como posso fazer este link já abrindo uma pagina do correio direto no CP que preciso ? Obrigada desde já ok? Bjios Se alguém tiver o BD por mandar para o meu email que tem espaço Mary marianne80@gmail.com

Oi gente ! Não sei se pude mostrar exatamente o que preciso. Eu tenho 2 conexoes de Internet, uma atraves da REDE geral que tenho 1 IP fixo e tenho outra, com outra placa de rede que é o Speedy, que deixo com ip automatico ( como é necessario ) O problema: quando eu ligo: REDE IP FIXO e DEPOIS a REDE SPEEDY Entro no explorer estarei navegando usando o IP FIXO ( Os programas da rede funcionam ) Caso eu ligue: REDE SPEEDY e DEPOIS a REDE IP FIXO Entro no explorer estarei navegando usando o REDE SPEEDY ( os programas da REDE não funcionam ) Isso é o porem, queira deixar as 2 conexoes ativa e dizer qualis programas devem usar quais conexoes sabe? Obrigada !

'JackSSA' o que tem a ver renomear ??? Preciso de acessos diferenciados !

Oi Amigos, Sobre links de Internet. Tenho 2 links de Internet em minha maquina, ou melhor : 2 placas de REDE, sendo : 1 placa = Conexao pela rede interna com IP fixo (Tem acesso a Internet ) 2 placa = Conexao Speedy ( acesso por IP Dinamio ) Hoje consigo conectar ambas porem para eu ter certeza que estou navegando com uam delas tenho de desabilitar a outra. Pior: Tenho programas que so funcionam se eu estiver conectado na opção 1 e se eu conect pela opcao 2 e depois pela opcao 1 não adianta porque os programas so entende que a primeira que eu startei. há como eu separar isso selecionando quais programas ou explorer deve usar qual conexao? Obrigado ! Mari

TENHO O CODIGO PARA REDIMENCIONAR UMAGEM MAS há UM GRANDE PROBLEMA ! quando A IMAGEM não EXISTE NO SERVIDOR ELE DA ERRO :( ERRO: Persits.Jpeg.1 error '800a0002' The system cannot find the file specified. /site/pagina.asp CODIGO: Foto = "52" Set Jpeg = Server.CreateObject("Persits.Jpeg") caminho = "images/"&Foto&".jpg" Jpeg.Open server.mappath(caminho) altura = Jpeg.OriginalHeight largura = Jpeg.OriginalWidth IF altura >= 117 THEN alturaOK = 117 else alturaOK = altura END IF larguraOK = 82 Jpeg.close

gente estou usando este , funciona bem mas como posso colocar o whidth e o height formatando o tamanho que eu quero e não usar como porcentagem: obrigada <% Session.Timeout = 240 Response.Expires = 0 Response.Buffer = true Response.Clear Response.CacheControl = "no-cache" Response.AddHeader "Pragma", "no-cache" Response.Expires = -1 foto = request("foto")&".jpg" lar = request("lar") alt = request("alt") Set Image = Server.CreateObject("csImageFile.Manage") Caminho = "e:\home\Web\site\images\"&foto Image.ReadFile Caminho Image.Resize lar, 0 Response.ContentType = "image/jpeg" Response.BinaryWrite Image.JPGData Set Image = Nothing %>

Pessoal, consegui deixar o Upload funcionando mas está muito instavel.. já estou no fim do prazo e não consegui resolver >((( estou apurada demais .. Este codigo funciona, mas muitas vezes você faz 1 Upload beleza depois vai fazer outro ele fica pensando, pensando e depois da erro 500 como timeout.. Está acontecendo direto.. depois fecho tudo e abro as vezes vai.. Mas da muito erro.. O que posso melhorar ? ' -=-=-=--=-=-=-=-=-=-=-=-=-=-= Componente UpLoad. -=-=-=--=-=-=-=-=-=-=-=-=-=-= Set upl = Server.CreateObject("SoftArtisans.FileUp") upl.Path = "e:\home\Web\site\downloads\fotos" idImagem = upl.form("id") upl.form("txtImagem2").Saveas idImagem&".pdf" Set upl = Nothing

Tenho este codigo abaixo que funciona perfeitamente mas preciso de uma coisa urgente. Preciso pegar a imagem enviada que podera ser enorme, tipo 1000 x 1000 e redimenciona-la e gravar no tamanho 100 x 100 por exemplo Hj este codigo esta perfeito mas ele grava a imagem 1000 x 1000 :( Ajudem meninos inteligentes e obrigada como sempe a todos obs.: uso locaweb Cod.: Set upl = Server.CreateObject("SoftArtisans.FileUp") upl.Path = "e:\home\Web\site\images\autores" Nome = Replace(upl.Form("txtNomeAutor"),"'","''") email = Replace(upl.Form("txtEmail"),"'","''") site = Replace(upl.Form("txtSite"),"'","''") sSql = "INSERT INTO autor(Nome,Email,Site) values ('"&Nome&"' , '"&email&"' , '"&site&"' )" con.Execute(sSql) idImagem = 2 upl.form("txtImagem").Saveas idImagem&".jpg" Set upl = Nothing rsUltimoID.Close Set rsUltimoID = Nothing

Obrigada !!!!

Obrigado gente já consegui a propriedade upl.form("txtImagem").Saveas novafoto.jpg

Fiz um codigo que funciona perfeito para o que preciso mas quando ele redimenciona distorce porque a imagem original é muito grande já procurei codigos mas não consegui adaptar.. alguém pode me ajudar implantar aui um componente aspjpge ou outro que possa fazer isso? Uso locaweb Foto = "amigos" Set Jpeg = Server.CreateObject("Persits.Jpeg") caminho = "images/podcast/"&Foto&".jpg" Jpeg.Open server.mappath(caminho) altura = Jpeg.OriginalHeight largura = Jpeg.OriginalWidth Response.Write(largura &"x"& altura) IF altura >= 109 THEN larguraOK = 109 else larguraOK = altura END IF alturaOK = 74 Jpeg.close Obrigado !!!

já me deram uma ajuda mas esqueci de perguntar como posso com este codigo trocar o nome do arquivo que estou fazendo o upload.. Obrigado ! <HTML> <BODY> <% Set upl = Server.CreateObject("SoftArtisans.FileUp") upl.Path = "e:\home\\Web\site\images" upl.Save%> Total de Bytes Enviados: <%=upl.TotalBytes%> <% nome = upl.Form("nome") telefone = upl.Form("telefone") Response.Write(nome &" / "&telefone) Set upl = Nothing %> </BODY> </HTML>

Estou precisando de uma ajuda Fiz um form para um cliente mas acho que fiz errado ou não sei como resolver.. O campo Upload coloquei junto com os dados e pensei que poderia recuperar o caminho que foi fego no browser e fazer o upload e também gravar os dados em uma segunda pagina tudo junto.. O problema que o form precisar ser para tipo de arquivo e deste jeito não consigo recuprar nenhum dado no Request.form :((( fiz assim <FORM name="1" METHOD="POST" ENCTYPE="multipart/form-data" ACTION="upload_send.asp"> Nome: <input name="nome" type="text" id="nome" /> <br /> Telefone: <input name="telefone" type="text" id="telefone" /> <br /> Site: <input name="site" type="text" id="site" /> <br /> imagem: <INPUT NAME="FILE1" TYPE=FILE class="vdna_pr_11" SIZE=60> <BR> <input type=SUBMIT class="vdna_pr_11" value="Upload!" <%=btstatus%>> </FORM > E tentei recuprar assim.. <HTML> <BODY> <%' Set upl = Server.CreateObject("SoftArtisans.FileUp") %> <%' upl.Path = "e:\home\Web\site\images\images" %> <%' upl.Save %> Total de Bytes Enviados: <%'=upl.TotalBytes%> <%' Set upl = Nothing %> <% nome = Request.Form("nome") telefone = Request.Form("telefone") Response.Write(nome &" / "&telefone) %> </BODY> </HTML> Obrigada !!!!!!!!!

Oi Pessoal, :) Postei aqui porque não sei quem pdoe ajudar-me. Trabalho com FTP diariamente, abrindo, enviando, fechando, abrindo.. todo o dia. Existe algum programa de FTP que fica preconfigurado em um servidor, que fica lendo uma pasta do windows? Assim, ele lendo a pasta, se tiver algum arquivo dentro dela ele via o arquivo e depois deleta? Não sei se é besteira, mas isso ajudaria-me muito porque apenas teria que colocar um arquivo em uma pasta e o programa ficaria gerenciando e amndando por FTP pra mim tudo durante o dia. Obrigado ! Mari

Oi ! Não achei nenhuma opção para eu controlar o IP de usr :( TEm outro mais simples? Obrigada

Sera que existe algum Free ? :)

Não Tenho servidor DNS :( Obrigado !

Pessoal ! Tenho varios terminais que utilizam tarefas internas e algumas conexões de Rede porem o acesso a Internet está simitado pelo Firewall Tenho um grande problema. Terei 2 grupos de trabalho Não sei onde cada um vai sentar e a que horas vão trabalhar. Ambos grupos tem as mesmas maquinas Tenho 1 PC Tenho 2 grupos: GRUPO1 e GRUPO2 Tenho 2 usuários no WinXP : GRUPO1 e GRUPO2 Tenho 2 IPs.: 192.168.0.15 e 192.168.0.16 192.168.0.15 ( acessa apenas sites liberados ) 192.168.0.16 ( acessa tudos sites da internet ) Como posso fazer que o windows trabalhe com o IP 15 para o GRUPO1 e o IP 16 para o GRUPO2 ? :)

Olá :) Tenho uma grande duvida para poder construir um relatorio Tenho 2 tabelas: tabela_pedido id cod_pedido data_pedido tabela_pedido_produtos id id_pedido produto_id produto_nome valor Com estas duas tabelas consigo fazer relatorios com INNER JOIN sem problemas mas não consigo fazer um ranking !! porque quando faco um select assim (exemplo): Select * from taleba_pedido INNER JOIN tabela_pedido_produtos ON taleba_pedido.id tabela_pedido_produtos.id_pedido order by produto_id 1 pedido: 001 - Cesta de Natal 25,00 2 pedido: 002 - Cesta alemã 26,00 3 pedido: 003 - Cesta alemã 26,00 4 pedido: 004 - Cesta alemã 26,00 5 pedido: 005 - Cesta alemã 26,00 6 pedido: 006 - Cesta 1000 coisas 26,00 Assim funciona 100% mas não tenho um ranking porque não tem a soma e nem está ordenando por soma de valores.. eu gostaria de um relatorio assim: Cesta alemã - Total de 104,00 1 pedido: 002 - Cesta alemã 26,00 2 pedido: 003 - Cesta alemã 26,00 3 pedido: 004 - Cesta alemã 26,00 4 pedido: 005 - Cesta alemã 26,00 Cesta 1000 coisas - Total de 26,00 1 pedido: 006 - Cesta 1000 coisas 26,00 Cesta de Natal - Total de 25,00 1 pedido: 001 - Cesta de Natal 25,00 Assim eu teria um ranking de produtos mais vendidos :) Obrigada mesmo !

OBRIGADO BARETA !!!!! DEu certinho :)

Tenho uma SQL assim: select * adm where status = '"&variavel&"' Para eu mostrar os ativos coloco a variavel como A e inativos como I O problema: E se eu quiser mostrar todas, os ativos e instivos? :( Precio das 3 opções. Obrigada !!!