<% ' ' 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
The Gerald R. Ford Presidential Library and Museum Website
  • Use the Library
  • Events
  • eStore
  • Facility Rental
  • Map & Directions
  • Staff Directory
  • Visit the Museum
  • Events
  • eStore
  • Facility Rental
  • Map & Directions
  • Padnos Internships
  • Staff Directory
  • Special Needs
  • Volunteer
Page Printing Info       
 
Special Events & Exhibits
Digital Library
Education Programs
eStore
Ford Presidential Foundation
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



 

   
     
 
Upcoming Events  | Newsroom | Recent Events
Sign up for our Email Newsletter

On Exhibit in ANN ARBOR --
Gerald Ford in Mao's China: The Historic 1972 and 1975 Visits

Upcoming ANN ARBOR --

Ken Walsh, author of Family of Freedom: Presidents and African Americans in the White House
Sunday, February 20 2 p.m.

William T. Coleman, author of Counsel for the Situation: Shaping the Law to Realize America's Promise
Wednesday, March 30 7:00 p.m. 

On Exhibit in GRAND RAPIDS --

Betty Ford – An Extraordinary Life
October 27, 2010 through February 27, 2011

Upcoming GRAND RAPIDS --

Carl Anthony, author of Like No One Else
Wednesday, February 9 7:30 p.m.
 
Ken Walsh, author of Family of Freedom: Presidents and African Americans in the White House
Saturday, February 19 2 p.m.

William T. Coleman, author of Counsel for the Situation: Shaping the Law to Realize America's Promise
Thursday, March 31 7:00 p.m.

The American Soldier - A Photographic Tribute to Soldiers and Marines from the Civil War to Iraq

March 17 - June 17, 2011


Advice to GRF

Staff Favorites
Library image

•Researchers: Newly available material
Digital Library
Gerald R. Ford Foundation Research Travel Grant application

nara logo •Teachers: New Education website
Today's Document from the National Archives
America's Historical Documents
Congressional book cover Gerald R. Ford Congressional Tribute Book
Posthumous Tributes and Honors for President Ford

eStore

eStore logo museum store graphic

30th anniversary logo Michigan 

Support for public programming provided by the National Archives and Records Adminstration and the Gerald R. Ford Presidential Foundation.

updated: January 17, 2011