<%@ Language=VBScript %> <% ' Declare our vaiables Dim objFSO, objCountFile ' object vars for FSO and File Dim strCountFileName ' count text file Dim iCount ' count variable Dim bUseImages ' boolean Dim I ' looping var strCountFileName = Server.MapPath(Request.ServerVariables("SCRIPT_NAME") & ".cnt") ' 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 iCount = iCount + 1 ' 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 objCountFile.Close Set objCountFile = Nothing ' Destroy the FSO object Set objFSO = Nothing For I = 1 to Len(iCount) Next %> Equality Utah

 

















Equality Utah is a grassroots, statewide political advocacy organization working on behalf of lesbian, gay, bisexual and transgender people to secure equality and fairness, regardless of sexual orientation or gender identity.


All of our funding comes from individual donors and private foundations. Our work is only possible through your generous financial and volunteer support.


National LGBT organizations have issued a statement entitled
Make Change, Not Lawsuits

See Equality Utah's statement regarding Attorney General Mark Shurtleff’s action on the CA marriage decision. June 4

Read Attorney General Mark Shurtleff’s response to Equality Utah’s statement. June 5

Gay couples urged not to sue Deseret News June 18

Measure seeks to change Utah’s discrimination law Salt Lake Tribune May 22

Sign-up to receive Equality Utah News and Action Alerts:

 


Please join Equality Utah by signing this petition and committing to vote on November 4, 2008.  By voting in this year's pivitol election you are voting for a fair and just Utah.

Join an Equality Action Team

Mark your calendars:

Bingo with Ruby Ridge
benefitting Equality Utah
Friday July 18
First Baptist Church
777 S 1300 E
More Info

Save the Date
Allies Dinner 2008
Power of One
Tuesday, Sept. 16th
Purchase Tickets
More Info visit www.alliesdinner.org

Visit our new online store!
Shop today!

 
 


 


You are visitor number: <%Response.Write iCount%> Since January 1, 2008