% recaptcha_challenge_field = Request("recaptcha_challenge_field") recaptcha_response_field = Request("recaptcha_response_field") recaptcha_site_key = "6LebLcQUAAAAAD6VfMo80eYXrHpithrVrGcrDPVS" ' your public key recaptcha_private_key = "6LebLcQUAAAAAF0AmUDSKQ9TeHBOIaTJ_WrehzwD" ' your private key ' returns the HTML for the widget function recaptcha_challenge_writer() recaptcha_challenge_writer = _ "" & _ "" & _ "" end function ' returns "" if correct, otherwise it returns the error response function recaptcha_confirm(rechallenge,reresponse) Dim VarString VarString = _ "privatekey=" & recaptcha_private_key & _ "&remoteip=" & Request.ServerVariables("REMOTE_ADDR") & _ "&challenge=" & rechallenge & _ "&response=" & reresponse Dim objXmlHttp Set objXmlHttp = Server.CreateObject("Msxml2.ServerXMLHTTP") objXmlHttp.open "POST", "https://www.google.com/recaptcha/api/verify", False objXmlHttp.setRequestHeader "Content-Type", "application/x-www-form-urlencoded" objXmlHttp.send VarString Dim ResponseString ResponseString = split(objXmlHttp.responseText, vblf) Set objXmlHttp = Nothing if ResponseString(0) = "true" then 'They answered correctly recaptcha_confirm = "" else 'They answered incorrectly recaptcha_confirm = ResponseString(1) end if end function server_response = "" newCaptcha = True if (recaptcha_challenge_field <> "" or recaptcha_response_field <> "") then server_response = recaptcha_confirm(recaptcha_challenge_field, recaptcha_response_field) newCaptcha = False end if %>
Tech-News & Views
HAPPY CANADA DAY!
HAPPY INDEPENDENCE DAY!
CRANBROOK SCHOOL DISTRICT ADOPTS NEW BUILDING LIFE SAFETY REPORT FORMS!
Cranbrook, British Columbia - School District 5 (Cranbrook) has adopted our Building Life Safety Report Forms. Their maintenance staff joins a growing community of dedicated professionals who recognize that detailed inspection and testing documentation will enhance life safety and help service improvement.
CARBON MONOXIDE IN THE HOME!
Pawcatuck, Connecticut - The Westerly Sun published an interesting article about what you should do if your home’s Carbon Monoxide detector happens to go off. The story, by Jane Perkins, a Captain with the Watch Hill Fire Department advises NOT to open your windows and doors. Leave the premises and call your local Fire Department. Read more about the dangers of Carbon Monoxide in the home and what you should do here: http://www.thewesterlysun.com/opinion/columnguest/9034907-154/what-to-do-if-detectors-give-alarm-for-monoxide.html.
KAREN MCDIARMID APPOINTED AS THE NEW MANAGER OF THE ASTTBC FIRE PROTECTION PROGRAM
Surrey, British Columbia - Karen McDiarmid has been appointed as the new Fire Protection Program Manager at ASTTBC. Bob Furlong continues to be involved in an advisory and stakeholder liaison role.
LAUNCHING A NEW (OR IMPROVED) DOO-DAD? GOT A STORY? SOMETHING OF INTEREST AND/OR NOTE-WORTHY?
Contact Us! We'll make sure it gets out there!
+1 (888) 340-3473
“We are not a professional union, but together, we are a union of professionals!”
What we’re all about!
We are not affiliated with ASTTBC, CFAA, CANASA, NFPA, NAFED, or NICET (although we encourage you to explore and objectively evaluate the benefits associated with supporting their individual efforts). Membership in the Fire Technicians Network is entirely voluntary. Are you up to the challenge of demonstrating your commitment to public safety and the highest standard of professional practice?
Copyright © 2007 - 2020 The Fire Technicians Network. All Rights Reserved