<% sch = "http://schemas.microsoft.com/cdo/configuration/" Set cdoConfig = CreateObject("CDO.Configuration") With cdoConfig.Fields .Item(sch & "sendusing") = 2 ' cdoSendUsingPort .Item(sch & "smtpserver") = "127.0.0.1" .update End With Msg = "Crime Tip: " & Request.Form("crimetip") & "
" Msg = Msg & "Name: " & Request.Form("name") & "
" Msg = Msg & "Email: " & Request.Form("email") & "
" Set objCDOMail = Server.CreateObject("CDO.Message") Set objCDOMail.Configuration = cdoConfig objCDOMail.From = Request.Form("name") & " <" & Request.Form("email") & ">" objCDOMail.To = "rpdchief@buckeye-express.com" objCDOMail.Subject = "Crime Tip - RPD Online" objCDOMail.HTMLBody = Msg objCDOMail.Send Set objCDOMail = Nothing Set cdoConfig = Nothing %> Contact :: Rossford Police Department

 

CONTACT US

ROSSFORD POLICE DEPARTMENT

99 Hillsdale Avenue

Rossford, Ohio 43460

419-666-7390    Business

419-666-5230    24 Hours

419-666-2853    Fax

EMERGENCY: 9-1-1