Gerald R. Ford Presidential Library and Museum

<% ' ' MoFuse Premium API ' Mobile Detect & Redirect ' DIM sMofuseSiteID sMofuseSiteID = "ac8334de878cd4755bf6182cb3f3e474" DIM sMofuseSiteURL sMofuseSiteURL = "http://grfordlibrarymuseum.bxs.mobi/" DIM sMofuseParams MofuseSetParams sMofuseParams, "a", "mobile_detect" MofuseSetParams sMofuseParams, "v", "0.2.5" MofuseSetParams sMofuseParams, "s", sMofuseSiteID MofuseSetParams sMofuseParams, "m", sMofuseSiteURL MofuseSetParams sMofuseParams, "u", Request.ServerVariables("HTTP_USER_AGENT") IF Request.ServerVariables("SERVER_PORT") = "80" THEN MofuseSetParams sMofuseParams, "h", Request.ServerVariables("SERVER_NAME") ELSE MofuseSetParams sMofuseParams, "h", Request.ServerVariables("SERVER_NAME") & ":" & Request.ServerVariables("SERVER_PORT") END IF MofuseSetParams sMofuseParams, "r", Request.ServerVariables("SCRIPT_NAME") MofuseSetParams sMofuseParams, "i", Request.ServerVariables("REMOTE_ADDR") Sub MofuseSetParams(ByRef sParams, sKey, sVal) IF sVal <> "" THEN IF sParams <> "" THEN sParams = sParams & "&" & Server.URLEncode(sKey) & "=" & Server.URLEncode(sVal) ELSE sParams = sParams & "?" & Server.URLEncode(sKey) & "=" & Server.URLEncode(sVal) END IF END IF End Sub FUNCTION MofuseMobileDetectRequest(sParams) DIM sMofuseMobile sMofuseMobile = getHTML("http://api.mofusepremium.com/" & sParams) 'Response.Write sMofuseMobile IF sMofuseMobile <> "" THEN MofuseMobileDetectRequest = Left(sMofuseMobile, 25) ELSE MofuseMobileDetectRequest = "0" END IF END FUNCTION FUNCTION getHTML (strUrl) 'Response.Write strUrl Set xmlHttp = Server.Createobject("MSXML2.ServerXMLHTTP") xmlHttp.Open "GET", strUrl, False xmlHttp.setRequestHeader "User-Agent", "asp httprequest" xmlHttp.setRequestHeader "content-type", "application/x-www-form-urlencoded" xmlHttp.Send getHTML = xmlHttp.responseText xmlHttp.abort() set xmlHttp = Nothing END FUNCTION SUB MofuseMobileDetect(sParams) DIM isMobile isMobile = MofuseMobileDetectRequest(sParams) 'Response.Write isMobile DIM sMofuseParams sMofuseParams = "" IF Request.ServerVariables("SERVER_PORT") = "80" THEN MofuseSetParams sMofuseParams, "h", Request.ServerVariables("SERVER_NAME") ELSE MofuseSetParams sMofuseParams, "h", Request.ServerVariables("SERVER_NAME") & ":" & Request.ServerVariables("SERVER_PORT") END IF MofuseSetParams sMofuseParams, "r", Request.ServerVariables("SCRIPT_NAME") IF isMobile = 1 THEN Response.Redirect(sMofuseSiteURL & sMofuseParams) END IF END SUB IF Request.QueryString("nomobile") <> "1" THEN MofuseMobileDetect(sMofuseParams) END IF ' ' END OF MoFuse Premium API ' %> Gerald R. Ford Presidential Library and Museum

Page Printing Info

Special Events & Exhibits

Documents & Photos

Education Programs

Gerald R. Ford Foundation

Related Links

For Email Newsletters you can trust

Ford Library

1000 Beal Avenue,
Ann Arbor, MI 48109
Open: Monday - Friday, 8:45 a.m. - 4:45 p.m.
Closed Federal holidays.
(734) 205-0555
>>Directions
>>More

Ford Museum

303 Pearl Street NW, Grand Rapids, MI 49504-5353
Hours: 9:00 am - 5:00 pm. (Closed New Year's Day, Thanksgiving Day, and Christmas Day)
(616) 254-0400

>>President Ford's Burial Site
>>Directions
>>More

Museum eStore

Upcoming Events | Newsroom | Recent Events

Upcoming GRAND RAPIDS --

President Gerald R. Ford Student Essay Challenge
This year's theme is "The Meaning of Courage Today." Open to all West Michigan high school students. More...

Inside the Cold War: The CIA and KGB Perspectives
Peter Earnest and Oleg Kalugin
January 21, 2010 7:30 p.m.

HONEST ABE: A Character You Can Count On
Face to Face Productions
February 11-12, 2010, 10:00 a.m. and 12:00 p.m.

Ron White
Biographer on Abraham Lincoln
February 16, 2010, 7:30 p.m.

Mark Updegrove
The Presidents and the Cold War
February 25, 2010, 7:30 p.m.

Upcoming exhibit: America and the Cold War (Grand Rapids)
January 22 - June 13, 2010

World War II was the most devastating conflict in history with much of Europe and Asia left in ruins at war's end. Yet, there was no peace. The superpowers of the United States and Soviet Union and their ideologies of democracy versus tyranny competed for prominence on the world stage in a cold war. For over 40 years these nuclear superpowers maintained a standoff and avoided a hot war that could have potentially destroyed the planet.

	Curator's Favorites
	On October 13, 1975 president Gerald R. Ford was presented with a plaque made from pieces of the naval warship the USS Constitution in celebration of the Bicentennial of the United States Navy... >>Read more...

	•Exhibit: Picturing the Century: One Hundred Years of Photography from the National Archives September 12, 2009 - January 9, 2010 (Grand Rapids)>>Press Release •Exhibit: Economy in Crisis, 1974 - 1975 (Ann Arbor)
	•Teachers: Today's Document from the National Archives •Teachers: America's Historical Documents
	•Gerald R. Ford Congressional Tribute Book •Posthumous Tributes and Honors for President Ford
	•Researchers: Recently processed and opened •Researchers: Gerald R. Ford Foundation Research Travel Grant Recipients announced

updated: November 30, 2009