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

 


Make a Gift to the Law School
   

To make your gift, simply print the Gift form and either
fax or mail it to us.         
 

  1.  Access the Gift form:      

      The Gift form is available in: 
              
             
PDF        

             
HTML      
   
         
  2. Print the Gift form             

        
        

  3.  Fill in all the information.     

  4.  Fax or mail the form to us:   

           Fax:  305-284-3968; or

 Send by mail:

    University of Miami School of Law
    Office of Law Development and Alumni  
   
Relations
   
PO Box 248087
    Coral Gables, FL 33124-8087    

 

 


   Updated: 10/05/2006   
 

 

       Thank you for choosing to
       make a gift to the University
     
 of Miami School of Law.  

 

Adobe Reader download link



 
 
 
Please click on image at left to go to the Adobe web site where you may download the Reader required for viewing PDF files. There is no charge for downloading or using the Reader. 
 
 
 
______________________
 
For more information on
Adobe PDF go to our
Download page
 
______________________

Questions/comments? 

Direct your questions or comments regarding:  

 
Gift giving to the Alumni Office
Telephone:  3
05-284-3470

  
Adobe Reader downloads to
the webmaster.
 
 
 


Class Gifts



Reunion Home page



 Class Gift  
 
Dean's Circle 
 
Momentum Campaign  

          

  Alumni Events     

  2006 Reunion Events

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

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