Case finder results

Home >

CIR case finder

<% 'This function compares strings 'There is a built-in function to do this 'but I am paranoid about language changes Function alpha_comp(string1, string2) If ASC(string1) < ASC(string2) then alpha_comp = -1 Elseif ASC(string1) = ASC(string2) then alpha_comp=alpha_comp( right(string1, len(string1) - 1), right(string2, len(string2) - 1)) Else alpha_comp = 1 End if End Function '------- 'This function trims away characters on command Public Function TrimChar(text, char) Dim trimspace Dim thechar, thechars If InStr(text, char) = 0 Then TrimChar = text Exit Function End If For trimspace = 1 To Len(text) thechar = Mid(text, trimspace, 1) thechars = thechars & thechar If thechar = char Then thechars = Mid(thechars, 1, Len(thechars) - 1) End If Next TrimChar = thechars End Function '------- 'Puts things in alpha order Sub ObjSorter( byRef arrArray ) for i = 0 to ubound(arrArray) for j= 1 to (ubound(arrArray)-i) 'Trim away weird characters and truncate to first 7 letters 'If we ever have Doe v. Ho, we're screwed! str_temp=trimChar(LCase(arrArray(j-1).Name), " ") str_temp=trimChar(str_temp, ".") str_temp=Left(str_temp, 7) str_temp2=trimChar(LCase(arrArray(j).Name), " ") str_temp2=trimChar(str_temp2, ".") str_temp2=Left(str_temp2, 7) if alpha_comp(str_temp, str_temp2) = 1 then Set temp = arrArray(j-1) Set arrArray(j-1)=arrArray(j) Set arrArray(j)=temp end if next next End Sub 'Define the class to store case info Class CIR_case Public Name Public URL 'in the form: recent_cases/html_page_name.html Public Descrip 'A brief summary of the case Public Stat 'Pending, Won, Lost, etc Public cr 'Civil Rights Public ca 'Congressional Authority Public el 'Elections Public ep 'Equal Protection Public fa 'First Amendment Public fr 'Free Exercise of Religion Public fs 'Freedom of Speech Public uc 'U.S. Supreme Court Public fc 'Federal Appellate Court Public dc 'Federal District Court Public sc 'State Court Public op 'Other End Class '-----------!!!IMPORTANT!!!----------------------------------------------- 'Here is where we put data for new cases 'To add a new case, simply copy an entire Set block 'Then change the number in case_x to the next available integer 'Finally, set the name, URL, description, status, and flags 'Definitions of the flags are above -- 1 means true, 0 means false 'When you have entered the data, scroll down to the end of the data ' section for further instructions 'NOTE: Do NOT use any double quotes (e.g. ") in the descriptions '--------!!!CASE DATA STARTS HERE!!!-------------------------------------- Set case_1 = New CIR_case case_1.Name = "Grutter v. Bollinger" case_1.URL = "recent_cases/michigan.html" case_1.Descrip = "Challenging racial preferences in student admissions at the University of Michigan Law School." case_1.Stat = "Pending after loss in U.S. Court of Appeals for the Sixth Circuit" case_1.cr = 1 case_1.ca = 0 case_1.el = 0 case_1.ep = 1 case_1.fa = 0 case_1.fr = 0 case_1.fs = 0 case_1.uc = 0 case_1.fc = 1 case_1.dc = 0 case_1.sc = 0 case_1.op = 0 Set case_2 = New CIR_case Case_2.Name = "Gratz v. Bollinger" case_2.URL = "recent_cases/michigan.html" case_2.Descrip = "Challenging racial preferences in student admissions at the University of Michigan College of Literature, Science, and the Arts." case_2.Stat = "Pending after oral argument before U.S. Court of Appeals for the Sixth Circuit" case_2.cr = 1 case_2.ca = 0 case_2.el = 0 case_2.ep = 1 case_2.fa = 0 case_2.fr = 0 case_2.fs = 0 case_2.uc = 0 case_2.fc = 1 case_2.dc = 0 case_2.sc = 0 case_2.op = 0 Set case_3 = New CIR_case Case_3.Name = "Hopwood v. State of Texas" case_3.URL = "recent_cases/hopwood_v_texas.html" case_3.Descrip = "Successfully challenged racial preferences in student admissions in landmark case against University of Texas Law School." case_3.Stat = "Victory" case_3.cr = 1 case_3.ca = 0 case_3.el = 0 case_3.ep = 1 case_3.fa = 0 case_3.fr = 0 case_3.fs = 0 case_3.uc = 1 case_3.fc = 0 case_3.dc = 0 case_3.sc = 0 case_3.op = 0 Set case_4 = New CIR_case Case_4.Name = "Smith v. University of Washington Law School" case_4.URL = "recent_cases/smith.html" case_4.Descrip = "Challenging racial preferences in student admissions at University of Washington Law School." case_4.Stat = "Pending. Trial in U.S District Court began April 8, 2002" case_4.cr = 1 case_4.ca = 0 case_4.el = 0 case_4.ep = 1 case_4.fa = 0 case_4.fr = 0 case_4.fs = 0 case_4.uc = 0 case_4.fc = 0 case_4.dc = 1 case_4.sc = 0 case_4.op = 0 Set case_5 = New CIR_case Case_5.Name = "Miami University Wrestling Club v. Miami University" case_5.URL = "recent_cases/miami_wrestling_v_miami.html" case_5.Descrip = "Challenging elimination of men's athletic teams to achieve gender participation rates proportional to undergraduate population." case_5.Stat = "Pending" case_5.cr = 1 case_5.ca = 0 case_5.el = 0 case_5.ep = 1 case_5.fa = 0 case_5.fr = 0 case_5.fs = 0 case_5.uc = 0 case_5.fc = 1 case_5.dc = 0 case_5.sc = 0 case_5.op = 0 Set case_6 = New CIR_case Case_6.Name = "AHDC v. Fresno" case_6.URL = "recent_cases/ahdc_v_fresno.html" case_6.Descrip = "Defended neighborhood homeowner sued by low-income housing developer for federal housing discrimination because of statements made regarding proposed housing project. " case_6.Stat = "Victory" case_6.cr = 0 case_6.ca = 0 case_6.el = 0 case_6.ep = 0 case_6.fa = 1 case_6.fr = 0 case_6.fs = 1 case_6.uc = 0 case_6.fc = 0 case_6.dc = 1 case_6.sc = 0 case_6.op = 0 Set case_7 = New CIR_case Case_7.Name = "White v. Lee" case_7.URL = "recent_cases/white_v_julian_and_ahdc_v_fresno.html" case_7.Descrip = "Seeking redress for threats of prosecution by officials of the Department of Housing and Urban Development leveled at private citizens who organized peaceful protests against federally supported housing programs." case_7.Stat = "Victory" case_7.cr = 0 case_7.ca = 0 case_7.el = 0 case_7.ep = 0 case_7.fa = 1 case_7.fr = 0 case_7.fs = 1 case_7.uc = 0 case_7.fc = 1 case_7.dc = 0 case_7.sc = 0 case_7.op = 0 Set case_8 = New CIR_case Case_8.Name = "Columbia Union College v. Oliver" case_8.URL = "recent_cases/columbia_v_clarke.html" case_8.Descrip = "Representing private college affiliated with Seventh-day Adventist church in lawsuit challenging Maryland's refusal, solely because of college's religious speech and beliefs, to accord financial aid benefits extended to other private colleges." case_8.Stat = "Victory" case_8.cr = 0 case_8.ca = 0 case_8.el = 0 case_8.ep = 0 case_8.fa = 1 case_8.fr = 1 case_8.fs = 0 case_8.uc = 0 case_8.fc = 1 case_8.dc = 0 case_8.sc = 0 case_8.op = 0 Set case_9 = New CIR_case Case_9.Name = "Reno v. Bossier Parish School District" case_9.URL = "recent_cases/reno_v_bossier.html" case_9.Descrip = "Successfully rebuffed Department of Justice attempt to equate failure to maximize minority voting strength through racial gerrymandering with discrimination under the Voting Rights Act." case_9.Stat = "Victory" case_9.cr = 1 case_9.ca = 0 case_9.el = 1 case_9.ep = 0 case_9.fa = 0 case_9.fr = 0 case_9.fs = 0 case_9.uc = 1 case_9.fc = 0 case_9.dc = 0 case_9.sc = 0 case_9.op = 0 Set case_10 = New CIR_case Case_10.Name = "U.S. v. Morrison" case_10.URL = "recent_cases/us_v_morrison.html" case_10.Descrip = "Defended student athlete in civil suit against ill-founded charges of rape. Successfully challenged portions of 1994 Violence Against Women Act as unconstitutional exercise of Congress's authority under the Commerce Clause and Section 5 of the Fourteenth Amendment." case_10.Stat = "Victory" case_10.cr = 0 case_10.ca = 1 case_10.el = 0 case_10.ep = 0 case_10.fa = 0 case_10.fr = 0 case_10.fs = 0 case_10.uc = 1 case_10.fc = 0 case_10.dc = 0 case_10.sc = 0 case_10.op = 0 Set case_11 = New CIR_case Case_11.Name = "Lamprecht v. FCC" case_11.URL = "recent_cases/lamprecht_v_fcc.html" case_11.Descrip = "Challenged gender preference in the awarding of radio licenses." case_11.Stat = "Victory before D.C. Circuit, case settled on remand." case_11.cr = 1 case_11.ca = 0 case_11.el = 0 case_11.ep = 1 case_11.fa = 0 case_11.fr = 0 case_11.fs = 0 case_11.uc = 0 case_11.fc = 0 case_11.dc = 0 case_11.sc = 0 case_11.op = 1 Set case_12 = New CIR_case Case_12.Name = "Dynalantic v. U.S. Dept. of Defense" case_12.URL = "recent_cases/dynalantic_v_dod.html" case_12.Descrip = "Challenging federal government contracting '8(a)' minority set-aside program on behalf of manufacturer of military flight simulators." case_12.Stat = "Pending" case_12.cr = 1 case_12.ca = 0 case_12.el = 0 case_12.ep = 1 case_12.fa = 0 case_12.fr = 0 case_12.fs = 0 case_12.uc = 0 case_12.fc = 0 case_12.dc = 1 case_12.sc = 0 case_12.op = 0 Set case_13 = New CIR_case Case_13.Name = "U.S. v. Szoka" case_13.URL = "recent_cases/us_v_szoka.html" case_13.Descrip = "Defending owner of low power, non-commercial radio station in 'cease and desist' prosecution brought against him by Federal Communications Commission." case_13.Stat = "Pending" case_13.cr = 0 case_13.ca = 0 case_13.el = 0 case_13.ep = 0 case_13.fa = 1 case_13.fr = 0 case_13.fs = 1 case_13.uc = 0 case_13.fc = 1 case_13.dc = 0 case_13.sc = 0 case_13.op = 0 Set case_14 = New CIR_case Case_14.Name = "Tompkins v. Alabama State University" case_14.URL = "recent_cases/tompkins_v_alabama.html" case_14.Descrip = "Challenging court mandated 'whites only' scholarship at traditionally black university." case_14.Stat = "Victory. District Court ordered state to eliminate 'whites only' restriction" case_14.cr = 1 case_14.ca = 0 case_14.el = 0 case_14.ep = 1 case_14.fa = 0 case_14.fr = 0 case_14.fs = 0 case_14.uc = 0 case_14.fc = 0 case_14.dc = 1 case_14.sc = 0 case_14.op = 0 Set case_15 = New CIR_case Case_15.Name = "Dale v. Boy Scouts" case_15.URL = "recent_cases/dale_v_boy_scouts.html" case_15.Descrip = "Filed amicus brief urging U.S. Supreme Court to set aside ruling by the New Jersey Supreme Court that the Boy Scouts had no First Amendment right to preclude homosexuals from attaining leadership positions." case_15.Stat = "Victory" case_15.cr = 0 case_15.ca = 0 case_15.el = 0 case_15.ep = 0 case_15.fa = 1 case_15.fr = 0 case_15.fs = 1 case_15.uc = 1 case_15.fc = 0 case_15.dc = 0 case_15.sc = 0 case_15.op = 0 Set case_16 = New CIR_case Case_16.Name = "Deming v. University of Oklahoma" case_16.URL = "recent_cases/deming_v_oklahoma.html" case_16.Descrip = "Defended geology professor against 'sexual harassment' complaints based upon letter to the editor of college newspaper on matter of public concern." case_16.Stat = "Settled in Prof. Deming's favor" case_16.cr = 0 case_16.ca = 0 case_16.el = 0 case_16.ep = 0 case_16.fa = 1 case_16.fr = 0 case_16.fs = 1 case_16.uc = 0 case_16.fc = 0 case_16.dc = 0 case_16.sc = 0 case_16.op = 1 Set case_17 = New CIR_case Case_17.Name = "Doe v. Dept. Health and Human Services" case_17.URL = "recent_cases/doe_v_health.html" case_17.Descrip = "Challenged exclusion of Caucasian youth from minorities-only summer study program funded in part by the National Institute of Health and Texas A&M University." case_17.Stat = "Settled in client's favor" case_17.cr = 1 case_17.ca = 0 case_17.el = 0 case_17.ep = 1 case_17.fa = 0 case_17.fr = 0 case_17.fs = 0 case_17.uc = 0 case_17.fc = 0 case_17.dc = 1 case_17.sc = 0 case_17.op = 0 Set case_18 = New CIR_case Case_18.Name = "Jacob v. Ind. Sch. Dist. No. 625" case_18.URL = "recent_cases/jacob_v_ind.html" case_18.Descrip = "Challenged minority set-aside in public elementary magnet school." case_18.Stat = "Settled in client's favor" case_18.cr = 1 case_18.ca = 0 case_18.el = 0 case_18.ep = 1 case_18.fa = 0 case_18.fr = 0 case_18.fs = 0 case_18.uc = 0 case_18.fc = 0 case_18.dc = 1 case_18.sc = 0 case_18.op = 0 Set case_19 = New CIR_case Case_19.Name = "Maas v. Cornell University" case_19.URL = "recent_cases/maas_v_cornell.html" case_19.Descrip = "Contested, on contractual and other grounds, private university's sanctions against professor over ill-founded sexual harassment charges." case_19.Stat = "Loss" case_19.cr = 0 case_19.ca = 0 case_19.el = 0 case_19.ep = 0 case_19.fa = 0 case_19.fr = 0 case_19.fs = 0 case_19.uc = 0 case_19.fc = 0 case_19.dc = 0 case_19.sc = 1 case_19.op = 0 Set case_20 = New CIR_case Case_20.Name = "Maitland v. University of Minnesota" case_20.URL = "recent_cases/maitland_v_minnesota.html" case_20.Descrip = "Challenging distribution of $3 million to female faculty members to remedy alleged gender disparities in salary." case_20.Stat = "Pending" case_20.cr = 1 case_20.ca = 0 case_20.el = 0 case_20.ep = 1 case_20.fa = 0 case_20.fr = 0 case_20.fs = 0 case_20.uc = 0 case_20.fc = 1 case_20.dc = 0 case_20.sc = 0 case_20.op = 0 Set case_22 = New CIR_case Case_22.Name = "Solid Waste Agency of Northern Cook County v. U.S. Army Corps of Engineers, et al." case_22.URL = "recent_cases/swancc_v_corpsengineers.html" case_22.Descrip = "Filed an amicus brief arguing that the U.S. Army Corps of Engineers migratory bird rule set forth pursuant to the Clean Water Act is an unconstitutional exercise of Congress' authority to regulate interstate commerce." case_22.Stat = "Court rejected rule on other grounds" case_22.cr = 0 case_22.ca = 1 case_22.el = 0 case_22.ep = 0 case_22.fa = 0 case_22.fr = 0 case_22.fs = 0 case_22.uc = 1 case_22.fc = 0 case_22.dc = 0 case_22.sc = 0 case_22.op = 0 Set case_23 = New CIR_case Case_23.Name = "U.S. v. NYC Board of Education; Brennan v. Ashcroft" case_23.URL = "recent_cases/brennan_v_ashcroft.html" case_23.Descrip = "Challenging proposed consent decree in ongoing litigation between U.S. Department of Justice and the New York City Board of Education over alleged discrimination in recruitment, hiring and promotion of custodians in the New York City school system." case_23.Stat = "Victory before U.S. Court of Appeals for the Second Circuit, remanded for further proceedings" case_23.cr = 1 case_23.ca = 0 case_23.el = 0 case_23.ep = 1 case_23.fa = 0 case_23.fr = 0 case_23.fs = 0 case_23.uc = 0 case_23.fc = 0 case_23.dc = 1 case_23.sc = 0 case_23.op = 0 Set case_24 = New CIR_case Case_24.Name = "Boulahanis v. Board of Regents, Illinois State University" case_24.URL = "recent_cases/boulahanis_v_board.html" case_24.Descrip = "Represented Illinois State men's athletic teams eliminated to achieve rates of partictipation identical to the proportion of men and women in the undergraduate population, regardless of student interest" case_24.Stat = "Loss" case_24.cr = 1 case_24.ca = 0 case_24.el = 0 case_24.ep = 1 case_24.fa = 0 case_24.fr = 0 case_24.fs = 0 case_24.uc = 1 case_24.fc = 0 case_24.dc = 0 case_24.sc = 0 case_24.op = 0 Set case_25 = New CIR_case Case_25.Name = "Aguilar v. Avis Rent-A-Car" case_25.URL = "recent_cases/aguilar_v_avis.html" case_25.Descrip = "Filed amicus brief contesting court-ordered injunction prohibiting 'offensive' epithets in the workplace as unlawful prior restraint of constitutionality protected speech." case_25.Stat = "Loss" case_25.cr = 0 case_25.ca = 0 case_25.el = 0 case_25.ep = 0 case_25.fa = 1 case_25.fr = 0 case_25.fs = 1 case_25.uc = 1 case_25.fc = 0 case_25.dc = 0 case_25.sc = 0 case_25.op = 0 Set case_26 = New CIR_case case_26.Name = "Willand v. North Hennepin Community College" case_26.URL = "recent_cases/willand_v_hennepin.html" case_26.Descrip = "Challenging college speech code and computer policy." case_26.Stat = "Victory" case_26.cr = 0 case_26.ca = 0 case_26.el = 0 case_26.ep = 0 case_26.fa = 1 case_26.fr = 0 case_26.fs = 1 case_26.uc = 0 case_26.fc = 0 case_26.dc = 1 case_26.sc = 0 case_26.op = 0 Set case_27 = New CIR_case case_27.Name = "Sypniewski v. Warren Hills Regional Board of Education, et al." case_27.URL = "recent_cases/sypniewski_v_warren.html" case_27.Descrip = "Defending high school student suspended for wearing 'redneck' t-shirt." case_27.Stat = "Pending" case_27.cr = 0 case_27.ca = 0 case_27.el = 0 case_27.ep = 0 case_27.fa = 1 case_27.fr = 0 case_27.fs = 1 case_27.uc = 0 case_27.fc = 1 case_27.dc = 0 case_27.sc = 0 case_27.op = 0 Set case_28 = New CIR_case Case_28.Name = "Father Flanagan's Boys Home v. District of Columbia" case_28.URL = "recent_cases/boystown_v_scsd.htm" case_28.Descrip = "Defending First Amendment rights of Washington, DC community activists facing a civil rights lawsuit intended to silence their peaceful opposition to a housing project." case_28.Stat = "Victory in U.S. District Court" case_28.cr = 0 case_28.ca = 0 case_28.el = 0 case_28.ep = 0 case_28.fa = 1 case_28.fr = 0 case_28.fs = 1 case_28.uc = 0 case_28.fc = 0 case_28.dc = 1 case_28.sc = 0 case_28.op = 0 Set case_29 = New CIR_case Case_29.Name = "Perez v. Posse Comitatus" case_29.URL = "recent_cases/perez_v_posse.html" case_29.Descrip = "Defending freedom of speech for Long Island, NY community group sued because of its peaceful opposition to illegal immigration." case_29.Stat = "Victory in U.S. District Court" case_29.cr = 0 case_29.ca = 0 case_29.el = 0 case_29.ep = 0 case_29.fa = 1 case_29.fr = 0 case_29.fs = 1 case_29.uc = 0 case_29.fc = 0 case_29.dc = 1 case_29.sc = 0 case_29.op = 0 Set case_30 = New CIR_case case_30.Name = "Worth v. Martinez" case_30.URL = "recent_cases/worth_v_martinez.html" case_30.Descrip = "Challenging racial and gender employment preferences at the U.S. Department of Housing and Urban Development." case_30.Stat = "Filed August 2002 in U.S. District Court" case_30.cr = 1 case_30.ca = 0 case_30.el = 0 case_30.ep = 1 case_30.fa = 0 case_30.fr = 0 case_30.fs = 0 case_30.uc = 0 case_30.fc = 0 case_30.dc = 1 case_30.sc = 0 case_30.op = 0 '---MORE INSTRUCTIONS--- 'Now that you have entered the data, put the new case in the array 'Example: You just made case_37, so put case_37 after case_36 'Don't forget to separate cases with a comma arrArray = Array(case_1, case_2, case_3, case_4, case_5, case_6, case_7, case_8, case_9, case_10, case_11, case_12, case_13, case_14, case_15, case_16, case_17, case_18, case_19, case_20, case_22, case_23, case_24, case_25, case_26, case_27, case_28, case_29, case_30) 'Put array in alphabetical order Call ObjSorter(arrArray) 'Now find out what we need to display criterion = Request.QueryString("criterion") Select Case criterion Case "all" criterion_query = "All cases" Case "cr" criterion_query = "Civil Rights cases" Case "ca" criterion_query = "Congressional Authority cases" Case "el" criterion_query = "Election cases" Case "ep" criterion_query = "Equal Protection cases" Case "fa" criterion_query = "First Amendment cases" Case "fr" criterion_query = "Free Exercise of Religion cases" Case "fs" criterion_query = "Freedom of Speech cases" Case "uc" criterion_query = "U.S. Supreme Court cases" Case "fc" criterion_query = "federal appelate court cases" Case "dc" criterion_query = "federal district court cases" Case "sc" criterion_query = "state court cases" Case "op" criterion_query = "other proceedings" End Select 'Display the query Response.Write "

Query: " & criterion_query & "

" Response.Write "

" 'Now display the appropriate cases For i = 0 to UBound(arrArray) Select Case criterion Case "all" Response.Write "