Insights

Oliver Wyman continually invests in applied research. Learn more about our many books, our suite of periodicals, frequent contributions to leading external publications, and interviews with the press.

Insights ...Search by keyword
<% if Request.QueryString <> "" then %> <% end if %> <% if false then %><% end if %> <% if false then %><% end if %> <% if false then %><% end if %> <% if false then %><% end if %> <% if false then %><% end if %> <% if false then %><% end if %> <% if false then %><% end if %> <% if false then %><% end if %> <% if false then %><% end if %> <% if false then %><% end if %> <% if false then %><% end if %> <% if false then %><% end if %> <% if false then %><% end if %> <% if false then %><% end if %> <% if false then %><% end if %> <% if false then %><% end if %> <% if false then %><% end if %> <% if false then %><% end if %> <% if false then %><% end if %> <% if false then %><% end if %> <% if false then %> <% end if %> <%hideIT = "" If hideIT = "German" Then %> <% ElseIf hideIT = "ChineseS" Then%> <% Else %> <% If ""="" Then Response.write("") if Request.QueryString <> "" or Request.form <> "" then Response.Buffer = True Dim objXMLHTTP, xml, searchtext searchtext = "" If Request.QueryString<>"" Then searchtext = "?" & Request.QueryString Elseif Request.form<>"" Then searchtext = "?" & Request.form End If ' Create an xmlhttp object: Set xml = Server.CreateObject("Microsoft.XMLHTTP") ' Or, for version 3.0 of XMLHTTP, use: ' Set xml = Server.CreateObject("MSXML2.ServerXMLHTTP") ' Opens the connection to the remote server. 'EXAMPLE: xml.Open "GET", "http://10.172.14.53:8080/cps/rde/xchg/mercer/hs.xsl/search.xml" & searchtext, False xml.Open "GET", "http://10.172.14.53:8080/cps/rde/xchg/mercer/hs.xsl/search-insights.xml" & searchtext, False ' Actually Sends the request and returns the data: xml.Send 'Display the HTML response.write(xml.responseText) Set xml = Nothing end if Else 'display sample results %>

Sample Search Results:

<% End If %> <%End If%>
Title Year