Kontakta oss

<% If Request.ServerVariables("REQUEST_METHOD") = "GET" Then %>

Fyll i dina uppgifter så tar vi kontakt med dig inom kort.

Namn Företag Telefonnr Epost Meddelande/förfrågan Jag vill bli kontaktad viatelefonepost

<% Else fullname = Request.Form("fullname") company = Request.Form("company") phone = Request.Form("phone") email = Request.Form("email") message = Request.Form("message") contactway = Request.Form("contactway") Set mail = Server.CreateObject("CDONTS.NewMail") mail.From = email mail.Subject = "Epost från promtech.se" mail.To = "info@promtech.se" body = "Meddelande mottaget från promtech.se:" & vbCrLf & vbCrLf body = body & "Namn: " & fullname & vbCrLf & "Företag: " & company & vbCrLf & "Telnr: " & phone & vbCrLf & "Epost: " & email & vbCrLf & "Meddelande:" & vbCrLf & message & vbCrLf & vbCrLf Select Case contactway Case "phone" body = body & "Jag vill bli kontaktad via telefon." Case "email" body = body & "Jag vill bli kontaktad via epost." End Select body = body & vbCrLf & vbCrLf & "--------------------------------------------------------------" & vbCrLf body = body & "Detta epost skickades via www.promtech.se" & vbCrLf body = body & "Info om avsändaren:" & vbCrLf & "IP: " & Request.ServerVariables("REMOTE_ADDR") & vbCrLf & "Tid: " & Now() & vbCrLf mail.Body = body On Error Resume Next mail.Host = "mail-hub.space2u.com" mail.Send Set objMail = Nothing %>

Tack för din förfrågan! Vi återkommer inom kort till dig.

<% End If %>