# Anyone familiar with the cdosys compnent for form submission? please help

**URL:** <https://forum.kirupa.com/t/anyone-familiar-with-the-cdosys-compnent-for-form-submission-please-help/41638>\
**Category:** Uncategorized\
**Created:** [January 31, 2004, 11:43am UTC](https://forum.kirupa.com/t/anyone-familiar-with-the-cdosys-compnent-for-form-submission-please-help/41638 "2004-01-31T11:43:46Z")\
**Posts on this page:** 1\
**Page:** 1

<div class="post-metadata">

**Author:** ![trevorsaint](https://yyz1.discourse-cdn.com/flex011/user_avatar/forum.kirupa.com/trevorsaint/32/268_2.png) [@trevorsaint](https://forum.kirupa.com/u/trevorsaint)\
**Post date:** [January 31, 2004, 11:43am UTC](https://forum.kirupa.com/t/anyone-familiar-with-the-cdosys-compnent-for-form-submission-please-help/41638/1 "2004-01-31T11:43:46Z")

</div>

Hello, I have had to transfer over from CDONTS to CDOSYS, due to the host for this company, however transfering accross has cost me much trouble and now I am a little lost in the conversion, so maybe someone can help me here. So far I have got the host to accept the cdosys file, whereas before I was having so much trouble. Now I need the file to retrieve the five form fields, name, company, telephone, email and enquiry, and then forward this to my address for testing on the output. I have searched and searched and cannot find an in-depth tutorial other than the standard cdosys setup. Can anyone help show me the basic procedures, and what I need to do do achieve this. The code I am using is as follows :

[AS]

\<%  
'Dimension variables  
Dim objCDOSYSCon

'Create the e-mail server object  
Set objCDOSYSMail = Server.CreateObject(“CDO.Message”)  
Set objCDOSYSCon = Server.CreateObject (“CDO.Configuration”)

'Out going SMTP server  
objCDOSYSCon.Fields(“[http://schemas.microsoft.com/cdo/configuration/smtpserver](http://schemas.microsoft.com/cdo/configuration/smtpserver)”) = “[mail.seriousplayersclub.co.uk](http://mail.seriousplayersclub.co.uk)”  
objCDOSYSCon.Fields(“[http://schemas.microsoft.com/cdo/configuration/smtpserverport](http://schemas.microsoft.com/cdo/configuration/smtpserverport)”) = 25  
objCDOSYSCon.Fields(“[http://schemas.microsoft.com/cdo/configuration/sendusing](http://schemas.microsoft.com/cdo/configuration/sendusing)”) = 2  
objCDOSYSCon.Fields(“[http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout](http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout)”) = 60  
objCDOSYSCon.Fields(“urn:schemas:httpmail:importance”).Value = 1 'Importance of the e-mail (0=Low, 1=Normal, 2=High)  
objCDOSYSCon.Fields.Update

'Update the CDOSYS Configuration  
Set objCDOSYSMail.Configuration = objCDOSYSCon  
objCDOSYSMail.From = "user@domain.com"  
objCDOSYSMail.To = "contact@trevorsaint.com"  
objCDOSYSMail.Subject = “Serious Players Club - online enquiry”

’ This property sets the mail body of the submitted email (HTMLBody=HTML or TextBody=Plain).  
objCDOSYSMail.HTMLBody = email\_body  
objCDOSYSMail.Send

'Close the server mail object  
Set objCDOSYSMail = Nothing  
Set objCDOSYSCon = Nothing  
%\>

[/AS]

Please if you are familiar with the cdosys component, and have used it, please please help me out here.