rodfraga

Ai galera, se alguém conhecer essa dll, AspMail eu acho. Tem o nome de SMTP.svg não tenho certeza. Se alguém conhecer responda aqui por favor, tou precisando saber porque retorna a mensagem "O E-MAIL não FOI ENVIADO COM SUCESSO"...POr favor respondam! E Pigmeu, tu q conhece, se puder, dá uma resposta ai por favor! Obrigado Abraços Rodrigo

Valeu mesmo William! Abraços

melhor jeito: Aprenda fazendo: desmonte codigos de templates de blogs! foi como eu comecei, mesmo não gostando de blogs! Abraços

Vou tentar... não tenho certeza...o Macoratti não falou nada... Agora, se o Pigmeu puder passar aqui e dar uma ajudinha, será bem-vindo...! hehehe... Abraços

Medonho esse código...

então seria tipo assim:? mailer.UserName = usuario.Text mailer.Password = senha.Text Criando uma caixa de texto para cada item(Usuario e senha)? Abraços

Cara, minha conexão é discada. FIcou hiper devagar, e muito cansativo, cada link era um loading... ta bonito, mas cansativo...isso espanta clientes! Que tal um site mais limpo?

Para enviar emails pelo VB eu to usando uma dll que o Pigmeu me passou. Deu certo, não há erro de sintaxe. Mas as mensagens de resultado sempre vêm como "O e-mail não foi enviado com sucesso". não tenho ideia do por que, afinal, eu fiz como o macoratti mandou. alguém tem alguma ideia? vou postar o codigo... Private Sub cmdenviar_Click() Dim sucesso As Boolean ' Dim mensagem As String Dim mailer As SMTPsvg.mailer Set mailer = CreateObject("SMTPsvg.Mailer") mailer.RemoteHost = "smtp.mail.yahoo.com.br" mailer.FromName = txtremetente.Text mailer.FromAddress = txtemailremetente.Text mailer.AddRecipient txtdestino.Text, txtemaildestino.Text mailer.Subject = txtassunto.Text mailer.BodyText = txtexto.Text sucesso = mailer.SendMail If sucesso Then mensagem = "O E-MAIL ENVIADO COM SUCESSO!" Else mensagem = "O E-MAIL NÃO FOI ENVIADO COM SUCESSO!" End If End Sub Tirei os comentarios e um codigo de msgbox no final que achei desnecessario...Se alguém puder ajudar, obrigado! Abraços

Ialá...Eu acho que tem que usar iframes. Não é script cara. é coisa do tipo: <a href="paginatal.html"><img src="img.jpg" width="130" height="30"></a> acho que é assim para reduzir a foto, ai clicando nela, voce faz abrir a pagina, com a ampliada. Abraços

Olá amigo! Bem, vamos lá! Voce quer criar um popup menu? então eu vou falar como eu faço. Eu vou no menu editor(Ctrl+E ou Tools/Menu Editor) e Crio um item de menu exemplo: Arquivo como caption do menu e name como menuarquivo. não esquecendo de desmarcar a opção visible. então eu clico em next, e na seta para a direita, para adicionar um submenu. Vamos botar um nome e uma caption qualquer para ele. Deixe a marcação em visible, afinal, mesmo assim ele não aparecerá no topo da tela, pois seu menu principal não é visível. Agora vamos ao código. Já que seu menu está invisivel, vamos fazer com que ao o usuario clicar com o botao direito do mouse no form, ele apareça como popup. O código entra no evento mouseup do form. Escreva o seguinte: Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) If Button = 2 Then PopupMenu menuarquivo End If End Sub Traduzindo, nós dizemos no código do evento mouseup que se o botão clicado for o direito do mouse, abriremos o menuarquivo como popup menu. Sacou? Espero ter ajudado, qualquer coisa, estamos ai. Abraços

Muito Obrigado!

Amigo Red Neck, agora voce disse algo insensato. "Do que adianta ficar se matando de estudar e depois ficar sem emprego?" Concordo com tudo que voce disse antes, porem, todo nós sabemos que o caso dos dois que voce falou faz parte de uma exceção nesse mundo. Hoje em dia, estudar te garante muito , faltando a pratica. Curriculum é muito bom sabia? É claro que a experiencia pesa, mas na hora de voce ser contratado em uma grande empresa creio que os caras vao ver o teu curriculum! Mas mantenho a minha opiniao de antes. Web-designer é quem quiser ser, um bom web-designer é quem conseguir ser. O mesmo para web developer e programador... Abraços

Eles têm toda a razão. Eu quando posso ajudar, e sei ajudar, ajudo, agora quando eu leio um post que não sei responder eu vou pra outro e não posto nada. Voce já pensou se não sabiam te responder cara? Fora a falta de respeito, aqui o pessoal é muito prestativo, mas ajudam quando podem! Assino embaixo o que o Estranho e o Illiadan disseram... Isso aqui é um fórum de respeito, uma comunidade imensa. Todos se dao bem, tendo raras exceções. Tente não ser uma delas pois não vai ser nada bom pra voce. não estou te ameaçando. Estou aconselhando. Rodrigo

Cara, boa duvida! Pra falar a verdade, eu não sei responder, mas aguardo respostas tambem, pra aprender! E uma coisa! Se puder se cadastra no forum e entra pro nosso grupo! Abraços Rodrigo

Galera, eu estava praticando com o meu grupo de um projeto VB que eu to fazendo...Tipo a gente ta aprendendo pra fazer um programa e competir com outros. então nós estávamos fazendo uma calculado e, surgiu a seguinte dúvida: Como fazer a adição sem utilizar uma função? Utilizando uma rotina? Pegamos o seguinte código na internet para interpretar e testar: Public Sub Adicao() Dim x As Integer Dim y As Integer x = Split(txt1.Text, " ")(0) y = Split(txt1.Text, " ")(1) z% = x + y End Sub Public Sub mais_Click() txt2.Text = z End Sub Deu pra entender né? A gente tem uma text com o nome de txt1, onde o usuário digita um numero e o outro, exemplo: "1 2" Então a rotina coleta o primeiro numero e o segundo, somando-os para obter o valor de z. Então, quando se clica no botao que nomeamos de mais, o texto de txt2 será o valor de z. Tudo bem, antes estávamos utilizando etiquetas com labels. Assim, quando se clicava em mais, tudo isso acontecia, e as etiquetas diziam o seguinte: "1 + 2 =" e ai tinha o txt2 com o resultado. O 1 e o 2 eram sempre alterados não importando qual numero colocassemos, mas o resultado nunca aparecia! Deixamos as etiquetas de lado, deletando o codigo delas e sobrou o de cima! Continuando a não mostrar o valor. Lembrei do conceito de função(retorna um valor) e criei o seguinte código: Function so() Dim x As Integer Dim y As Integer x = Split(txt1.Text, " ")(0) y = Split(txt1.Text, " ")(1) so = x + y End Function Public Sub mais_Click() txt2.Text = so End Sub E deu certo. Mas ai eu utilizei uma função para retornar um valor. Resumindo, quero saber se é possível alterar o primeiro código que postei, para que aquela rotina, mostre o resultado que só consegui fazer criando uma função depois? Obrigado Rodrigo

Ialá! Precisa do registrador pra habilitar a SMTPsvg lib no project reference Precisa do registrador tambem!

valeu Luiz Abraços

obrigado

Ialá cara. Não sei em CSS nem um padrão JS, mas o código pra cada link é o seguinte: <a href="endereço.html" onclick="window.open('enderço.html','título da página','width=largura da página,height=altura da página')"> Abraços

E aí pessoal? Agradeço o Banco de dados e a dll tambem. Mas esta, não ta dando. O registrador não abre e, não consigo adicionar a dll a um projeto. Se puder mandar a dll pro digopf_fraga@yahoo.com.br preu pegar, ficaria grato... Abraços

O VS.Net vem com o VB.net sim...Eu tenho o VB6

Isso mesmo, na parte do width etc, voce coloca os features de formação. Coisas especiais, como fullscreen, etc...Abraços!

voce diz nas duas? eu usava muito frames...tenho um site aqui ainda, mas não me lembro de ter usado js e sim html, e não abrir dois frames ao mesmo tempo...qualquer coisa fala comigo...que eu te passo o codigo Abraços

foi mal a demora...Creio que dê também pra fazer com imagens... a{ background-image: 1.jpg} a:hover( background-image: 2.jpg} Acho que é possível...Quem quiser acrescentar ou mudar, à vontade! Não tneho certeza sobre o código Abraços

Valeu pelo site, vou pesquisar qualquer coisa eu grito! E tambem. Quanto ao email, o site não abre!