Users/Groups Delete Disabled Users Delete Disabled Users Enum. Users Enum. Users Delete Users Add Users Enum. Groups Enum. Groups Change Groups Add Group Active Directory Enum. AD Groups Enum. AD Users List AD Users w/Prop Join AD Users NIC/IP Addresses Get IP Addresses Get IP Addresses Backup and Restore IP's Add IP's NIC Settings OS/Hardware OS Info Script OS Info Script All OS Info Script All OS System Count Hardware Info Script Hardware Info Script #1 Hardware Info Script #2 CPU Settings Enum. Printers Disk Quotas Disable Disk Quota Enable Disk Quota Disk Quota Query Disk Quota Update Shares/Files/Sessions Enum. Shares Enum. Shares Enum. All Shares Enum. Open Files Enum. Open Files Enum. Open Sessions Others Servers Uptime DNS Stuff Services Enum Services Enum Enum Processes Enum Hot Fixes MS FTP Server FTP VD Query FTP VD Delete FTP Site Enum. MS WWW Server WWW Site Enum. Enum Mime Types Enum Mime Types Application Pools Application Pool Enum Application Pool Enum Create Application Pool Create Application Pool Delete Application Pool Enum Apps in App Pool Enum App Pool Settings Move Apps Between App Pools Others IIS Component Probe IIS Status Enum SQL Dbases Backup SQL Dbases Orphan SQL Users List AD/WG My AD/WG Name My PC Name Enum AD Computers Contact Us Form SM Login Form Code Imail Login Form Code Enum. Domains in Imail Enum. Users in Imail CDONTS Component CDOSYS Component SA SMTP Component App Pool Monitor Ping and Tracert Hard Drive Monitoring Uptime Monitoring Desktop Lock CD Key Revealer MIK Restarter Site Map About the Site RSS Feeds I Read Custom Scripts Visitor #:     windowsadminscripts.com www     Script: Basic CDOSYS Usage/Sample Script This will only work on web servers that are running IIS 6 and later. Below is sample code for using Microsoft's CDOSYS ASP Email Component. This is just the code that sends the email out. You would pass information from a form to an asp page to gather the information you want to be mailed with. On the asp page you would include some of this sample code to send the form information you want to you or your customer. You will want to change the following information in the sample code: Message: This is where the actual "body" of the email is. Subject: This is where you want to put the "subject" of the email. ToAddress: This is where you want to put the "email address" of where the email is to be send to. FromAddress: This is where you want to put the "email address" of where the email is to be send from. Mailer.TextBody: If you want to send the email in text format leave "Mailer.TextBody", if you want to send the email in HTML format change it to "Mailer.HTMLBody". Email Address To Send Sample Code To: @    ' Dims the email vars Dim Mailer, Message, Subject, ToAddress, FromAddress ' Sets CDOSYS ASP Component Set Mailer = CreateObject("CDO.Message") Set objCDOSYSCon = Server.CreateObject ("CDO.Configuration") ' Out going SMTP server objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "your_smtp_server_name_goes_here" objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60 objCDOSYSCon.Fields.Update ' Update the CDOSYS Configuration Set Mailer.Configuration = objCDOSYSCon ' Creates the Body of the Email Message = "This is line 1 of the body of the email" & VbCrLf Message = Message & "This is line 2 of the body of the email" & VbCrLf Message = Message & "This Email was sent at "& now() &"" & VbCrLf ' This is the Subjext Line Subject = "This Email was created with CDOSYS" ' This is the To Address ' This Email Address must be an email address ' You have created on your hosting account ToAddress = "" ' This is the From Address ' This Email Address must be an email address ' You have created on your hosting account FromAddress = "" 'Set the e-mail body format (HTMLBody=HTML TextBody=Plain) Mailer.TextBody = Message ' ColSetlects the Subject of the Email Mailer.Subject = Subject ' Set the To Address of the Email Mailer.To = ToAddress ' Set the From Address of the Email Mailer.From = FromAddress ' Mails the Email Mailer.Send ' Closes Mailer Object Set objCDOSYSCon = Nothing set Mailer = Nothing Copyright 2006 WindowsAdminScripts.com all rights reserved.