Como usar o CDONTS para coletar e enviar informações de um usuário

Traduções deste artigo Traduções deste artigo
ID do artigo: 186204 - Exibir os produtos aos quais esse artigo se aplica.
Expandir tudo | Recolher tudo

Sumário

Este artigo contém um exemplo que descreve como coletar informações de um usuário em uma página .htm e, em seguida, usar essa informação para enviar email para um destinatário usando o Collaboration Data Objects para Windows NT Server (CDONTS) via SMTP. Este artigo inclui código de exemplo para arquivos HTML e ASP, bem como informações sobre como configurar o servidor de SMTP padrão do Microsoft Management Console (MMC).

Mais Informações

A sintaxe para enviar um email com o objeto NewMail de CDONTS é da seguinte maneira:
   objNewMail.Send([From][, To][, Subject][, Body][, Importance] )

   objNewMail
      Required. This NewMail object.

   From
      Optional. String. The full messaging address to be identified as
      the sender (for example, someone@Microsoft.com)

   To
     Optional. String. A list of full messaging addresses of recipients.
     The individual recipient addresses are separated by semicolons.
     (for example, someone@Microsoft.com)

   Subject
      Optional. String. The subject line for the message.

   Body
      Optional. IStream object or String. The text of the message. Only
      C/C++ and Java programs can use an IStream object for the Body
      parameter. They should pass an IUnknown object that returns an
      IStream interface in response to QueryInterface. Microsoft Visual
      Basic supports the IDispatch interface and not IUnknown, so it
      cannot use an IStream object.

   Importance
      Optional. Long. The importance associated with the message, High,
      Normal or Low.  This article sets the required value depending upon
      which option button the user selects.

				
  1. Copiar e colar o seguinte código HTML em um arquivo chamado CDONTSMail.HTM:
          <!DOCTYPE HTML PUBLIC "-//IETF//DTD HTML//EN">
          <html>
    
          <head>
          <meta http-equiv="Content-Type"
          content="text/html; charset=iso-8859-1">
          <meta name="GENERATOR"
          content="Microsoft FrontPage (Visual InterDev Edition) 2.0">
          <title>CDONTSMail</title>
          </head>
    
          <body bgcolor="#FFFFFF">
    
          <form action="CDONTSMail.asp" method="POST">
          <table border="0">
             <tr>
                <td>From:</td>
                <td><!--webbot bot="Validation"
                   b-value-required="TRUE" --><input type="text"
                   size="47" name="txtFrom"
                   value="Your internet address (Me@MyCompany.com)"></td>
             </tr>
             <tr>
                <td>To:</td>
                <td><!--webbot bot="Validation"
                   b-value-required="TRUE" --><input type="text"
                   size="47" name="txtTo"
                   value="The recipient's address (You@YourCompany.com)"></td>
             </tr>
             <tr>
                <td>Subject:</td>
                <td><input type="text" size="47" name="txtSubject"
                   value="Enter a subject here"></td>
             </tr>
             <tr>
                <td valign="top">Message:</td>
                <td><textarea name="txtMessage" rows="9" cols="45">
                   Type your message here.</textarea></td>
             </tr>
             <tr>
                <td valign="top">Importance:</td>
                <td><input type="radio" name="optImportance"
                   value="2">High<br>
                   <input type="radio" checked name="optImportance"
                   value="1">Normal<br>
                   <input type="radio" name="optImportance" value="0">Low<br>
                </td>
             </tr>
          </table>
          <p><input type="submit" name="cmdSubmit" value="Submit">
          <input type="reset" name="cmdClear" value="Clear"> </p>
          </form>
          </body>
          </html>
    						
  2. Cole o código VBScript a seguir em um arquivo chamado CDONTSMail.ASP:
          <%@ LANGUAGE="VBSCRIPT" %>
          <HTML>
          <HEAD>
          <META NAME="GENERATOR" Content="Microsoft Visual InterDev 1.0">
          <META HTTP-EQUIV="Content-Type"
           content="text/html;charset=iso-8859-1">
          <TITLE>CDONTSMail</TITLE>
    
          <%
          Sub Write(strWriteThis)
             'This subroutine just writes out whatever is
             'passed to it.
             response.write(strWriteThis & "<br>")
          end sub
    
          %>
          </HEAD>
          <BODY>
    
          <%
             Dim myCDONTSMail
             Dim strFrom
             Dim strTo
             Dim strSubject
             Dim strMessage
             Dim lngImportance
    
             'The following variable assignments are not required
             'they are just here to make interpretation of the
             'myCDONTSMail.Send line easier.  You could put the
             'Request.Form statements in the .Send line to cut down
             'on the amount of code in the file.
             strFrom=request.form("txtFrom")
             strTo=request.form("txtTo")
             strSubject = request.form("txtSubject")
             strBody=request.form("txtMessage")
             lngImportance = request.form("optImportance")
    
             'The following four lines of code are just here for test
             'purposes to see what variables have been pulled in from the
             'HTM form.
             Write("strFrom = " & strFrom)
             Write("strTo = " & strTo)
             Write("strSubject = " & strSubject)
             Write("strMessage = " & strBody)
             Write("Importance = " & lngImportance)
    
             Set myCDONTSMail = CreateObject("CDONTS.NewMail")
    
             myCDONTSMail.Send strFrom,strTo,strSubject,strBody,lngImportance
    
             Set myCDONTSMail  = Nothing
             Write "Mail has been sent."
             %>
          </BODY>
          </HTML>
    						
    Observação : NewMail O objeto se torna inválido após a conclusão bem-sucedida do método Send e você não é possível reutilizá-la para outra mensagem. Você deve define-lo como Nothing para liberar a memória. Tentativa de acesso a um resulta de objeto NewMail enviados em um retorno de CdoE_INVALID_OBJECT.
  3. Etapas para configurar o Internet Information Server (IIS). Para enviar um email do servidor IIS por meio de seu servidor SMTP (supondo que eles são diferentes computadores), conclua as seguintes etapas:

    1. No seu computador IIS, abra o console de gerenciamento Microsoft (MMC).
    2. No painel esquerdo, expanda o "Internet Information Server" seção.
    3. No painel esquerdo, selecione e expanda seu servidor IIS.
    4. No painel direito, clique com o botão direito do mouse "Servidor SMTP de padrão" e selecione "Propriedades"
    5. Selecione a guia "Entrega".
    6. Na caixa de texto "Nome de domínio totalmente qualificado", digite o IIS nome do computador.
    7. Na caixa de texto "Host inteligente", digite o nome do seu servidor SMTP.
  4. Execute o arquivo CDONTSMail.htm no seu navegador, insira as informações necessárias e, em seguida, selecione o botão Enviar.

    Observação : O código acima requer que você insira um valor em de e para campos.

Referências

Ajuda de objetos de dados de colaboração; pesquisa no "Collaboration Data Objects para NTS componente"; tópico: "Objeto NewMail (CDONTS Library)"

Propriedades

ID do artigo: 186204 - Última revisão: quinta-feira, 28 de abril de 2005 - Revisão: 2.1
A informação contida neste artigo aplica-se a:
  • Microsoft Collaboration Data Objects 1.2 para NT Server
Palavras-chave: 
kbmt kbhowto kbhtml kbmsg KB186204 KbMtpt
Tradução automática
IMPORTANTE: Este artigo foi traduzido por um sistema de tradução automática (também designado por Machine Translation ou MT), não tendo sido portanto traduzido ou revisto por pessoas. A Microsoft possui artigos traduzidos por aplicações (MT) e artigos traduzidos por tradutores profissionais, com o objetivo de oferecer em português a totalidade dos artigos existentes na base de dados de suporte. No entanto, a tradução automática não é sempre perfeita, podendo conter erros de vocabulário, sintaxe ou gramática. A Microsoft não é responsável por incoerências, erros ou prejuízos ocorridos em decorrência da utilização dos artigos MT por parte dos nossos clientes. A Microsoft realiza atualizações freqüentes ao software de tradução automática (MT). Obrigado.
Clique aqui para ver a versão em Inglês deste artigo: 186204
Aviso de Isenção de Responsabilidade sobre Conteúdo do KB Aposentado
Este artigo trata de produtos para os quais a Microsoft não mais oferece suporte. Por esta razão, este artigo é oferecido "como está" e não será mais atualizado.

Submeter comentários

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com