I have a form where I gather data, upload the original and do 2 additional resizes. I then add the results to a database. Sometimes all the images fail and say failed or internal server error 500. Sometimes the last one succeeds but adds the same record multiple times. The URL is:
www.mc2ny.com/MC2_Photo_LIBRARY/multiup.asp

Once a selection is made from a select box, the URL is:
www.mc2ny.com/MC2_Photo_LIBRARY/multiup.asp?EVENTNAME=119&Keywords=&Filedata=&MM_insert=UploadQueue

That is a good one to use for testing.

What is my next step to debug this? Which behavior should have the redirect? Should I send you the code?
Thanks,
Jim Spatz

I managed to work out most of this myself. The only problem is that with an upload and 2 resizes, I get 4 entries of each item in the database. I have tried multiple positions for the blocks of code.

Please help.

Jim

I still need to solve this. Am I not following the correct procedure to get support. I am using your products in a business environment in which I am accountable. What is the official support policy and how do I get a reliable dialog going so I can get issues resolved in a somewhat predictable manner.

Thanks,
Jim Spatz

Hi James,

Do you have a redirect on your Insert record behavior? And if you have where it is redirecting to?

Regards,

M.Zografski

-----------------------------------
DMXZone.com Support Team
-----------------------------------

When it redirects to itself, I get 4x inserts. When I change the redirect, I get 1x. When I remove the insert behavior and reinstall, I get 500 internal server error. In all cases, my 2 resizes now fail, where they once succedded. Here is the pertinent script: (Thanks)

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>


<!--#include file="../Connections/mc2clients.asp" -->
<!--#include file="../ScriptLibrary/incSIP2Class.asp" -->
<!--#include file="../ScriptLibrary/incPU3Class.asp" -->
<!--#include file="../ScriptLibrary/incPU3Utils.asp" -->

<%session("x" = 1
' Smart Image Processor 2.5.1
Dim sip1
Set sip1 = New ImageProcessor
sip1.ScriptFolder = "../ScriptLibrary"
sip1.Component = "Auto"
sip1.Source = "upload"
sip1.AutoOrient = false
sip1.KeepMetaData = false
sip1.Matte = "#FFFFFF"
sip1.UploadFields = ""
sip1.GetFiles
While sip1.HasFiles
sip1.LoadFromSource
sip1.Resize 100, 100, true
sip1.Overwrite = false
sip1.Mask = "../DATABASE/Documents/thumbnails/##filename##"
sip1.SaveJPEG 80
sip1.MoveNext
Wend
Set sip1 = Nothing
%>
<%
' Smart Image Processor 2.5.1
Dim sip2
Set sip2 = New ImageProcessor
sip2.ScriptFolder = "../ScriptLibrary"
sip2.Component = "Auto"
sip2.Source = "upload"
sip2.AutoOrient = false
sip2.KeepMetaData = false
sip2.Matte = "#FFFFFF"
sip2.UploadFields = ""
sip2.GetFiles
While sip2.HasFiles
sip2.LoadFromSource
sip2.Resize 450, 450, true
sip2.Overwrite = false
sip2.Mask = "../DATABASE/Documents/ppt_files/##filename##"
sip2.SaveJPEG 80
sip2.MoveNext
Wend
Set sip2 = Nothing
%>
<%
'*** Pure ASP File Upload 3.0.12
' Process form upload1
Dim pau, DMX_uploadAction, UploadRequest, UploadQueryString, pau_thePath, pau_nameConflict, pau_saveWidth, pau_saveHeight
Set pau = new PureUpload
pau.ScriptLibrary = "../ScriptLibrary"
pau.TimeOut = 600
pau.ConflictHandling = "over"
pau.StoreType = "file"
pau.UploadFolder = """../DATABASE/Documents/Hires"""
pau.AllowedExtensions = "GIF,JPG,JPEG,BMP,PNG" ' "images"
pau.MaxFileSize = 4000
pau.ProcessUpload
pau.SaveAll
%>

<%
Dim MM_editAction
MM_editAction = CStr(Request.ServerVariables("SCRIPT_NAME")
If (UploadQueryString <> "" Then
MM_editAction = MM_editAction & "?" & Server.HTMLEncode(UploadQueryString)
End If

' boolean to abort record edit
Dim MM_abortEdit
MM_abortEdit = false
%>
<%
' IIf implementation
Function MM_IIf(condition, ifTrue, ifFalse)
If condition = "" Then
MM_IIf = ifFalse
Else
MM_IIf = ifTrue
End If
End Function
%>
<%
If (CStr(UploadFormRequest("MM_insert") = "UploadQueue" Then

If (Not MM_abortEdit) Then
' execute the insert
Dim MM_editCmd

Set MM_editCmd = Server.CreateObject ("ADODB.Command"
MM_editCmd.ActiveConnection = MM_mc2clients_STRING
MM_editCmd.CommandText = "INSERT INTO documents (ProjectID, Keywords, File_Name) VALUES (?, ?, ?)"
MM_editCmd.Prepared = true
MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param1", 5, 1, -1, MM_IIF(UploadFormRequest("EVENTNAME", UploadFormRequest("EVENTNAME", null)) ' adDouble
MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param2", 203, 1, 536870910, UploadFormRequest("Keywords") ' adLongVarWChar
MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param3", 202, 1, 50, UploadFormRequest("Filedata") ' adVarWChar
MM_editCmd.Execute
MM_editCmd.ActiveConnection.Close

' append the query string to the redirect URL
Dim MM_editRedirectUrl
MM_editRedirectUrl = "multiup.asp"
If (UploadQueryString <> "" Then
If (InStr(1, MM_editRedirectUrl, "?", vbTextCompare) = 0) Then
MM_editRedirectUrl = MM_editRedirectUrl & "?" & UploadQueryString
Else
MM_editRedirectUrl = MM_editRedirectUrl & "&" & UploadQueryString
End If
End If
Response.Redirect(MM_editRedirectUrl)
End If
End If

%>
<%Dim SessionGraphics__ID_Param

SessionGraphics__ID_Param = "100000"
If (Request("EVENTNAME" <> "" Then
SessionGraphics__ID_Param = Request("EVENTNAME"
End If

%>
<%
Dim Repeat1__numRows
Dim Repeat1__index

Repeat1__numRows = -1
Repeat1__index = 0
SessionGraphics_numRows = SessionGraphics_numRows + Repeat1__numRows
%>
<%
Dim SessionGraphics
Dim SessionGraphics_cmd
Dim SessionGraphics_numRows

Set SessionGraphics_cmd = Server.CreateObject ("ADODB.Command"
SessionGraphics_cmd.ActiveConnection = MM_mc2clients_STRING
SessionGraphics_cmd.CommandText = "SELECT * FROM Graphics_Info WHERE Projects.ID = ?"
SessionGraphics_cmd.Prepared = true
SessionGraphics_cmd.Parameters.Append SessionGraphics_cmd.CreateParameter("param1", 5, 1, -1, SessionGraphics__ID_Param) ' adDouble

Set SessionGraphics = SessionGraphics_cmd.Execute
SessionGraphics_numRows = 0
%>
<%
Dim LastProject
Dim LastProject_cmd
Dim LastProject_numRows

Set LastProject_cmd = Server.CreateObject ("ADODB.Command"
LastProject_cmd.ActiveConnection = MM_mc2clients_STRING
LastProject_cmd.CommandText = "SELECT top 1 * FROM projects ORDER BY ID DESC"
LastProject_cmd.Prepared = true

Set LastProject = LastProject_cmd.Execute
LastProject_numRows = 0
%>
<%

if Session("PicID" = "" then
ProjIDParam = LastProject.Fields.Item("ID".Value
else
ProjIDParam = Request("EVENTNAME"
end if
%>
<%
Dim LastGraphicID
Dim LastGraphicID_cmd
Dim LastGraphicID_numRows

Set LastGraphicID_cmd = Server.CreateObject ("ADODB.Command"
LastGraphicID_cmd.ActiveConnection = MM_mc2clients_STRING
LastGraphicID_cmd.CommandText = "SELECT max(ID) as lastpic FROM documents"
LastGraphicID_cmd.Prepared = true

Set LastGraphicID = LastGraphicID_cmd.Execute
LastGraphicID_numRows = 0
%>

<%
Dim Divisions
Dim Divisions_numRows

Set Divisions = Server.CreateObject("ADODB.Recordset"
Divisions.ActiveConnection = MM_mc2clients_STRING
Divisions.Source = "SELECT * FROM Divisions ORDER BY Division ASC"
Divisions.CursorType = 0
Divisions.CursorLocation = 2
Divisions.LockType = 1
Divisions.Open()

Divisions_numRows = 0
%>
<%
Dim AccountExecutives
Dim AccountExecutives_numRows

Set AccountExecutives = Server.CreateObject("ADODB.Recordset"
AccountExecutives.ActiveConnection = MM_mc2clients_STRING
AccountExecutives.Source = "SELECT * FROM AccountExecutives ORDER BY Account_Executive ASC"
AccountExecutives.CursorType = 0
AccountExecutives.CursorLocation = 2
AccountExecutives.LockType = 1
AccountExecutives.Open()

AccountExecutives_numRows = 0
%>
<%
Dim Projects
Dim Projects_cmd
Dim Projects_numRows

Set Projects_cmd = Server.CreateObject ("ADODB.Command"
Projects_cmd.ActiveConnection = MM_mc2clients_STRING
Projects_cmd.CommandText = "SELECT * FROM Eventlist ORDER BY Client, Year DESC, Event"
Projects_cmd.Prepared = true

Set Projects = Projects_cmd.Execute
Projects_numRows = 0
%>
<%
Dim Clients
Dim Clients_numRows

Set Clients = Server.CreateObject("ADODB.Recordset"
Clients.ActiveConnection = MM_mc2clients_STRING
Clients.Source = "SELECT * FROM Clients ORDER BY Client ASC"
Clients.CursorType = 0
Clients.CursorLocation = 2
Clients.LockType = 1
Clients.Open()

Clients_numRows = 0
%>
<%
Dim Categories
Dim Categories_cmd
Dim Categories_numRows

Set Categories_cmd = Server.CreateObject ("ADODB.Command"
Categories_cmd.ActiveConnection = MM_mc2clients_STRING
Categories_cmd.CommandText = "SELECT distinct Category FROM Projects"
Categories_cmd.Prepared = true

Set Categories = Categories_cmd.Execute
Categories_numRows = 0
%>
<%

if Session("PicID" = "" then
ProjIDParam = LastProject.Fields.Item("ID".Value
else
ProjIDParam = Request("EVENTNAME"

end if%>
<%
Dim Graphics
Dim Graphics_numRows

Set Graphics = Server.CreateObject("ADODB.Recordset"
Graphics.ActiveConnection = MM_mc2clients_STRING
Graphics.Source = "SELECT * FROM Documents"
Graphics.CursorType = 0
Graphics.CursorLocation = 2
Graphics.LockType = 1
Graphics.Open()

Graphics_numRows = 0
if Session("PicID" = "" then
Session("PicID" = (LastGraphicID.Fields.Item("lastpic".Value)
else
Session("PicID" = ProjIDParam
end if
%>
<%
Dim Shows
Dim Shows_numRows

Set Shows = Server.CreateObject("ADODB.Recordset"
Shows.ActiveConnection = MM_mc2clients_STRING
Shows.Source = "SELECT * FROM Projects ORDER BY Project ASC"
Shows.CursorType = 0
Shows.CursorLocation = 2
Shows.LockType = 1
Shows.Open()

Shows_numRows = 0
%>

<HTML>
<script type="text/JavaScript">
<!--
function MM_findObj(n, d) { //v4.01
var p,i,x; if(!d) d=document; if((p=n.indexOf("?")>0&&parent.frames.length) {
d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
if(!x && d.getElementById) x=d.getElementById(n); return x;
}

function YY_checkform() { //v4.71
//copyright (c)1998,2002 Yaromat.com
var a=YY_checkform.arguments,oo=true,v='',s='',err=false,r,o,at,o1,t,i,j,ma,rx,cd,cm,cy,dte,at;
for (i=1; i<a.length;i=i+4){
if (a[i+1].charAt(0)=='#'){r=true; a[i+1]=a[i+1].substring(1);}else{r=false}
o=MM_findObj(a[i].replace(/\[\d+\]/ig,"");
o1=MM_findObj(a[i+1].replace(/\[\d+\]/ig,"");
v=o.value;t=a[i+2];
if (o.type=='text'||o.type=='password'||o.type=='hidden'){
if (r&&v.length==0){err=true}
if (v.length>0)
if (t==1){ //fromto
ma=a[i+1].split('_');if(isNaN(v)||v<ma[0]/1||v > ma[1]/1){err=true}
} else if (t==2){
rx=new RegExp("^[\\w\.=-]+@[\\w\\.-]+\\.[a-zA-Z]{2,4}$";if(!rx.test(v))err=true;
} else if (t==3){ // date
ma=a[i+1].split("#";at=v.match(ma[0]);
if(at){
cd=(at[ma[1]])?at[ma[1]]:1;cm=at[ma[2]]-1;cy=at[ma[3]];
dte=new Date(cy,cm,cd);
if(dte.getFullYear()!=cy||dte.getDate()!=cd||dte.getMonth()!=cm){err=true};
}else{err=true}
} else if (t==4){ // time
ma=a[i+1].split("#";at=v.match(ma[0]);if(!at){err=true}
} else if (t==5){ // check this 2
if(o1.length)o1=o1[a[i+1].replace(/(.*\[)|(\].*)/ig,""];
if(!o1.checked){err=true}
} else if (t==6){ // the same
if(v!=MM_findObj(a[i+1]).value){err=true}
}
} else
if (!o.type&&o.length>0&&o[0].type=='radio'){
at = a[i].match(/(.*)\[(\d+)\].*/i);
o2=(o.length&gt;1)?o[at[2]]<img src=../images/dmxzone/forum/icon_smile_shock.gif border=0 align=middle>;
if (t==1&&o2&&o2.checked&&o1&&o1.value.length/1==0){err=true}
if (t==2){
oo=false;
for(j=0;j&lt;o.length;j++){oo=oo||o[j].checked}
if(!oo){s+='* '+a[i+3]+'\n'}
}
} else if (o.type=='checkbox'){
if((t==1&&o.checked==false)||(t==2&&o.checked&&o1&&o1.value.length/1==0)){err=true}
} else if (o.type=='select-one'||o.type=='select-multiple'){
if(t==1&&o.selectedIndex/1==0){err=true}
}else if (o.type=='textarea'){
if(v.length&lt;a[i+1]){err=true}
}
if (err){s+='* '+a[i+3]+'\n'; err=false}
}
if (s!=''){alert('The required information is incomplete or contains errors:\t\t\t\t\t\n\n'+s)}
document.MM_returnValue = (s=='');
}

function MM_openBrWindow(theURL,winName,features) { //v2.0
window.open(theURL,winName,features);
}
//--&gt;
&lt;/script&gt;
&lt;HEAD&gt;
&lt;title&gt;MC2 Photo Library&lt;/title&gt;
&lt;META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=iso-8859-1"&gt;
&lt;link rel="stylesheet" type="text/css" media="screen" href="styles.css"&gt;
&lt;script type="text/javascript"&gt;&lt;%=pau.generateScriptCode()%&gt;&lt;/script&gt;
&lt;script src="../ScriptLibrary/incPU3.js" type="text/javascript"&gt;&lt;/script&gt;
&lt;/HEAD&gt;
&lt;body bgcolor="#FFFFFF" leftmargin="6" topmargin="6" marginheight="6" marginwidth="6" text="#666666" link="#990000" vlink="#4A5273" alink="#990000" &gt;
&lt;table width="771" border="0" cellspacing="1" cellpadding="3"&gt;
&lt;tr&gt;
&lt;td class="whiteheader"&gt;&lt;a href="www.mc2ny.com/MC2_Photo_LIBRARY/home-1.asp"&gt;&lt;img src="images/SMLOGO.jpg" vspace="6" border="0"&gt;&lt;/a&gt;&lt;br&gt;
MC&sup2; Photo Library&lt;/td&gt; &lt;td height="12" valign="top" class="whiteheader"&gt;&nbsp;
&lt;/td&gt;

&lt;/tr&gt;
&lt;/table&gt;
&lt;p&gt;

&lt;table border="0" cellspacing="0" cellpadding="0" bgcolor="#FFFFFF" width="100%"&gt;
&lt;tr&gt;
&lt;td height="25" class="greyheader"&gt;&nbsp; UPLOAD PHOTO IMAGES&lt;/td&gt;
&lt;td align="right" class="greynav"&gt;&lt;/td&gt;
&lt;/tr&gt;
&lt;/table&gt;
&lt;form ACTION="&lt;%=MM_editAction%&gt;" name="UploadQueue" id="UploadQueue" method="POST"&gt;
&lt;p&gt;
&lt;table width="100%" border="0" cellspacing="1" cellpadding="3"&gt;
&lt;tr&gt;
&lt;td height="25" colspan="2" class="whiteheader"&gt;&nbsp; 1. Enter File Information&lt;/td&gt;
&lt;/tr&gt;
&lt;tr&gt;
&lt;td width="20%" class="ltgreynav"&gt;Project&lt;/td&gt;
&lt;td width="80%" height="12" class="ltgreynav"&gt;&lt;select name="EVENTNAME" size="1" id="EVENTNAME" onChange="UploadQueue.action='multiup.asp';UploadQueue.method='get';UploadQueue.submit()"&gt;

&lt;option value="None" &lt;%If (Not isNull((ProjIDParam))) Then If ("None" = CStr((ProjIDParam))) Then Response.Write("selected=""selected""" : Response.Write(""%&gt;&gt;None&lt;/option&gt;
&lt;!-- LIST OF Project GOES HERE PULLED FROM Projects TABLE IN DATABASE --&gt;
&lt;%
While (NOT Projects.EOF)
%&gt;&lt;option value="&lt;%=(Projects.Fields.Item("ID".Value)%&gt;" &lt;%If (Not isNull((ProjIDParam))) Then If (CStr(Projects.Fields.Item("ID".Value) = CStr((ProjIDParam))) Then Response.Write("selected=""selected""" : Response.Write(""%&gt; &gt;&lt;%=(Projects.Fields.Item("Client".Value) + " " +(Projects.Fields.Item("Event".Value)+ " " +(Projects.Fields.Item("Year".Value)%&gt;&lt;/option&gt;
&lt;%
Projects.MoveNext()
Wend
If (Projects.CursorType &gt; 0) Then
Projects.MoveFirst
Else
Projects.Requery
End If
%&gt;
&lt;/select&gt;
&lt;a href="addproject.asp"&gt;Add New Project&lt;/a&gt;&lt;/td&gt;
&lt;/tr&gt;


&lt;tr&gt;
&lt;td class="ltgreynav"&gt;Keywords&lt;/td&gt;
&lt;td class="ltgreynav"&gt;&lt;textarea name="Keywords" cols="50" rows="4" wrap=VIRTUAL&gt;&lt;/textarea&gt;&lt;/td&gt;
&lt;/tr&gt;
&lt;tr&gt;
&lt;/table&gt;
&lt;p&gt;
&lt;table border="0" cellspacing="1" cellpadding="6" bgcolor="#FFFFFF" width="100%"&gt;
&lt;tr&gt;
&lt;td colspan="2" class="whiteheader"&gt; 2. Attach graphic images &lt;/td&gt;
&lt;/tr&gt;
&lt;tr&gt;
&lt;td width="20%" class="ltgreynav"&gt; Choose graphic file to upload &lt;/td&gt;
&lt;td width="80%" class="ltgreynav"&gt;&lt;/td&gt;
&lt;/tr&gt;
&lt;tr&gt;
&lt;td class="text" colspan=2&gt;&lt;ul&gt;
&lt;li&gt;Support Documents include: Digital Photo(s) (.jpg)
&lt;li&gt;File names cannot have ANY spaces, &lt;nobr&gt;slashes (/)&lt;/nobr&gt;, &lt;nobr&gt;number signs (#)&lt;/nobr&gt;, &lt;nobr&gt;question marks (?)&lt;/nobr&gt;, &lt;nobr&gt;percent signs (%)&lt;/nobr&gt;, &lt;nobr&gt;"at" signs (@)&lt;/nobr&gt; or &lt;nobr&gt;asterisks (*)&lt;/nobr&gt;.&lt;br&gt;
Instead, use a hyphen, an underscore or initial caps.
&lt;li&gt;File name must have an extension (example: &nbsp; .jpg)
&lt;li&gt;Files must be smaller than 3.5 MB
&lt;/ul&gt;&lt;/td&gt;
&lt;/tr&gt;
&lt;/table&gt;


&lt;p&gt;
&lt;object classid="clsid:d27cdb6e-ae6d-11cf-96b8-444553540000" codebase="download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=9,0,63,0" width="550" height="350" id="upload1" align="middle"&gt;
&lt;param name="FlashVars" value="&lt;%=pau.flashvars()%&gt;&formName=UploadQueue" /&gt;
&lt;param name="movie" value="dmxMultiUploader.swf" /&gt;
&lt;param name="quality" value="best" /&gt;
&lt;param name="wmode" value="transparent" /&gt;
&lt;embed src="dmxMultiUploader.swf" name="upload1" quality="best" flashvars="&lt;%=pau.flashvars()%&gt;&formName=UploadQueue" wmode="transparent" type="application/x-shockwave-flash" width="550" height="350" pluginspage="www.macromedia.com/go/getflashplayer" /&gt;
&lt;/object&gt;
&lt;input type="hidden" name="Filedata" /&gt;
&lt;script type="text/javascript"&gt;window.upload1 = document.forms["UploadQueue"].upload1;&lt;/script&gt;
&lt;table border="0" cellspacing="3" cellpadding="3" bgcolor="#FFFFFF" width="100%"&gt;
&lt;tr&gt;
&lt;td class="whiteheader" colspan="2"&gt;3. Uploaded files will appear in the grid below. They can be deleted or edited while this window is open. &lt;/td&gt;
&lt;/tr&gt;
&lt;/table&gt;
&lt;br&gt;
&lt;table border="0" cellpadding="3" cellspacing="3"&gt;
&lt;tr&gt;
&lt;td width="8" bgcolor="#CCCCCC"&gt;&nbsp;&lt;/td&gt;
&lt;td width="8" bgcolor="#CCCCCC"&gt;&nbsp;&lt;/td&gt;
&lt;td width="120" bgcolor="#CCCCCC"&gt;&lt;font size="1" face="Arial, Helvetica, sans-serif"&gt;File Name &lt;/font&gt;&lt;/td&gt;
&lt;td width="127" bgcolor="#CCCCCC"&gt;&lt;font size="1" face="Arial, Helvetica, sans-serif"&gt;Thumbnail&lt;/font&gt;&lt;/td&gt;
&lt;td width="121" bgcolor="#CCCCCC"&gt;&lt;font size="1" face="Arial, Helvetica, sans-serif"&gt;Category&lt;/font&gt;&lt;/td&gt;
&lt;td width="327" bgcolor="#CCCCCC"&gt;&lt;font size="1" face="Arial, Helvetica, sans-serif"&gt;Project&lt;/font&gt;&lt;/td&gt;
&lt;td width="123" bgcolor="#CCCCCC"&gt;&lt;font size="1" face="Arial, Helvetica, sans-serif"&gt;Keywords&lt;/font&gt;&lt;/td&gt;
&lt;td width="116" bgcolor="#CCCCCC"&gt;&lt;font size="1" face="Arial, Helvetica, sans-serif"&gt;Division&lt;/font&gt;&lt;/td&gt;
&lt;td width="163" bgcolor="#CCCCCC"&gt;&lt;font size="1" face="Arial, Helvetica, sans-serif"&gt;Account Executive &lt;/font&gt;&lt;/td&gt;
&lt;/tr&gt; &lt;%
While ((Repeat1__numRows &lt;&gt; 0) AND (NOT SessionGraphics.EOF))
%&gt;
&lt;tr&gt;
&lt;td bgcolor="eeeeee"&gt;&lt;font size="1" face="Arial, Helvetica, sans-serif"&gt;&lt;a href="editgraphic.asp?ID=&lt;%=(SessionGraphics.Fields.Item("documents.ID".Value)%&gt;&EVENTNAME=&lt;%=ProjIDParam%&gt;"&gt;Edit&lt;/a&gt;&lt;/font&gt;&lt;/td&gt;

&lt;td bgcolor="eeeeee"&gt;&lt;font size="1" face="Arial, Helvetica, sans-serif"&gt;&lt;a href="deletegraphic.asp?ID=&lt;%=(SessionGraphics.Fields.Item("documents.ID".Value)%&gt;&EVENTNAME=&lt;%=ProjIDParam%&gt;"&gt;Delete&lt;/a&gt;&lt;/font&gt;&lt;/td&gt;
&lt;td bgcolor="eeeeee"&gt;&lt;font size="1" face="Arial, Helvetica, sans-serif"&gt;&lt;a href="#" onClick="MM_openBrWindow('popupresults.asp?ID=&lt;%=(SessionGraphics.Fields.Item("documents.ID".Value)%&gt;','imagedetail','scrollbars=yes,resizable=yes,width=750,height=500')"&gt;&lt;%=(SessionGraphics.Fields.Item("File_Name".Value)%&gt;&lt;/a&gt;&lt;/font&gt;&lt;/td&gt;
&lt;td bgcolor="eeeeee"&gt;&lt;font size="1" face="Arial, Helvetica, sans-serif"&gt;&lt;img src="../DATABASE/documents/thumbnails/&lt;%=(SessionGraphics.Fields.Item("File_Name".Value)%&gt;"&gt;&lt;/font&gt;&lt;/td&gt;
&lt;td bgcolor="eeeeee"&gt;&lt;font size="1" face="Arial, Helvetica, sans-serif"&gt;&lt;%=(SessionGraphics.Fields.Item("Category".Value)%&gt;&lt;/font&gt;&lt;/td&gt;
&lt;td bgcolor="eeeeee"&gt;&lt;font size="1" face="Arial, Helvetica, sans-serif"&gt;&lt;%=(SessionGraphics.Fields.Item("Client".Value)%&gt;&nbsp;&lt;%=(SessionGraphics.Fields.Item("Event".Value)%&gt;&nbsp;&lt;%=(SessionGraphics.Fields.Item("Year".Value)%&gt;&lt;/font&gt;&lt;/td&gt;
&lt;td bgcolor="eeeeee"&gt;&lt;font size="1" face="Arial, Helvetica, sans-serif"&gt;&lt;%=(SessionGraphics.Fields.Item("Keywords".Value)%&gt;&lt;/font&gt;&lt;/td&gt;
&lt;td bgcolor="eeeeee"&gt;&lt;font size="1" face="Arial, Helvetica, sans-serif"&gt;&lt;%=(SessionGraphics.Fields.Item("Division".Value)%&gt;&lt;/font&gt;&lt;/td&gt;
&lt;td bgcolor="eeeeee"&gt;&lt;font size="1" face="Arial, Helvetica, sans-serif"&gt;&lt;%=(SessionGraphics.Fields.Item("Account_Executive".Value)%&gt;&lt;/font&gt;&lt;/td&gt;
&lt;/tr&gt;
&lt;%
Repeat1__index=Repeat1__index+1
Repeat1__numRows=Repeat1__numRows-1
SessionGraphics.MoveNext()
Wend
%&gt;
&lt;/table&gt;
&lt;!-- I DONT THINK WE NEED THIS --&gt;
&lt;!-- END DONT NEED --&gt;
&lt;input type="hidden" name="MM_insert" value="UploadQueue"&gt;
&lt;/form&gt;
&lt;/body&gt;
&lt;/html&gt;
&lt;%
Graphics.Close()
Set Graphics = Nothing
%&gt;
&lt;%
Shows.Close()
Set Shows = Nothing
%&gt;

&lt;%
SessionGraphics.Close()
Set SessionGraphics = Nothing
%&gt;
&lt;%
LastProject.Close()
Set LastProject = Nothing
%&gt;
&lt;%
LastGraphicID.Close()
Set LastGraphicID = Nothing
%&gt;
&lt;%
Divisions.Close()
Set Divisions = Nothing
%&gt;
&lt;%
AccountExecutives.Close()
Set AccountExecutives = Nothing
%&gt;
&lt;%
Projects.Close()
Set Projects = Nothing
%&gt;
&lt;%
Clients.Close()
Set Clients = Nothing
%&gt;
&lt;%
Categories.Close()
Set Categories = Nothing
%&gt;

Hi James,

Start with placing SIP code after PAU code in your page's header. PAU must upload the file before SIP to start looking for it. About redirect.. I'll have to speak with the developers for save way to redirect the page automatically.

Regards,

M.Zografski

-----------------------------------
DMXZone.com Support Team
-----------------------------------

Thanks.

Somtimes all files say failed but but a few may upload anyway.

Hi James,

Get a web debug proxy - Fiddler 2 - free one - and debug the upload error with it.

Regards,

M.Zografski

-----------------------------------
DMXZone.com Support Team
-----------------------------------