<% ' Declare our vaiables Dim objFSO, objCountFile ' object vars for FSO and File Dim strCountFileName ' filename of count text file Dim iCount ' count variable Dim bUseImages ' boolean whether or not to use images Dim I ' standard looping var ' Determine whether we use images or plain text ' You could just set this to True or False instead bUseImages = True ' Compute our count file's filename ' This is based on the file from which you call count.asp ' It basically takes that name and appends a .cnt so I don't ' accidently overwrite any files. If for some reason you have ' a file named script_name.asp.txt then change this or watch out! strCountFileName = ("img_rotation.txt") ' Create FileSystemObject to deal with file access Set objFSO = Server.CreateObject("Scripting.FileSystemObject") ' Open the file as a text stream (1 = ForReading, True = Create) Set objCountFile = objFSO.OpenTextFile(strCountFileName, 1, True) ' Read the current count from the file If Not objCountFile.AtEndOfStream Then ' Set value to contents of the file iCount = CLng(objCountFile.ReadAll) Else ' If no file exists or it's empty start at 0 iCount = 0 End If ' Close the file and destroy the object objCountFile.Close Set objCountFile = Nothing ' Increment the count If iCount = 10 Then iCount = 1 Else iCount = iCount + 1 End If ' Overwrite existing file and get a text stream to new one Set objCountFile = objFSO.CreateTextFile(strCountFileName, True) ' Write updated count objCountFile.Write iCount ' Close the file and destroy the object objCountFile.Close Set objCountFile = Nothing ' Destroy the FSO object Set objFSO = Nothing ' We're all done with the hard part ' All that's left is to display the results If bUseImages Then Response.Write "" Response.Write "
" & "Picture: " & iCount End If %>

 


Leiter Collection Dedication
 

 
Alumni & Law Development  


     

      
January 23, 2005 

     
Dedication of Mayer S. Leiter
      Judaic Collection and Study Area
 

By the Grace of G-d

We take great pleasure in inviting you

to join us for the Dedication of the 

Mayer S. Leiter Judaic Collection and Study Area  

in Memory of

Mayer S. Leiter, J.D. 2002

Sunday, January 23, 2005

4:00 PM

University of Miami School of Law Library

1311 Miller Drive

Coral Gables, Florida 

 

   Photo Gallery  

  

 

Click here for photo gallery of dedication event.    

 

   PowerPoint Presentation   

Click here for PowerPoint presentation on the life of Mayer S. Leiter.   (This is a 10 mb file and will open in new window.)     

 

PDF Flyer*   

          Click here for PDF version of this
          announcement

 * You will need Adobe Reader to open this file.  If you do not have it, then, please go to our download page for more information and links.

 

      
    Updated: 03/10/2005  

 

 


 



 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

             

 

 

 


Calendar




  Alumni Events 2005

January 2005
S
M
T
W
Th
F
S
 
 
           1
  2   3   4   5
 6
 7
8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
 23  24  25  26   27  28   29
 30
 31
 
 
 
 
 

  New!  See pictures from 2004 
        Alumni Reunions.        
 

  Past Events  




Reunion Home page


Class Gift
Dean's Circle 
Momentum Campaign  


I would like to receive Reunion and
     Homecoming
e-mail updates.
 

Questions?  Contact the Law
      Alumni Office.  Technical issues, 
      email the site's developer.

 

<<Selection in Document>>