Get in touch

Thank you for visiting our website. If you’re ready to get started, and have an electronic need or a custom printed circuit board product you’d like our assistance with, please fill out our Request for Quote (RFQ) form. We always appreciate your feedback.

You need to tell us who you are" put FALSE into tReadyToSend end if put $_POST["email"] into tFrom if tFrom = EMPTY then put "

You need to tell us how to reach out to you

" put FALSE into tReadyToSend else put wrapQ(tFrom) into tFrom end if put $_POST["phone"] into tPhone if tPhone = EMPTY then put "

You need to tell us how to call you

" put FALSE into tReadyToSend end if put $_POST["message"] into tMessage if tMessage = EMPTY then put "

You didn't say anything to us

" put FALSE into tReadyToSend end if if tReadyToSend <> FALSE then put "" into tCC put "" into tRecipient put "Contact form submission from your website" into tSubject -- put EMPTY into tCC put EMPTY into tBCC put "I'm going to tell Chip that" && tName && "from" && tFrom && "wants to know" && tMessage & ". They can be called @" && tPhone put "

tFrom is:" && tFrom && "

" mail tRecipient, tSubject, tMessage, tFrom, tName, tPhone, tCC, tBCC, FALSE, tAtts end if // tReadyToSend end if // $_POST["form_submitted"] is TRUE -- escape shell characters: use this function before passing data to the shell function shellEscape pText repeat for each char tChar in "\`!$" & quote replace tChar with "\" & tChar in pText end repeat return pText end shellEscape -- wrap quotes around text function wrapQ pText return quote & pText & quote end wrapQ -- mail -- -- Emails the given message to the recipients specified. -- Each address passed can have a name attached in the form "name
". -- Addresses can be passed as comma separated lists. -- Attachements can be added by passing an array (interger indexed or otherwise). -- with each attachment itself being an array. -- -- pTo - The addresses to send the message to -- pSub - The message subject -- pMsg - The message body -- pFrom - The address of the message sender -- pCc - Any cc addresses -- pBcc - Any Bcc addresses -- pHtml - Boolean, if the message is to be sent as html -- pAtts - Array of all attachments to send, each attachment of the form: -- * name: the name of the attachment -- * path: the absolute path to the attachment -- * type: the mime type of the attachment, defaults to -- application/octet-stream -- command mail pTo, pSub, pMsg, pFrom, pName, pPhone, pCc, pBcc, pHtml, pAtts local tMsg -- build the message header, adding the from, to and subject details -- we also put any cc addresses in here, but not bcc (bcc addresses hidden) put "From:" && pFrom & return & "To:" && pTo & return & "Subject:" && pSub & \ return into tMsg if pCc is not empty then put "Cc:" && pCc & return after tMsg end if -- if there are any attachments, we must send this email as multipart -- with the message body and each attachment forming a part -- we do this by specifying the message as multipart and generating a unique boundary if pAtts is an array then local tBoundary put "boundary" & the seconds into tBoundary put "MIME-Version: 1.0" & return & "Content-Type: multipart/mixed; boundary=" & \ wrapQ(tBoundary) & return & "--" & tBoundary & return after tMsg end if -- add the actual message body, setting the content type appropriatly if pHtml is true then put "Content-Type: text/html;" & return & return after tMsg else put "Content-Type: text/plain;" & return & return after tMsg end if put pMsg & return after tMsg -- add each attachment as a new part of the message, sepearting using -- the generated boundary if pAtts is an array then put "--" & tBoundary & return after tMsg repeat for each element tAtt in pAtts if there is a file tAtt["path"] then if tAtt["type"] is empty then get "application/octet-stream" else get tAtt["type"] end if put "Content-Type:" && it & "; name=" & wrapQ(tAtt["name"]) & ";" & \ return & "Content-Transfer-Encoding: base64;" & return & return & \ base64Encode(URL ("binfile:" & tAtt["path"])) & return & "--" & \ tBoundary & return after tMsg end if end repeat end if -- send the mail by piping the message we have just built to the sendmail command -- we must also send a copy of the message to the bcc addresses get shell("echo" && wrapQ(shellEscape(tMsg)) && "| /usr/sbin/sendmail" && wrapQ(shellEscape(pTo)) && "-f" && wrapQ(shellEscape(pFrom))) put "

pFrom is:" && pFrom && "

" put "

pTo is:" && pTo && "

" put "

tMsg is:" && tMsg && "

" end mail ?>

Contact Info

  • Excel Electronics, Inc.
    2600 Marina Drive
    Elkhart, IN 46514