<% function killChars(strWords) dim badChars dim newChars badChars = array("select", "drop", "--", "insert", "update", "delete", "xp_", ".js") newChars = strWords for i = 0 to uBound(badChars) 'newChars = replace(newChars, badChars(i), "") if instr(newChars, badChars(i)) Then 'newChars = "Illegal term submitted. Please do not use the reserved words: select update insert drop delete etc.." Response.Redirect("errorpage.asp") End If next killChars = newChars end function function killCharsNEW(strWords) dim badChars dim newChars badChar1 = "select" badChar2 = "drop" badChar3 = "--" badChar4 = "insert" badChar5 = "update" badChar6 = "delete" badChar7 = "xp_" badChar8 = ".js" newChars = strWords if instr(newChars, badChar1) Then Response.Redirect("errorpage.asp") End If if instr(newChars, badChar2) Then Response.Redirect("errorpage.asp") End If if instr(newChars, badChar3) Then Response.Redirect("errorpage.asp") End If if instr(newChars, badChar4) Then Response.Redirect("errorpage.asp") End If if instr(newChars, badChar5) Then Response.Redirect("errorpage.asp") End If if instr(newChars, badChar6) Then Response.Redirect("errorpage.asp") End If if instr(newChars, badChar7) Then Response.Redirect("errorpage.asp") End If if instr(newChars, badChar8) Then Response.Redirect("errorpage.asp") End If killCharsNEW = newChars end function Function qString(str) str = KillCharsNEW(str) tempStr = Replace(str, "
", "") bString = Replace(tempStr, CHR(13), "
") qString = Replace(Replace(bString, "'", "''"), CHR(34), """) End Function Function qStringB(str) tempStr = Replace(str, "
", "") bString = Replace(tempStr, CHR(13), "
") qStringB = Replace(Replace(bString, "'", "''"), CHR(34), """) End Function Function csvString(str2) csvString = Replace(str2, ",", "") End Function function killChars(strWords) dim badChars dim newChars badChars = array("select", "drop", "--", "insert", "update", "delete", "xp_", ".js") newChars = strWords for i = 0 to uBound(badChars) 'newChars = replace(newChars, badChars(i), "") if instr(newChars, badChars(i)) Then 'newChars = "Illegal term submitted. Please do not use the reserved words: select update insert drop delete etc.." Response.Redirect("errorpage.asp") End If next killChars = newChars end function function killCharsNEW(strWords) dim badChars dim newChars badChar1 = "select" badChar2 = "drop" badChar3 = "--" badChar4 = "insert" badChar5 = "update" badChar6 = "delete" badChar7 = "xp_" badChar8 = ".js" newChars = strWords if instr(newChars, badChar1) Then Response.Redirect("errorpage.asp") End If if instr(newChars, badChar2) Then Response.Redirect("errorpage.asp") End If if instr(newChars, badChar3) Then Response.Redirect("errorpage.asp") End If if instr(newChars, badChar4) Then Response.Redirect("errorpage.asp") End If if instr(newChars, badChar5) Then Response.Redirect("errorpage.asp") End If if instr(newChars, badChar6) Then Response.Redirect("errorpage.asp") End If if instr(newChars, badChar7) Then Response.Redirect("errorpage.asp") End If if instr(newChars, badChar8) Then Response.Redirect("errorpage.asp") End If killCharsNEW = newChars end function Function qString(str) str = KillCharsNEW(str) tempStr = Replace(str, "
", "") bString = Replace(tempStr, CHR(13), "
") qString = Replace(Replace(bString, "'", "''"), CHR(34), """) End Function Function qStringB(str) tempStr = Replace(str, "
", "") bString = Replace(tempStr, CHR(13), "
") qStringB = Replace(Replace(bString, "'", "''"), CHR(34), """) End Function Function csvString(str2) csvString = Replace(str2, ",", "") End Function searchtext = qstring(Request("searchtext")) searchoffice = qstring(Request("searchoffice")) searchpractice = qstring(Request("searchpractice")) newsearchtext = "%" & searchtext & "%" set objConn = Server.CreateObject("ADODB.Connection") objConn.Open Application("HLPConn_ConnectionString") %>
 

practice areas  ●  professionals  ●  about us  ●  news & events  ● join our firm  ●  contact us  ●  home ●  login 

 

   
 

PROGRAMS
 
  • Summer Associate Program
  • Mentoring Program
  • Partnership Track
    •
     

    OUR CULTURE
     

    DIVERSITY
     

    COMPENSATION
     

    BILLABLE HOURS
       

    DIVERSITY
     

    HLP was founded based upon religious diversity in 1920 - an era in which it was unusual to embrace multiple religious and cultural backgrounds in a partnership. From these origins, a strong commitment to diversity throughout the Firm has emerged.

    We are proud of the rich diversity of our legal and support staff. African American, Asian American and Hispanic American attorneys, as well as attorneys with widely varying cultural and religious backgrounds, enjoy successful and rewarding careers at HLP. We are committed to providing our clients with quality legal talent as well as a breadth of background, viewpoints and experience to solve their business needs.

    The Firm routinely considers and hires qualified candidates who bring a variety of professional backgrounds to the practice of law. Individuals have joined us from securities firms and their own businesses. Our ranks include former accountants, teachers, human resource professionals, and industrial salespeople, and our attorneys hold a wide range of advanced degrees.

    Diversity is neither accomplished nor maintained automatically. To enhance the diversity of our ranks, the Firm has undertaken specific initiatives, including:

    • Participation in bar association minority clerkship programs.

    • Participation in minority job fairs.

    • Consideration of the background, work and other experience of law student candidates in addition to their academic standing.

    • Providing on-going training to all associates in practice skills that assist them in developing successful and rewarding careers.

    These measures will allow us to continue to provide our clients with the breadth of opinion and reflection necessary to provide the quality of legal services our clients deserve.
     
     
     


    "HLP values attorneys who have personalities and opinions. That’s why I joined the Firm."

    - Dawn Hays

    		 

    Privacy Policy  |  Contact Us  |  Home 

    		  
    <%objConn.Close%>