Enviando um anexo com o CDO

• Abril 29, 2024

Se você está codificando no ASP, costuma usá-lo para enviar mensagens, incluindo anexos. Essa pode ser uma ótima maneira de compartilhar arquivos com seus visitantes.

A sintaxe é muito direta. Em um formulário, você solicita o endereço de email do usuário. Então, no seu script de processamento, você usaria:

Email = request ("email")

Defina objMail = Server.CreateObject ("CDO.Message")
Com objMail
.From = "webmaster@seu site.com"
.To = Email
.Subject = "Arquivo que você solicitou do SiteName"
.TextBody = "Aqui está o arquivo que você solicitou do SiteName"
.AddAttachment "C: \ files \ filename.pdf"
.Mandar
Terminar com
Definir objMail = Nothing

==========================

A vantagem disso é que o local real do arquivo - c: \ files \ - NÃO está na Web em nenhum lugar. Esse diretório é completamente separado dos seus diretórios da web. Isso significa que nenhum internauta pode acessar esses arquivos. Somente as pessoas que usam seus formulários online podem receber os arquivos. Isso oferece um nível de segurança que somente as pessoas que devem ver os arquivos podem obtê-los.

No entanto, lembre-se de que, assim que um usuário colocar um arquivo em mãos, ele poderá enviá-lo facilmente aos amigos. Mas você realmente não pode ajudar nisso. Em algum momento, você precisa perceber que, se um usuário pode ver um arquivo, ele pode roubá-lo, se quiser. Às vezes, as pessoas digitalizam livros inteiros em seus computadores (por exemplo, Harry Potter) para compartilhar com os amigos. Então, em algum momento, você deve aceitar que fez o melhor que pôde, na medida em que protege seus arquivos. Se alguém se esforçar para roubar seu trabalho nesse ponto, está fora de suas mãos.

Apenas verifique se o arquivo enviado está bem marcado com o nome e as informações do site, para que pelo menos o arquivo em si sempre indique de onde veio!

Instruções De Vídeo: EXCEL VBA ENVIAR EMAIL COM IMAGEM NO CORPO (Abril 2024).