Home

Contact Us

 

Contact Information

Sirius Cotons
c/o Pam and Randall Osborne
PO BOX 1163
Pikeville, KY 41502
Phone: (606) 432-2690

Contact Form

If you would like additional information about our Cotons, please complete and submit the form below. We will get in touch with you as soon as possible.

Name:
Address:
Phone:
E-mail:
Interested in:

Additional Comments or Questions:


 
<% '====================================== ' Sends an email with CDONTS function CDONTS_Mailer(Message, FromEmail, ToEmail, FromName, ToName, Subject, MailerPath,mailRedirect) Dim Mailer Set Mailer = Server.CreateObject("CDONTS.NewMail") Mailer.To = ToEmail Mailer.From = FromEmail Mailer.Subject = Subject Mailer.Body = Message Mailer.MailFormat = 1 Mailer.BodyFormat = 1 Mailer.Send Set Mailer = Nothing CDONTS_Mailer = true Response.Redirect(mailRedirect) end function '====================================== ' Sends an email with ASPMail function ASPMail_Mailer(Message, FromEmail, ToEmail, FromName, ToName, Subject, MailerPath,mailRedirect) Dim Mailer Set Mailer = Server.CreateObject("SMTPsvg.Mailer") Mailer.RemoteHost = MailerPath Mailer.ContentType = "text/plain" Mailer.FromName = FromName Mailer.FromAddress = FromEmail Mailer.AddRecipient ToName, ToEmail Mailer.Subject = Subject Mailer.BodyText = Message Mailer.SendMail Set Mailer = Nothing ASPMail_Mailer = true Response.Redirect(mailRedirect) end function '====================================== ' Sends an email with ASPQMail function ASPQMail_Mailer(Message, FromEmail, ToEmail, FromName, ToName, Subject, MailerPath,mailRedirect) on error resume next Dim Mailer Set Mailer = Server.CreateObject("SMTPsvg.Mailer") Mailer.RemoteHost = MailerPath Mailer.ContentType = "test/plain" Mailer.FromName = FromName Mailer.FromAddress = FromEmail Mailer.AddRecipient ToName, ToEmail Mailer.Subject = Subject Mailer.BodyText = Message Mailer.QMessage = true Mailer.SendMail Set Mailer = Nothing ASPQMail_Mailer = true Response.Redirect(mailRedirect) end function '====================================== ' Sends an email with SASmtpMail function SASmtpMail_Mailer(Message, FromEmail, ToEmail, FromName, ToName, Subject, MailerPath,mailRedirect) on error resume next Dim Mailer Set Mailer = Server.CreateObject("SoftArtisans.SMTPMail") Mailer.RemoteHost = MailerPath Mailer.contenttype = "text/plain" Mailer.AddRecipient ToName, ToEmail Mailer.FromName = FromName Mailer.FromAddress = FromEmail Mailer.Subject = Subject Mailer.BodyText = Message Mailer.SendMail Set Mailer = Nothing SASmtpMail_Mailer = true Response.Redirect(mailRedirect) end function '====================================== ' Sends an email with JMail function JMail_Mailer(Message, FromEmail, ToEmail, FromName, ToName, Subject, MailerPath,mailRedirect) on error resume next Dim Mailer Set Mailer = Server.CreateObject("JMail.SMTPMail") Mailer.ServerAddress = MailerPath & ":" Mailer.contenttype = "text/plain" Mailer.AddRecipient ToEmail Mailer.Sender = FromEmail Mailer.Subject = Subject Mailer.Body = Message Mailer.Execute Set Mailer = Nothing JMail_Mailer = true Response.Redirect(mailRedirect) end function '====================================== ' Sends an email with ASPEmail function ASPEmail_Mailer(Message, FromEmail, ToEmail, FromName, ToName, Subject, MailerPath,mailRedirect) on error resume next Dim Mailer Set Mailer = Server.CreateObject("Persits.MailSender") Mailer.Host = MailerPath Mailer.From = FromEmail Mailer.FromName = FromName Mailer.AddAddress ToName, ToEmail Mailer.Subject = Subject Mailer.Body = Message Mailer.Send Set Mailer = Nothing ASPEmail_Mailer = true Response.Redirect(mailRedirect) end function %>