GITA Southeast

<%@LANGUAGE="VBSCRIPT"%> <% response.write session("intialpage") If Request.Form("Action") = "Enter" Then If Request.Form("chkCookie") = "1" Then Response.Cookies( "VO" ).Expires = now() + 365 Response.Cookies("VO")("UserId") = Request("UserId") Response.Cookies("VO")("password") = Request("password") End If Dim rsAdminCheckLogin__vuserid rsAdminCheckLogin__vuserid = "3005" if (Request("UserId") <> "") then rsAdminCheckLogin__vuserid = Request("UserId") Dim rsAdminCheckLogin__vpassword rsAdminCheckLogin__vpassword = "liz" if (Request("password") <> "") then rsAdminCheckLogin__vpassword = Request("password") set rsAdminCheckLogin = Server.CreateObject("ADODB.Recordset") rsAdminCheckLogin.ActiveConnection = MM_ConnGita_STRING rsAdminCheckLogin.Source = "SELECT PersonID, Password FROM passwords WHERE PersonID = " + Replace(rsAdminCheckLogin__vuserid, "'", "''") + " AND Password = '" + Replace(rsAdminCheckLogin__vpassword, "'", "''") + "'" rsAdminCheckLogin.CursorType = 0 rsAdminCheckLogin.CursorLocation = 2 rsAdminCheckLogin.LockType = 3 rsAdminCheckLogin.Open() rsAdminCheckLogin_numRows = 0 'response.write(rsAdminCheckLogin.Source) ' * ' * A little error checking before we go to the db. ' * vErr = 0 If Request.Form("Password") = "" Then vErr = 1 UserMsg = "You must enter a Password." End If If Request.Form("UserId") = "" Then vErr = 1 UserMsg = "You must enter a User Name." End If ' * ' * If it's ok so far, check the db. ' * If vErr = 0 Then If rsAdminCheckLogin.eof Then UserMsg = "Incorrect User Name/Password. Try again." vErr = 1 Else Session("UserId") = rsAdminCheckLogin("PersonID") Session("Password") = rsAdminCheckLogin("Password") End If rsAdminCheckLogin.Close Set rsAdminCheckLogin = Nothing If vErr = 0 Then If request("lsReferer") <> "" Then Response.Redirect ("http://www.gita.org" & request("lsReferer")) Else Response.Redirect ("Welcome.asp") End If End If End If End If %> <% ' ' *** Modifying the Form's Search Scope. ' ' The form will search from the root of your web server's namespace and below ' (deep from "/" ). To search a subset of your server, for example, maybe just ' a PressReleases directory, modify the scope variable below to list the ' virtual path to search. The search will start at the directory you specify ' and include all sub-directories. FormScope = "\" ' ' *** Modifying the Number of Returned Query Results. ' ' You can set the number of query results returned on a single page ' using the variable below. PageSize = 10 ' ' You can set the total number of query results returned using the ' variable below. MaxResults = 300 ' ' *** Setting the Locale. ' ' The following line sets the locale used for queries. In most cases, this ' should match the locale of the server. You can set the locale below. SiteLocale = "EN-US" ' ' *** Enable saving active searches in session variables ' ' The following line enables using session state to save multi-page queries ' and avoid re-executing them when the user presses the Next Page button. ' This should be set FALSE if sessions are disabled using AspAllowSessionState. UseSessions = TRUE ' ********** END QUICK CUSTOMIZATION SECTIONS *********** %> <% ' Set Initial Conditions NewQuery = FALSE UseSavedQuery = FALSE SearchString = "" QueryForm = Request.ServerVariables("PATH_INFO") ' Did the user press a SUBMIT button to execute the form? If so get the form variables. if Request.ServerVariables("REQUEST_METHOD") = "POST" then SearchString = Request.Form("SearchString") Advanced = Request.Form("Advanced") ' NOTE: this will be true only if the button is actually pushed. if Request.Form("submitted") = "Yes" then NewQuery = TRUE RankBase=1000 NextPageNumber = -1 end if end if if Request.ServerVariables("REQUEST_METHOD") = "GET" then SearchString = Request.QueryString("qu") Advanced = Request.QueryString("Advanced") FormScope = Request.QueryString("sc") RankBase = Request.QueryString("RankBase") if Request.QueryString("pg") <> "" then NextPageNumber = Request.QueryString("pg") UseSavedQuery = UseSessions NewQuery = not UseSessions else NewQuery = SearchString <> "" NextPageNumber = -1 end if end if %> GITA Southeast

Listen to the Infrastructure Conference Podcast Now!

Register and book your hotel now for the Geospatial Infrastructure Solutions Conference!

Vendors, exhibit at this conference:
• Reserve Your Booth
• Check out the show floor
• Download the Invitation to Exhibit

Skip the searching. See content relevant to your interests, or download the updated conference program:
• Civil Engineers/Hydraulics
• Electric
• Gas
• GIS 101
• Mobile/AVL
• One Call
• Planning/Design
• Project Management
• Public Sector
• Surveying
• System Integration/Operations Management
• Telecommunications
• Water/Waste Water

Emergency Response Symposium

• Register Now

• Reserve Your Booth

• Get Details on This New Event

• Sign up for E-mail Updates

GITA Southeast Chapter

Chapter Home | Chapter Events | Other Events | Chapter Board | Join GITA