<% If Request.ServerVariables("CONTENT_LENGTH") <> 0 Then Set Mailer = Server.CreateObject("SMTPsvg.Mailer") Mailer.FromName = Request.Form("anprechpartner") Mailer.FromAddress = Request.Form("Email") Mailer.RemoteHost = "popmail.activeisp.com" Mailer.Subject = "Anfrage von Website www.goweb.at" Mailer.AddRecipient "Goweb", "office@goweb.at" strBodyText = "Firma = " & Request.Form("firma") & vbCrLf strBodyText = strBodyText & "Ansprechpartner = " & Request.Form("ansprechpartner") & vbCrLf strBodyText = strBodyText & "Adresse = " & Request.Form("Adresse") & vbCrLf strBodyText = strBodyText & "Tel = " & Request.Form("Telefon") & vbCrLf strBodyText = strBodyText & "Fax = " & Request.Form("Fax") & vbCrLf strBodyText = strBodyText & "Email = " & Request.Form("Email") & vbCrLf strBodyText = strBodyText & "Homepage = " & Request.Form("Homepage") & vbCrLf strBodyText = strBodyText & "praxisdat = " & Request.Form("praxisdat") & vbCrLf strBodyText = strBodyText & "Beratung = " & Request.Form("Beratung") & vbCrLf strBodyText = strBodyText & "Mitteilung = " & Request.Form("Mitteilung") & vbCrLf Mailer.BodyText = strBodyText strMsg = "" If Mailer.SendMail Then strMsg = "Wir haben ihre Anfrage erhalten und werden sie so schnell wie möglich bearbeiten." Else strMsg = "Beim Versenden ihrer Nachricht ist ein Fehler aufgetreten." & vbCrLf & "Die Fehlermeldung lautet: " & Mailer.Response End If End If %>

		GoWeb IT-Solutions
		Anfrageformular
	Wahlarztsoftware  Webdesign  IT-Beratung  Über GoWeb  Startseite
	E-Mail         <% If strMsg <> "" Then %> <%=strMsg%> <% Else %> Firma: Ansprechpartner: Adresse: E-Mail: Telefon: Fax: Ich bitte Sie, mich zwecks Vereinbarung eines Termins zu kontaktieren: Ich interessiere mich für die Ordinationssoftware praxisDAT® für Wahlärzte bzw. Therapeuten Ich interessiere mich für die Erstellung einer Homepage Ich interessiere mich für Beratung in IT-Belangen Sonstige Mitteilung: <% End If %>
	© Design by GoWeb