Rickardo

o erro é o seguinte.... vem o email mais não vem os dados saca?

mais ta dando errado. onde eu errei? alguém pode me ajudar ae?? <% Response.Buffer = true Response.addHeader "pragma", "no-cache" Response.CacheControl = "Private" Response.Expires = 0 %> <!--#include file="sendmail.asp"--> <% Dim nome Dim endereco, num, complemento, bairro, cidade, estado Dim cep, cep1, cep2 Dim telefone1, ddd1, telefone1a, telefone1b Dim telefone2, ddd2, telefone2a, telefone2b Dim email Dim profissao Dim empresa1 empresa1 = Request.Form("empresa1") Contato = Request.Form("nome") endereco = Request.Form("endereco") num = Request.Form("num") complemento = Request.Form("complemento") bairro = Request.Form("bairro") cidade = Request.Form("cidade") estado = Request.Form("estado") cep1 = String(5, "0") & Request.Form("cep1") cep1 = Right(cep1, 5) cep2 = String(3, "0") & Request.Form("cep2") cep2 = Right(cep2, 3) cep = cep1 & "-" & cep2 ddd1 = String(2, "0") & Request.Form("ddd1") ddd1 = Right(ddd1, 2) telefone1a = String(4, "0") & Request.Form("telefone1a") telefone1a = Right(telefone1a, 4) telefone1b = String(4, "0") & Request.Form("telefone1b") telefone1b = Right(telefone1b, 4) telefone1 = "(" & ddd1 & ") " & telefone1a & "-" & telefone1b If Request.Form("ddd2") <> "" OR _ Request.Form("telefone2a") <> "" OR _ Request.Form("telefone2b") <> "" Then ddd2 = String(2, "0") & Request.Form("ddd2") ddd2 = Right(ddd2, 2) telefone2a = String(4, "0") & Request.Form("telefone2a") telefone2a = Right(telefone2a, 4) telefone2b = String(4, "0") & Request.Form("telefone2b") telefone2b = Right(telefone2b, 4) telefone2 = "(" & ddd2 & ") " & telefone2a & "-" & telefone2b End If email = Request.Form("email") Empresa = Request.Form("profissao") rt = chr(13) & chr(10) 'return - pular linha Body = "" &_ "Ficha de Cadastro de Distribuidores - Storcase" & rt &_ "Enviado: " & Now() & rt &_ rt &_ "Empresa: " & empresa1 & rt &_ "Nome: " & nome & rt &_ "Endereço: " & endereco & rt &_ "Número: " & num & rt &_ "Complemento: " & complemento & rt &_ "Bairro: " & bairro & rt &_ "Cidade: " & cidade & rt &_ "Estado: " & estado & rt &_ "CEP: " & cep & rt &_ "1.Telefone: " & telefone1 & rt &_ "2.Telefone: " & telefone2 & rt &_ "E-mail: " & email & rt &_ "Site: " & profissao & rt &_ ResultMail = SendMail("Ficha de Cadastro de Distribuidores - Storcase", nome, email, "Storcase", "rickardocc@gmail.com", Body, False) %> arquivo sendmail.asp---------------------------------------- <% ' ASPMAIL *** ' Subject - Assunto ' FromName - De (nome) ' FromEmail - De (e-mail) ' DestName - Para (nome) ' DestName - Para (e-mail) ' Body - Corpo ' IsHTML - True para corpo em HTML e False para corpo em texto Function SendMail(Subject, FromName, FromEmail, DestName, DestEmail, Body, IsHTML) Dim SmtpServer, objmail Set objmail = Server.CreateObject("SMTPsvg.Mailer") SmtpServer = "smtp2.locaweb.com.br" objmail.RemoteHost = SmtpServer If IsHTML Then objmail.ContentType = "text/html" End If objmail.AddExtraHeader "Originating-IP: " & Request.ServerVariables("REMOTE_ADDR") objmail.FromName = objmail.EncodeHeader(FromName) objmail.FromAddress = FromEmail objmail.AddRecipient objmail.EncodeHeader(DestName), DestEmail objmail.Subject = objmail.EncodeHeader(Subject) objmail.BodyText = Body SendMail = objmail.SendMail Set objmail = Nothing End Function %>

cade o povo daki? será q ninguém sabe? Administradorrrr......... moderadorrrrr..... uhuhuuuuuuuuuu.......... kd vc´s???? :-0

ae estou querendo por um watercooler o q você acha???

desculpa aê pela PM ano foi por mau, foi por total desespero e nescessidade sem stress cara... agora... observação.... também não vale ficar "denunciando" post só pra eu olhar mais rápido........... na medida do possível eu respondo às duvidas do fórum.... sempre q eu acesso a internet eu passo por aqui, se eu não respondi é porque não acessei a internet ainda.... então nem adianta mandar msgn nem nada......... só estou dando um toque... não é "bronca" não.... falou.... desculpa ae dinovo é q de tando meu processador esquentar comecou aparecer umas telas azul aí zuou mei explorer e não esta aparecendo as imagem aí fui citar o seu post e acabei clicando no lugar errado.. foi sem querer mesmo...

já tentou desencaixar ele do slot e encaixar denovo?? e antes de desencaixar , passou uma borrachina pra limpar a sujeira??? se já fez isso , intão o bichinho ta frito.. (queimado) ***By DiRaOL*** obs.: borracha branca macia! ***By DiRaOL***

fireworks é o melhor q eu já vi

desculpa aê pela PM ano foi por mau, foi por total desespero e nescessidade

estou começando a estudar esse vb, porem estou fazendo um sisteminha simples para cadastrar meu clientes. criei um bd q tem a tabela clientes.. e no formulário quero q quando carregue, verifique qual o ultimo registro da tabela, e coloque no txtcodigo o nº posterior. tipo um contador.. como faço isso??

af... ninguém sabe????? ou não querem me ajudar??/

eu fiz um formail tipo ( fale conosco.) ele funciona legal , envia os dados certinho pro email, porem ao invés de ir o html bem formatadinho do geito q eu quero, ele vai as informações junto com as tags do html. o códio ta i em baixo, por favor sera q alguém poderia ver onde ta o erro???

ae cara.............. estou no maior aperto aki......... estou tentando gerar um relatorio no meu bd em access..... e é o seguite tem uma colunana minha tabela com nome "Total" e outro com "data" onde vai o valor total de todos os pedidos faturados com suas respectivas datas.. ao exibir um relatório especificando um intervalo entre data inicial e data final. me mostre tambem a soma de todos os totais tipo: 01/02/2005..............................R$ 100,00 01/02/2005..............................R$ 100,00 01/02/2005..............................R$ 100,00 01/02/2005..............................R$ 100,00 total geral R$ 400,00 Tem como??????? fico muito grato se puder me ajudar..

ae pessoal brigado pela ajuda... já achei o erro.. tava entre o teclado e a cadeira.. especifiquei o nome da tala de banner_cab.. mais deveria ser banner valeu pela ajunda esse negócio de or die ("Erro de sql: ".mysql_error()) ajuda pra caramba

Deu esse erro aqui.

o script ta aki: o erro é esse...:

meu outlook num consegue mais enviar email devido a b*** do ig q eu acho q ta comn problena no serv SMTP. alguém sabe 1 pra instalar aki na meinha máquina?????????????

aki na empresa pretendo por um gerenciador de email do tipo q... todos os email pertencentes à empresa ou aos funcionário da empresa referente ao dominio da mesma, caia tudo em uma determinada caixa de entrada.... onde um administrador tenha acesso total para auditoria.... alguém aí sabe me dar alguma ideía como devo proceder???????

é cara falow e disse tudo................ eu comecei a apreder php pra fazer esses esquemas de loja tambem... + na boa até hoje num consegui fazer um carrinho de compras........ coisa simples.. mais ainda não consegui....

Qual a config. Mínima para instalar o win xP em um Celeron 266 com 256 de ram funciona??????

ae galera.. uma vez vi na casa de um amigo meu q ele recebia fax pelo computador direto alguém sabe como faço isso?????

olha só........... é incrivel como um forum tão bom seja tão deficiente nessa area de redes. Posto uma dúvida q se perde no meio de tantas por falta de respostas... complicado isso.. mais respondendo sua pergunta... tambem estou atras disso mais tive uma solução q é a q uso em uma empresa q montei um esquema assim.. instalei o norto internet securit , ativei o controle de pais. e bloquiei o acesso a todos os sites dando permissão só aos q eu queria q acessacem .. depois pus senha no supervisor do norton ai beleza funfou... tudo.. OBS.: desculpem pela chamada no inicio da mensagem mais é a mais pura verdade..

olá tenho um servidor win2003 onde acessamos via TS remotamente.. criei todos os usuarios q podem acessa-los.. agora inventaram aki na empresa q o pessoal da area de vendas não poderam mais acessar a net... então??? como faço pra bloquear isso??? algue aí pode me dar uma ajuda???

só encontro para windows 98 SE... alguém tem aí pra win2003

cara a maneira + fácil é você usar um desse programinhas de FTP... ain você clica com o botão direito em cima do arquivo ou pasta q você quer dar o chmod e pronto.. saca??? usa o cuteFTP... é bem simples...

instalei o win98 num máquina que velha q tem uma paca de vídeo trident 9685 e o win instalou os drives porem ~quando mudo o n° de cores para 256 ou 16 bits... ta dando altos paus.. e não sobe as cores nem f.......... já baixei uns 30 drive pra essa placa e tentei instalar, mais nada funfou... e agora como resolvo isso?????