Seattle Marine Sales

<%@ LANGUAGE="VBSCRIPT" %> <% Dim strBody strBody = strBody & "*******Web Site Info Request ********************" & vbcr strBody = strBody & "First name: " & Request.Form("name") & vbcr strBody = strBody & "Email: " & Request.Form("email") & vbcr strBody = strBody & "Title: " & Request.Form("title") & vbcr strBody = strBody & "Organization: " & Request.Form("organization") & vbcr strBody = strBody & "Phone: " & Request.Form("phone") & vbcr strBody = strBody & "Fax: " & Request.Form("fax") & vbcr strBody = strBody & "Website: " & Request.Form("website") & vbcr strBody = strBody & "Question: " & Request.Form("question") & vbcr Set Mail = Server.CreateObject("CDO.Message") Set MailConfig = Server.CreateObject ("CDO.Configuration") MailConfig.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp2.adhost.com" MailConfig.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 MailConfig.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 MailConfig.Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60 MailConfig.Fields.Update Set Mail.Configuration = MailConfig Mail.From= Request.Form("Email") 'Mail.To="info@seattlemarinesales.com" Mail.To="vadim@ed-webdesigns.com" 'Mail.bcc="vadim@ed-webdesigns.com" Mail.Subject="Seattle Marine Sales Web Site Info Request" Mail.TextBody=strBody Mail.Send Set Mail=Nothing %> Seattle Marine Sales

Site Map

Seattle Marine Sales
Your New Pacific Northwest EdgeWater Boat Dealer
We also offer consignment powerboats to 33 feet

Contact information

There are many ways to contact us, just use the information below.

Address:

5105 Leary Avenue NW
Seattle, WA 98107
206.284.6020

If you would prefer to leave us a message we will contact you, regarding your request!
Name:
Email:
Title:
Organization:
Phone:
Fax:
Website:
Question:

"The difference is not what we do, it's the way we do it."™