Cara menggunakan CDONTS untuk mengumpulkan dan mengirimkan informasi dari pengguna

ID Artikel: 186204

Peringatan: artikel ini adalah terjemahan oleh mesin

Klik disini untuk menampilkan sumber Inggris dan terjemahan oleh mesin secara berdampingan

Sanggahan Konten KB yang Tidak Lagi Diperbarui

Perbesar semua | Perkecil semua

RINGKASAN

Artikel ini berisi contoh yang menggambarkan cara mengumpulkan informasi dari pengguna pada.HTM halaman, dan kemudian menggunakan informasi tersebut untuk mengirim email ke penerima yang menggunakan kolaborasi Data objek untuk Windows NT Server (CDONTS) atas SMTP. Artikel ini mencakup kode contoh untuk HTM dan ASP file sebagai baik sebagai informasi tentang cara mengkonfigurasi Microsoft Management Console Server SMTP Default (MMC).

Kembali ke atas | Berikan Masukan

INFORMASI LEBIH LANJUT

Sintaks untuk mengirimkan surat dengan objek NewMail dari CDONTS sebagai berikut:

   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.

Copy dan paste kode HTML berikut ke sebuah file bernama 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>

Paste kode VBScript berikut ke dalam sebuah file bernama 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>

CATATAN: NewMail objek menjadi tidak valid setelah berhasil menyelesaikan Kirim metode, dan Anda tidak bisa kembali untuk pesan lain. Anda harus mengatur apa-apa untuk melepaskan memori. Akses percobaan untuk dikirim NewMail objek mengakibatkan kembalinya CdoE_INVALID_OBJECT.

Langkah-langkah untuk mengkonfigurasi Anda Internet Information Server (IIS). Untuk mengirim e-mail dari server IIS Anda melalui SMTP server (dengan asumsi bahwa mereka adalah komputer yang berbeda), lengkap berikut langkah-langkah:
1. Komputer IIS, buka konsol manajemen Microsoft (MMC).
2. Dalam pane kiri, memperluas "Internet Information Server" bagian.
3. Pada panel kiri, pilih dan memperluas IIS server.
4. Dalam pane kanan, klik kanan "server Default SMTP" dan pilih "Properties"
5. Pilih tab "Pengiriman".
6. Dalam kotak teks "Sepenuhnya memenuhi syarat Nama Domain", masukkan IIS nama komputer.
7. Dalam kotak teks "Host pintar", masukkan nama SMTP server.
Jalankan CDONTSMail.htm file di browser Anda, masukkan yang diperlukan informasi, dan kemudian pilih tombol Kirim.

CATATAN: Kode di atas mengharuskan Anda untuk memasukkan nilai dalam dari dan Untuk bidang.

Kembali ke atas | Berikan Masukan

REFERENSI

Objek Data kolaborasi membantu; mencari "kolaborasi Data objek untuk NTS komponen"; topik: "NewMail objek (CDONTS perpustakaan)"

Kembali ke atas | Berikan Masukan

Properti

ID Artikel: 186204 - Kajian Terakhir: 16 September 2011 - Revisi: 2.0

kbhowto kbhtml kbmsg kbmt KB186204 KbMtid

Penerjemahan Mesin

PENTING: Artikel ini diterjemahkan menggunakan perangkat lunak mesin penerjemah Microsoft dan bukan oleh seorang penerjemah. Microsoft menawarkan artikel yang diterjemahkan oleh seorang penerjemah maupun artikel yang diterjemahkan menggunakan mesin sehingga Anda akan memiliki akses ke seluruh artikel baru yang diterbitkan di Pangkalan Pengetahuan (Knowledge Base) dalam bahasa yang Anda gunakan. Namun, artikel yang diterjemahkan menggunakan mesin tidak selalu sempurna. Artikel tersebut mungkin memiliki kesalahan kosa kata, sintaksis, atau tata bahasa, hampir sama seperti orang asing yang berbicara dalam bahasa Anda. Microsoft tidak bertanggung jawab terhadap akurasi, kesalahan atau kerusakan yang disebabkan karena kesalahan penerjemahan konten atau penggunaannya oleh para pelanggan. Microsoft juga sering memperbarui perangkat lunak mesin penerjemah.

Klik disini untuk melihat versi Inggris dari artikel ini:186204

(http://support.microsoft.com/kb/186204/en-us/ )

Sanggahan Konten KB yang Tidak Lagi Diperbarui

Artikel ini berisi tentang produk yang tidak lagi didukung oleh Microsoft. Oleh karena itu, artikel ini disajikan ?sebagaimana adanya? dan tidak akan diperbarui.

Kembali ke atas | Berikan Masukan