<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <% ' Loads a file and executes it as an ASP file. ' Needed to perform dynamic execution of BSP/FUSE ' and can be useful down the road Function GetFileContentsForExecution(aspFileFragmentPath) Dim oFSO, sContents 'Obtain a reference to the FileSystemObject Set oFSO = Server.CreateObject("Scripting.FileSystemObject") 'Obtain the file contents sContents = oFSO.OpenTextFile(Request.ServerVariables("APPL_PHYSICAL_PATH") & aspFileFragmentPath).ReadAll Set oFSO = Nothing 'reference to the FileSystemObject 'Remove the ASP scripting tags sContents = Replace (sContents, "<" & "%", "") sContents = Replace (sContents, "%" & ">", "") GetFileContentsForExecution = sContents End Function ' Grabs the node value of the responseXML returned ' by the CSWP_DOC_INFO service. This is used to ' display metadata on the confirmation page. Function GetXmlNodeValue(objXmlRowNode, strNodeName) Dim objXmlNode, objXmlNodeValue Set objXmlNode = objXmlRowNode.selectSingleNode("@" & strNodeName) If (objXmlNode Is Nothing) Then Set objXmlNode = objXmlRowNode.selectSingleNode("idc:field[@name='" & strNodeName & "']") End If If (Not (objXmlNode Is Nothing)) Then GetXmlNodeValue = objXmlNode.Text End If End Function %> <%dim instanceName%> <%dim serverAddr%> <%dim visitorIP%> <%dim displayAllBSP%> <%dim fuseType%> <%dim cswpProgram%> <%instanceName = "build"%> <%serverAddr = "https://build.export.gov/build/idcplg"%> <%visitorIP = Request.ServerVariables("REMOTE_ADDR")%>
<% dim pathInfo pathInfo = Request.ServerVariables("PATH_INFO") pathInfo = "/"&Split(pathInfo, "/")(1) virtualDir = Server.MapPath(pathInfo) dim rootLength rootLength = Len(Server.MapPath("/")) virtualDir = Mid(virtualDir, rootLength+2) virtualDir = replace(virtualDir, "\", "/") %>
Local Time in Germany: Print

Profile of Germany

Name: Federal Republic of Germany

Capital: Berlin

Government

POPULATION

Population: 81,083,600 (on April 10, 2014) Immigrants: About 10.1% of the population is of foreign origin.

The largest groups are from:

  • Turkey (1.88%)
  • Others (Poland, Italy, Romania etc.) (8.17%)

Religion: Protestant (33%), Roman Catholic (33%), Muslim (4%), 108,000 members of Jewish communities, and others

Language: German Minority languages: Frisian, Sorbian, Danish and Romany

English is widely spoken throughout the population.

GEOGRAPHY

Area: 137,857 sq. miles (357,050 sq.km)

Neighbors: Denmark to the North; Netherlands, Belgium, Luxembourg and France to the West; Switzerland and Austria to the South; Czech Republic and Poland to the East.

States and Population (Apr 2014, in mill.)

Baden-Württemberg:
10,631,278

Hessen: 6,045,425

Saxony: 4,046,385

Bavaria: 12,604,244

Lower Saxony: 7,790,559

Saxony-Anhalt: 2,244,577

Berlin: 3,421,829

Mecklenburg-West Pomerania: 1,596,505

Schleswig-Holstein: 2,815,955

Brandenburg: 2,449,193

North Rhine-Westphalia:
17,571,856

Thuringia: 2,160,840

Bremen: 657,391

Rhineland-Palatinate: 3,994,366

 

Hamburg: 1,746,342

Saarland: 990,718

 

Major Cities and Population (Dec 31, 2013)

Berlin: 3, 421, 829

Stuttgart: 604, 297

Leipzig: 531, 562

Hamburg: 1, 746, 342

Düsseldorf: 598, 686

Dresden: 530, 754

Munich: 1, 407, 836

Dortmund: 575, 944

Hanover: 518, 386

Cologne: 1, 034, 175

Essen: 569, 884

Nuremberg: 498, 876

Frankfurt: 701, 350

Bremen: 548, 547

Duisburg: 486, 855

Source: Federal Statistical Office Germany


Germany map

  Notice to Visitors!


  The link you have chosen will take you to a non-U.S. Government website.

  If the page does not appear in 5 seconds, please click this: outside web site

  Export.gov is managed by the International Trade Administration and external links are covered by its website  disclaimer statement.


  Notice to Visitors!


  The link you have chosen will take you to a non-U.S. Government website.

  If the page does not appear in 5 seconds, please click this: outside web site

  BuyUSA.gov is managed by the International Trade Administration and external links are covered by its website disclaimer statement.