<% ' Declarations and initialization of global variables/constants Const PASSWORD_LENGTH = 40 Const USERNAME_LENGTH = 12 ' Access is controlled by bit settings Const ACCESS_NONE = 0 ' access to website to view preview video and read full stories ' but can't download book ... has dontated $10 but < $25 Const ACCESS_GUEST = 1 ' A contributor, editor or dontator of $25 or more ' has premission to view previews, blog, TEV1 and download eBooks ' depending upon the level of download permissions (0-none; 1-TEV1; 2-Australian; TEV2: 3 Const ACCESS_CONTRIBUTOR = 4 ' can view incoming orders for processing, view previews, TEP stories, and TEV1 Const ACCESS_PLACE_ORDERS = 7 ' Full access to everything ... adminstrator Const ACCESS_ADMIN = 255 ' Users can downlaod TEV1 pdf Const DOWNLOAD_TEV1 = 1 ' Users can downlaod Australian birds pdf Const DOWNLOAD_AUS = 2 ' Users can downlaod TEV1 and AUs books Const DOWNLOAD_TEV1_AUS = 3 Const SESSION_TIMEOUT = 360 Const SESSION_TIMED_OUT = -1 Const SESSION_INVALID = -2 Dim crlf, pre, post, database, dbname, gEditIcon, gUploadFiles, gLastname, gFirstname, gDownLoad Dim Conn, connTN, gSession, gLogin, gPassword, gAccessLevel, gContactID, gMenuItem, gRootpath Dim SCRIPT_NAME, gPost_destination, gInset, gHomePath, gPostImmediate Dim gImageBeh, gImageJE, gImageSB, gImageNB, gImageWeb Dim MonthArray(12) MonthArray(1) = "Jan" MonthArray(2) = "Feb" MonthArray(3) = "Mar" MonthArray(4) = "Apr" MonthArray(5) = "May" MonthArray(6) = "Jun" MonthArray(7) = "Jul" MonthArray(8) = "Aug" MonthArray(9) = "Sep" MonthArray(10) = "Oct" MonthArray(11) = "Nov" MonthArray(12) = "Dec" crlf= CHR(13) & CHR(10) browser_type = Request.ServerVariables("HTTP_USER_AGENT") if InStr(browser_type, "MSIE") > 0 Then pre = "" post = "" Else pre = "" post = "" End If gHomePath = "" 'ON ERROR RESUME NEXT %> <% if IsObject(connTN) then connTN.close end if database = "DATABASE=TerraNat;UID=;PWD=;DSN=TN17906_TerraNat" dbname= "TerraNat" Set connTN = Server.CreateObject("ADODB.Connection") connTN.Open database %>
Principal contributor
    Dr. Wm. James Davis is a behavioral
ecologist with a special interest in how animals communicate. While a graduate student at the University of Texas at Austin, Jim studied Belted Kingfishers, and while working as a Post-doctoral fellow at the Smithsonian Tropical Research Institute in Panama he studied Amazon Kingfishers.

   While living in Australia, Jim was editor of a science magazine called Interpretive Birding and has subsequently published two books. Several years ago he started Terra Naturalist Publishing
   Currently, he spends as much time as possible filming and writing about wildlife while paying special attention to species with interesting and unique evolutionary adaptations. Many of his stories and observations are posted on this website.
   If you are interested in having Jim give a talk for your group, please email us to arrange a time and place. In the meantime, you are welcome to read testimonials about Jim's past workshops and presentations.
Click here for testimonials