%
'option explicit
'on error resume next
%>
<%
page="contact"
pageTitle = "Personal Injury Attorneys, Workers Compensation Attorneys, Hit And Run Attorneys, The Goodman Law Firm, Cleveland, OH"
pageDescription = "At The Goodman Law Firm, our one and only focus is for our clients to receive their fair and full compensation. Serving the greater Cleveland area, we specialize in accidents, birth injuries, construction accidents, healthcare negligence, insurance claims, wrongful death and much more"
pageDCDescription = "At The Goodman Law Firm, our one and only focus is for our clients to receive their fair and full compensation. Serving the greater Cleveland area, we specialize in accidents, birth injuries, construction accidents, healthcare negligence, insurance claims, wrongful death and much more"
pageKeywords = "grant goodman, personal injury attorneys, workers compensation attorneys, hit and run attorneys, the goodman law firm, cleveland, oh, personal injury law firms, car crashes, medical malpractice, unsafe property injuries, dog attacks, wrongful death"
pageSEORemark = "grant goodman, personal injury attorneys, workers compensation attorneys, hit and run attorneys, the goodman law firm, cleveland, oh, personal injury law firms, car crashes, medical malpractice, unsafe property injuries, dog attacks, wrongful death"
'--------------------------- RECAPTCHA ---------------------------
If Request.ServerVariables("REQUEST_METHOD") = "POST" Then
Dim recaptcha_secret, sendstring, objXML
' Secret key
recaptcha_secret = "6Ld4sh4TAAAAAJoKm9yRer6ipQW_CfWq1Uch8y4r"
sendstring = "https://www.google.com/recaptcha/api/siteverify?secret=" & recaptcha_secret & "&response=" & Request.form("g-recaptcha-response")
Set objXML = Server.CreateObject("MSXML2.ServerXMLHTTP")
objXML.Open "GET", sendstring, False
objXML.Send
Response.write "
Response: " & objXML.responseText & "
"
Set objXML = Nothing
End If
%>
<%
sub displayPageContent()
%>
WHEN YOU'VE BEEN INJURED, YOU NEED A "GOODMAN" ON YOUR SIDE!
<%
end sub
sub displayPageSpecificJS()
%>
<%
end sub
sub onLoadFunction()
end sub
'see if any errors happened
'ProcessErrors thisPage.pageType
set thisPage = Nothing
%>