<% Const IMGS_DIR = "/|/Documents and Settings/Owner/Desktop/BITE BACK/directaction.info/new/random/" Dim objFSO, objFolderObject, objFileCollection, objFile Dim intFileNumberToUse, intFileLooper Dim objImageFileToUse Dim strImageSrcText Set objFSO = Server.CreateObject("Scripting.FileSystemObject") Set objFolderObject = objFSO.GetFolder(Server.MapPath(IMGS_DIR)) Set objFSO = Nothing Set objFileCollection = objFolderObject.Files Set objFolderObject = Nothing Randomize() intFileNumberToUse = Int(objFileCollection.Count * Rnd) + 1 intFileLooper = 1 For Each objFile in objFileCollection If intFileLooper = intFileNumberToUse Then Set objImageFileToUse = objFile Exit For End If intFileLooper = intFileLooper + 1 Next Set objFileCollection = Nothing strImageSrcText = IMGS_DIR & objImageFileToUse.Name Set objImageFileToUse = Nothing %> <% Const IMGS_DIR = "/|/Documents and Settings/Owner/Desktop/BITE BACK/directaction.info/new/random/" Dim objFSO, objFolderObject, objFileCollection, objFile Dim intFileNumberToUse, intFileLooper Dim objImageFileToUse Dim strImageSrcText Set objFSO = Server.CreateObject("Scripting.FileSystemObject") Set objFolderObject = objFSO.GetFolder(Server.MapPath(IMGS_DIR)) Set objFSO = Nothing Set objFileCollection = objFolderObject.Files Set objFolderObject = Nothing Randomize() intFileNumberToUse = Int(objFileCollection.Count * Rnd) + 1 intFileLooper = 1 For Each objFile in objFileCollection If intFileLooper = intFileNumberToUse Then Set objImageFileToUse = objFile Exit For End If intFileLooper = intFileLooper + 1 Next Set objFileCollection = Nothing strImageSrcText = IMGS_DIR & objImageFileToUse.Name Set objImageFileToUse = Nothing %> <% Const IMGS_DIR = "/new/random/" Dim objFSO, objFolderObject, objFileCollection, objFile Dim intFileNumberToUse, intFileLooper Dim objImageFileToUse Dim strImageSrcText Set objFSO = Server.CreateObject("Scripting.FileSystemObject") Set objFolderObject = objFSO.GetFolder(Server.MapPath(IMGS_DIR)) Set objFSO = Nothing Set objFileCollection = objFolderObject.Files Set objFolderObject = Nothing Randomize() intFileNumberToUse = Int(objFileCollection.Count * Rnd) + 1 intFileLooper = 1 For Each objFile in objFileCollection If intFileLooper = intFileNumberToUse Then Set objImageFileToUse = objFile Exit For End If intFileLooper = intFileLooper + 1 Next Set objFileCollection = Nothing strImageSrcText = IMGS_DIR & objImageFileToUse.Name Set objImageFileToUse = Nothing %> <% Const IMGS_DIR = "ramdom/" Dim objFSO, objFolderObject, objFileCollection, objFile Dim intFileNumberToUse, intFileLooper Dim objImageFileToUse Dim strImageSrcText Set objFSO = Server.CreateObject("Scripting.FileSystemObject") Set objFolderObject = objFSO.GetFolder(Server.MapPath(IMGS_DIR)) Set objFSO = Nothing Set objFileCollection = objFolderObject.Files Set objFolderObject = Nothing Randomize() intFileNumberToUse = Int(objFileCollection.Count * Rnd) + 1 intFileLooper = 1 For Each objFile in objFileCollection If intFileLooper = intFileNumberToUse Then Set objImageFileToUse = objFile Exit For End If intFileLooper = intFileLooper + 1 Next Set objFileCollection = Nothing strImageSrcText = IMGS_DIR & objImageFileToUse.Name Set objImageFileToUse = Nothing %>


Reported by local media in the USA:

Vandals strike a Torrance McDonald's

Police responding to a burglar alarm found the words "McMurder Killers" and "ALF" painted onto a window.

By Doug Irving
Daily Breeze

Vandals claiming affiliation with a radical animal-rights group smashed windows and spray-painted slogans at a McDonald's restaurant in Torrance early Sunday.

Police responding to a burglar alarm found the words "McMurder Killers" and "ALF" painted onto a window of the McDonald's at 24650 Crenshaw Blvd. They believe "ALF" refers to the Animal Liberation Front, a loose alliance of militant activists that has targeted fast-food restaurants in the past.

The North American Animal Liberation Press Office had not received any communiques claiming responsibility for the Torrance vandalism. "It sounds like something the ALF has done in the past," said Dr. Jerry Vlasak, a press officer there. "It would be typical of something they would do."

The restaurant's burglar alarm alerted police around 4:30 a.m., according to officer Dave Crespin. Officers found several windows and the glass front doors shattered; the slogans were painted onto an unbroken side window.

Police had no suspects, but were checking whether the restaurant had surveillance cameras running at the time, Lt. Mike Jezulin said.

Calls to the restaurant and its franchise offices were not returned Sunday afternoon. Despite the vandalism, a neon sign hanging in an unbroken window declared the restaurant open.

Activists working under the flag of the Animal Liberation Front have launched a general campaign against fast-food restaurants in recent years. McDonald's, especially, has become "sort of like the poster boy of everything that's wrong" with meat production, Vlasak said.

In November, vandals broke the windows and doors of a McDonald's restaurant in Harbor Gateway and signed their work "ALF." Activists linked to the group also claimed responsibility for placing bombs that failed to detonate at a McDonald's in Chico in 2003.

The Animal Liberation Front seeks to rescue animals and "cause financial loss to animal exploiters, usually through the damage and destruction of property," according to its Web site.

Last year, the deputy assistant director of the FBI's counterterrorism division told a Senate committee that the group and others like it pose a "serious domestic terrorist threat."