<%@ Language=VBScript %> <% if len(Request.Form("submit")) > 0 then dim body dim replyto replyto = Request.Form("email") body = body & "Name: " & Request.Form("name") & vbcrlf body = body & "Email Address: " & Request.Form("email") & vbcrlf body = body & "Phone Number: " & Request.Form("phone") & vbcrlf body = body & "Message: " & Request.Form("comments") & vbcrlf dim sch dim cdoConfig dim cdoMessage sch = "http://schemas.microsoft.com/cdo/configuration/" Set cdoConfig = Server.CreateObject("CDO.Configuration") cdoConfig.Fields.Item(sch & "sendusing") = 2 cdoConfig.Fields.Item(sch & "smtpserver") = "mail.fountainshosting.com" cdoConfig.fields.update Set cdoMessage = Server.CreateObject("CDO.Message") Set cdoMessage.Configuration = cdoConfig cdoMessage.From = "BillBunch_WS@Denovo.net" cdoMessage.To = "BillBunch_WS@Denovo.net" ' cdoMessage.To = "Peter@Denovo.net" cdoMessage.Subject = "William H Bunch Web Site Contact Form" cdoMessage.ReplyTo = replyto cdoMessage.TextBody = body cdoMessage.Send Set cdoMessage = Nothing Set cdoConfig = Nothing Response.redirect "thanks.htm" end if %> Contact William H. Bunch CPA

Contact Us

Thank you for your interest in our services. You can contact us using the form below, or send email to info@WilliamHBunchCPA.com, or call (919) 929-0595.

William H. Bunch, CPA, PA
102 Market Street, Suite 200
Chapel Hill, NC 27516
(919) 929-0595