<% ' 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 %>

 


Past Events
 

 
Alumni & Law Development  



October 2004

10/6/2004        
 
      
Chicago Law Alumni        

10/20/2004

       Annual Dade Judicial Reception 

 

November 2004

Homecoming Weekend      

      
11/4 - 7/2004      

      Homecoming Weekend 2004   

      11/5/2004   

      Class Reunion Celebrations  
           1964, 1974, 1979, 1984, 1994              
              
                 

     
11/6/2004   

      56th Annual Homecoming 
              Breakfast and "Morning Spirits"   
              8:30 - 11:00 a.m.          

      Tailgate Party
             Orange Bowl Stadium

              
       11/7/2004       

 

11/4/2004 

     
Celebration on the establishment of  

The Robert H. Waters
Memorial Scholarship Fund

11/10/2004 

     
Wine & Cheese Reception  

In honor of Dean Lynch
Washington, D.C.

11/11/2004

       Luncheon discussion : 

“The Myth of Moral Justice:  
Why Our Legal System Fails
to Do What’s Right”

                      with  Thane Rosenbaum, JD ‘86

 

December 2004 

12/1/2004 

     
Law School Luncheon  

      

      
    Updated: 10/05/2006  

 

          2004




 

More Information 
 

 

   University of Miami -
   Homecoming 2004  

  

 

 

             

 

 


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

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

 


Calendar



Reunion Home page

Class Gift
Dean's Circle 
Momentum Campaign  

          



  Alumni Events 2006 
 

Go to 2005 Past Events Page

Go to 2006 Past Events Page
<<Selection in Document>>