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

Forwarded from the NA-ELPSN:

"Attorney General of Oregon State, Hardy Meyer's email is
hardy.myers@doj.state.or.us

We are asking that people email him regarding Jeff Luer's appeal. The appeal is currently under review right now and it is quite timely. Please be respectful in your tone.

Sample Letter below. More info on Jeff 'Free' Luers at:
http://www.freefreenow.org
http://www.spiritoffreedom.org.uk/prisoners/fc/free.html
http://www.breakthechains.net
thanks,
NA-ELPSN

A PDF version of this letter is available at:
http://www.spiritoffreedom.org.uk/content/agletter.pdf


Mr. Hardy Myers,
Attorney General-State of Oregon
400 Justice Building
Salem, Oregon 97310
hardy.myers@doj.state.or.us

Re: Jeffrey Luers, Appellate Case #A115208

Dear Sir,

I am writing in regards to the Circuit Court appeal of Jeffrey Michael Luers. Jeffrey is appealing his conviction and sentence relating to the 2000 arson at Romania Chevrolet and attempted arson at Tyree Oil Company, both in Eugene, Oregon.

Notably, this includes conviction on three separate counts of Arson 1, with enhancement to Measure 11, for a single fire at Romania Chevrolet, a fire in which no one was injured. At trial, the State's witness testified that they were in no danger of injury. By his own admission, Jeffrey stated that great care was taken to prevent injury to anyone. The fire was intended to damage property, and property was all that was damaged - less than $40,000 worth. While not dismissing the serious nature of the crime, enhancement to Measure 11 is unwarranted, as there were no injuries and damage was relatively minor.

I also question the conviction on three separate counts of Arson 1 for a single fire. Jeffrey was sentenced to 22 years, eight months, a sentence far greater than that faced by many offenders convicted of violent acts against individuals. For example, Manslaughter 1 carries a 10 year sentence; Attempted Murder, only 7and a half years; Rape 1, 8 years four months. Clearly, Jeffrey's sentence is vastly disproportionate to the crime of burning three vehicles. In fact, his co-defendant received only 66 months. It is my belief that Jeffrey's sentence is due more to his political beliefs than to the severity of the crime.

Therefore, Mr. Myers, it is my sincere hope that you will take these points into account with regards to Jeffrey's appeal, and that you will consider allowing the State of Oregon to concede to a lesser sentence in the interest of justice.

Sincerely,

your name & address"