Leo Lobo

BOA TARDE !! TENHO UMA TABELA QUE SE RESUME EM REFERENCIA- QTDE. COMO EXEMPLO ABAIXO : REF QTDE 000001 6 GOSTARIA DE SABER COMO POSSO FAZER PARA QUE OS DADOS AGRUPADOS SEJAM DESMEMBRADOS EM REFERENCIAS INDIVIDUAIS ? REF 000001 000001 000001 000001 000001 000001 GRATO LEO LOBO

Gostaria de saber como posso fazer com que o access importe via macro ou sql varios arquivos ao mesmo tempo independente do nome. Ou seja temos uma rotina onde varios arquivos são importados de palm tops sendo que os nomes dos arquivos são gerados no momento da importacao , ou seja são nomes variaveis que são criados de acordo com as datas do dia do movimento. É possivel fazer com que o access importe por exemplo 3 arquivos xml diferentes utilizando a maneira " *.XML " Seria mais ou menos assim - o access vai em um determinado diretorio e procura qualquer arquivo xml e importa para uma mesma tabela já definida na macro trazendo qualquer tipo de arquivo xml existente.

OK GRATO FUNCIONOU !!

gostaria de saber se existe a possibilidade de criar uma macro que importe arquivos XML no Access

Prezado MrMalj ! Temos uma rotina automática que envia para os emails cadastrados da empresa , relatorios especificos das devidas funções. Fizemos com que esta rotina fosse enviada através do agendador de tarefas do windows. Porém toda vez que a rotina é executada aparece a mensagem :___ "Um programa está tentando enviar automaticamente um email em seu nome. Deseja permitir isso ? Esta mensagem é do outlook e toda vez que isto acontece temos que clicar no sim. É possível ocultar esta mensagem e ao mesmo tempo manter a rotina de uma forma mais automática ? Grato Leo

Boa tarde ! Temos uma rotina automática que envia para os emails cadastrados da empresa , relatorios especificos das devidas funções. Fizemos com que esta rotina fosse enviada através do agendador de tarefas do windows. Porém toda vez que a rotina é executada aparece a mensagem :___ "Um programa está tentando enviar automaticamente um email em seu nome. Deseja permitir isso ? Esta mensagem é do outlook e toda vez que isto acontece temos que clicar no sim. É possível ocultar esta mensagem e ao mesmo tempo manter a rotina de uma forma mais automática ? Grato Leo

Ok Resolvido

Gostaria de saber como é possível fazer com que o access abra um formulário específico e execute um botão que exista neste formulário. Se possível deixar um exemplo para nosso aprendizado grato Leo

GOSTARIA DE SABER SE SERIA POSSIVEL ENTÃO ME PASSAR COMO FICARIA A PARTE DO CÓDIGO UTILIZANDO O INSERT IMAGE , POIS NÃO ESTOU CONSEGUINDO. O CAMINHO DA IMAGEM É: C:\Documents and Settings\SERVIDOR\Desktop\Obrigado.jpg GOSTARIA DE SABER SE SERIA POSSIVEL ENTÃO ME PASSAR COMO FICARIA A PARTE DO CÓDIGO UTILIZANDO O INSERT IMAGE DO PY SENDMAIL , POIS NÃO ESTOU CONSEGUINDO. O CAMINHO DA IMAGEM É: C:\Documents and Settings\SERVIDOR\Desktop\Obrigado.jpg

Olá agradeço seu retorno. Porém sou um iniciante em tentar programar e automatizar tarefas. Conto com sua ajuda. O código abaixo funciona , mas quando coloco o metodo insert image não sei se estou colocando algo errado . Peço sua correção: Private Sub Comando2_Click() Dim AppOut As Outlook.Application Dim msg As Outlook.MailItem Set AppOut = New Outlook.Application Set msg = AppOut.CreateItem(olMailItem) msg.BCC = Me.EMAIL msg.Subject = "Obrigado por sua visita!" msg.Body = "Obrigado por sua visita!" msg.insertimage ("c:\Documents and Settings\SERVIDOR\Desktop\Obrigado.jpg") msg.Attachments.Add ("c:\Documents and Settings\SERVIDOR\Desktop\Obrigado.jpg") msg.Send End Sub

Sim grato !!

Gostaria de saber se alguém sabe o código para ,ao invés de anexar arquivos , inserir figuras em seu corpo. Necessito desta informação pois os anexos dependendo do provedor ficam bloqueados. Grato, Leo

Grato pela força. Simplesmente Mr Master MAJL ! Mais perguntas : Como faço para colocar os endereços no campo do Outlook Cco ( Cópia Oculta )

SERÁ QUE ALGUÉM PODERIA ME AJUDAR NO CÓDIGO ABAIXO: GOSTARIA QUE NA PARTE k.to = "itaipu@adfashion.com.br" AO INVÉS DE TER QUE DIGITAR O EMAIL DO NOSSO CLIENTE , O ACCESS BUSCASSE O EMAIL EM UMA TABELA QUE POSSUI VÁRIOS OUTROS CADASTRADOS. COM ISSO AGILIZARIAMOS O PROCESSO DE ENVIO DE MALA DIRETA DOS ANIVERSARIANTES DO MES. Set k = CreateObject("Py.SendMail") k.SMTPServer = "smtp.velox.com.br" k.Recipient = "" k.To = "itaipu@goggle.com.br" ( A MUDANÇA ACONTECERIA AQUI ) k.Sender = "Teste" k.From = "marcelo@veloxmail.com.br" 'Em caso de autenticação k.User = "marcelo@veloxmail.com.br" k.Password = "qinjjeer3gez" '----------------------- k.Subject = "Feliz Aniversário" k.Body = "Minha vida" MsgBox k.Send()

Beleza já cheguei a algo um pouco dentro do que procuramos. Porém este código não tem a parte que lança a mensagem e Assunto para saírem pré definidos ( Ex: Assunto Feliz Aniversário e Mensagem : parabéns no mês de seu Niver adquira peças com 10% de desconto. Só para complementar usei o exemplo do banco de dados GDI38. Você poderia me ajudar pois estou começando a entender de códigos ao poucos e não tenho experiência em programação , mas estou estudando através dos foruns como este. Obrigado e conto com uma ajuda para complementar este código que me forneceu