<% '============= Create and Open Database Connection ============= 'OPEN THE DATABASE If blnConnectToDB Then dim blnDBconnectionDown blnDBconnectionDown = false Err.Clear on error resume next set dbConn = Server.CreateObject("ADODB.Connection") 'Open the Connnection 'dbConn.Open Application("dbConn_ConnectionString") dbConn.Open "DSN=PostgreSQL30", "eere_news", "33reNews" ''New Error trapping. KC added 2/23/2012 If Err.Number <> 0 Then ''Response.Write (Err.Description& "

") dbConn.Close Set dbConn = nothing blnDBconnectionDown = true End If On Error GoTo 0 ''error trapping not working here KC removed 2/23/2012 ''tmpDBErrorNativeError = 0 '' For Each dbErr In dbConn.Errors '' strErrMsg = strErrMsg & _ '' "Source: " & dbErr.Source & vbCrLF & _ '' "Description: " & dbErr.Description & vbCrLF & _ '' "SQL State: " & dbErr.SQLState & vbCrLF & _ '' "NativeError: " & dbErr.NativeError & vbCrLF & _ '' "Number: " & dbErr.Number & vbCrLF & vbCrLF '' tmpDBErrorNativeError = dbErr.NativeError '' Next '' If (dbConn.Errors.Count > 0) AND (tmpDBErrorNativeError <> 5703) Then '' dbConn.Close '' Set dbConn = nothing '' blnDBconnectionDown = true '' Response.write(strErrMsg) '' Response.end '' End If dim arrErrors() Redim arrErrors(2,0) End If '============================================================== Public Function GetRS2(myCommand) On Error GoTo 0 'objConn: local connection object 'objRS: local recordset object 'objComm: command object passed in to the function Dim objConn, objRS, blnErrorLogged, objComm 'Create the command object Set objComm = Server.CreateObject("ADODB.Command") Set objComm = myCommand 'Create the connection object Set objConn = Server.CreateObject("ADODB.Connection") 'Open the connection object objConn.Open "DSN=PostgreSQL30", "eere_news", "33reNews" 'Set the active connection objComm.ActiveConnection = objConn 'Create the recordset object Set objRS = Server.CreateObject("ADODB.Recordset") 'Set the cursor location for disconnected recordsets 'objRS.CursorLocation = adUseClient 'Turn on error handling for just a second ' On Error Resume Next 'Open the recordset 'objRS.Open SQL, objConn, adOpenStatic, adLockOptimistic Set objRS = objComm.Execute 'Response.Write "State = " & objRS.State & "
" 'objRS.MoveLast 'objRS.MoveFirst 'Response.Write "Count = " & objRS.RecordCount & "
" 'Response.End 'Check for an error ' If Err.Number <> 0 Then ' Response.Write "Database Error Occured

" ' Response.Write "Error #" & Err.Number & "
" ' Response.Write Err.Description & "

" ' Response.Write "SQL:
" ' Response.Write SQL ' Response.End ' End If 'Turn off error handling ' On Error GoTo 0 'Disconnect the recordset 'Set objComm.ActiveConnection = Nothing 'Close the connection 'objConn.Close 'Set the connection to Nothing 'Set objConn = Nothing 'Set the Command to Nothing 'Set objComm = Nothing 'Return the recordset Set GetRS2 = objRS On Error Resume Next End Function '=============================================================== Function GetRS(sSQL) 'Declarations dim rs 'Create Recordset Object set rs = Server.CreateObject("ADODB.Recordset") If blnConnectToDB Then 'Open Recordset based on SQL rs.Open sSQL, dbConn, 1, 3, 1 End If 'Return Recordset set GetRs = rs End Function '=============================================================== Function ExecSQL(sSQL) 'Open the Command Object dim lRecordsAffected dbConn.Execute sSQL, lRecordsAffected 'Return the Records Affected ExecSQL = lRecordsAffected End Function '======================================================================== Function sendEmail(strFrom,strTo,strSubject,strMessage) Dim sch ' Schema sch = "http://schemas.microsoft.com/cdo/configuration/" Set cdoConfig = CreateObject("CDO.Configuration") With cdoConfig.Fields .Item(sch & "sendusing") = 2 .Item(sch & "smtpserver") = "mxrelay.doe.gov" .update End With Set cdoMessage = CreateObject("CDO.Message") With cdoMessage Set .Configuration = cdoConfig .From = strFrom .To = strTo .Subject = strSubject .TextBody = strMessage .Send End With Set cdoMessage = Nothing Set cdoConfig = Nothing End Function Function removeBadChars(tmpString) tmpString = Replace(tmpString , "<", "") tmpString = Replace(tmpString , ">", "") tmpString = Replace(tmpString , "'", "") tmpString = Replace(tmpString , """", "") tmpString = Replace(tmpString , ";", "") tmpString = Replace(tmpString , "(", "") tmpString = Replace(tmpString , ")", "") removeBadChars = tmpString End Function %> <% 'If there is a mobile version of this site, check the user_agent, and forward to 'the mobile version of the site (unless cookie or querystring var is set) if "true" = "true" then tmpSeeFullPage = Mid(Request.Querystring("m"),1,1) if ((isMobile) and (tmpSeeFullPage <> "1")) then tmpMobileURL = Request.servervariables("HTTP_URL") tmpMobileFileName = mid(tmpMobileURL, InStrRev(tmpMobileURL, "/")+1) tmpMobileURL = Left(tmpMobileURL, InStrRev(tmpMobileURL, "/")) tmpMobileURL = tmpMobileURL & "m/" & tmpMobileFileName Response.Clear Response.Redirect(tmpMobileURL) end if end if %>

<% ''This code is strictly when a user clicks on a left nav and needs to be forwarded to another site/program/office if ("" <> "") then Response.Clear Response.Redirect ("") end if %>

Geothermal Resources and Technologies

Photo of steam rising high in the air from a geyser.

Geothermal energy leverages heated air and water from beneath the earth's surface.

This page provides a brief overview of geothermal energy resources and technologies supplemented by specific information to apply geothermal systems within the Federal sector.


Geothermal energy is produced from heat and hot water found within the earth. Federal agencies can harness geothermal energy for heating and cooling air and water, as well as for electricity production.

Geothermal resources can be drawn through several resources. The resource can be at or near the surface or miles deep. Geothermal systems move heat from these locations where it can be used more efficiently for thermal or electrical energy applications. The three typical applications include:

  • Geothermal Heat Pumps (GHPs): GHPs use the ground, groundwater, or surface water as a heat source and heat sink as opposed to ambient air. Typical resource temperatures range from 40°F to 100°F (4°C to 38°C).

  • Direct-Use Applications: In direct-use applications, systems use hot water directly for space conditioning or process heat. This approach is most appropriate for low- to moderate-temperature hydrothermal resources.

  • Power Plant Electricity: Steam and binary geothermal power plants leverage heat from geothermal resources to drive turbines, which produce electricity.

Visit the Department of Energy's (DOE) Geothermal Technologies Office to learn more on geothermal energy basics and technologies.

Federal Application

Geothermal resources make a significant contribution to national renewable energy production. Because many of the existing geothermal resources are located on Federal lands, it is not surprising that 46% of the geothermal electricity generated is from resources on Federal lands.

Before conducting an assessment or deploying geothermal energy technologies, Federal agencies must evaluate a series of questions.

What are my energy goals?

Energy goals range from meeting regulatory requirements to powering remote applications to increasing energy security.

  • Regulatory Requirements: Electricity produced by geothermal technologies falls under the Energy Policy Act (EPAct) of 2005 definition of renewable energy and can be used to meet EPAct 2005 renewable energy requirements. While geothermal resources for thermal energy do not meet the EPAct 2005 renewable energy definition or requirements, it can reduce energy consumption intensity, which does play a role in other Federal laws and regulations.

  • Remote Power: Geothermal resources for thermal energy and electricity are generally not cost-effective or appropriate for remote applications.

  • Energy Security: Geothermal resources are viable renewable energy resources found in almost every community across the U.S. It is a predictable energy resource that can reduce utility peak demand for increased energy security.

What kind of energy do I use?

Photo of green pipes connecting into a facility.

Pipes route steam into this geothermal power plant to produce electricity.

Federal agencies must understand what type of energy is used before determining if geothermal resources are applicable. Geothermal resources can be used for electricity or thermal energy applications.

When do I need the energy?

Geothermal energy is capable of producing electricity and thermal energy around the clock. It is a viable resource for most applications if deemed cost-effective based on energy load needs.

How much power do I use/need to produce?

Geothermal technologies generate varying amounts of electricity and thermal energy depending on the size of the technology deployment and geothermal resource itself. It is important to consult an expert for a professional evaluation to plan accordingly.

Where am I located?

Geothermal resources are available across the U.S., but vary greatly depending on exact location. For a broad overview of your facility's geothermal resources, the Department of Energy provides geothermal energy resource maps of the U.S.

Before initiating a geothermal energy project, resources in your area must be measured and verified. It is important to consult an expert for a professional evaluation before implementing geothermal energy projects.

Is this a building- or campus-scale project?

Geothermal technologies for thermal applications are ideally suited for facilities of almost any size. Geothermal power plants are suited more for large-scale or larger projects. Implementing a geothermal power plant for a standalone building or facility is typically not cost-effective.

Is my facility a good candidate for a GHP?

GHPs have proven to effectively save energy, but factors other than steady resource temperatures contribute to project feasibility. In general, it is best to consider GHP if several of the following conditions exist:

  • New construction or existing facility with hydronic piping
  • Major renovation when existing systems are obsolete
  • High water table or moist, damp soil
  • Ground-level parking area or open land for loop installation, or access to ground or other water
  • Mixture of heating and cooling needs, including multiple zones (both core and perimeter), water heating, snow melting, and process applications

Can geothermal resources be used for industrial applications?

Direct-use geothermal applications can be used for multiple industrial applications, including heating for greenhouses, aquaculture (fish farming), crop drying, food dehydrating, laundries, sludge digestion, or other process heat applications.

What is my budget?

It is important to consult an expert for a professional evaluation to see if geothermal energy fits into your current budget. There are many examples of successful GHP installations at Federal agencies financed through energy savings performance contracts (ESPCs) and direct appropriations.

What resources are available for operations and maintenance?

Geothermal technologies require ongoing operations and maintenance. It is important to factor these operations and maintenance costs and staffing needs in any facility energy management plan.

Next steps

Visit the project planning section for detailed information on planning and deploying renewable energy projects. Federal case studies are available to provide specific examples of viable geothermal energy projects.


Detailed information on geothermal energy resources and technologies is available through: