Advanced Multi Uploader Support Product Page

In progress

Multi Upload 500 Int Server Error

Reported 16 Jul 2010 12:01:33
8
have this problem
16 Jul 2010 12:01:33 Alex Billingsley posted:
can get the image to upload fine but when i try to pass another value like the album reference i get an error

Replies

Replied 16 Jul 2010 12:50:33
16 Jul 2010 12:50:33 Miroslav Zografski replied:
Hello Alex,

Please, provide more detailed information on the error you get, your server script and, please, pass here the code of the page in question.

Regards,
Replied 16 Jul 2010 14:04:37
16 Jul 2010 14:04:37 Alex Billingsley replied:

<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<!--#include file="../Connections/conn_couture.asp" -->
<!--#include file="../ScriptLibrary/incPU3Class.asp" -->
<!--#include file="../ScriptLibrary/incPU3Utils.asp" -->
<
%'*** Pure ASP File Upload 3.0.17
' 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.ConflictHandling = "over"
pau.StoreType = "file"
pau.UploadFolder = "../images/gallery"
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_conn_couture_STRING
    MM_editCmd.CommandText = "INSERT INTO tbl_pictures (Picture_File, Picture_Album_ID) VALUES (?, ?)" 
    MM_editCmd.Prepared = true
    MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param1", 202, 1, 255, UploadFormRequest("Filedata")) ' adVarWChar
    MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param2", 5, 1, -1, MM_IIF(UploadFormRequest("albumID"), UploadFormRequest("albumID"), null)) ' adDouble
    MM_editCmd.Execute
    MM_editCmd.ActiveConnection.Close
  End If
End If
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml"><!-- InstanceBegin template="/Templates/admin.dwt.asp" codeOutsideHTMLIsLocked="false" -->
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<!-- InstanceBeginEditable name="doctitle" -->
<title>Untitled Document</title>
<!-- InstanceEndEditable -->
<!-- InstanceBeginEditable name="head" -->
<script></script>
<script type="text/javascript"><%=pau.generateScriptCode()%></script>
<script src="../ScriptLibrary/incPU3.js" type="text/javascript"></script>
<!-- InstanceEndEditable -->
<style type="text/css">
<!--
body,td,th {
	font-family: "Times New Roman", Times, serif;
	color: #093856;
	font-style: italic;
	text-align: justify;
}
body {
	background-color: #a1c2ce;
}
a:link {
	color: #093856;
}
a:visited {
	color: #093856;
}
a:hover {
	color: #D7E5EA;
}
a:active {
	color: #093856;
}

.boarder-top {
	border-top:1pt dotted #D7E5EA;
	height:1px;
}
.white {
	color:#D7E5EA;
}
-->
</style></head>

<body>
<table width="930" border="0" align="center" cellpadding="5" cellspacing="3">
  <tr>
    <td>[img]../images/logo.png" width="268" height="117" /></td>
  </tr>
  <tr>
    <td><a href="add-client.asp">Add Client</a> | <a href="edit-clients.asp">Edit Clients</a> | <a href="add-albums.asp">Add Albums</a> | <a href="edit-album.asp">Edit Albums</a> | <a href="add-flipbook.asp">Add Flipbook Image</a> | <a href="flipbook.asp">Edit Flipbook Image</a> | <a href="edit-images.asp">Edit Album Images</a> | <a href="../flipbook-update.asp" target="_blank">UPDATE Flip Book</a></td>
  </tr>
  <tr>
    <td><!-- InstanceBeginEditable name="body-area" -->
    [h1] Add Images[/h1]
    <form ACTION="<%=MM_editAction%>" name="UploadQueue" id="UploadQueue" method="POST">
      <object classid="clsid:d27cdb6e-ae6d-11cf-96b8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=9,0,63,0" width="550" height="350" id="upload1" align="middle">
        <param name="FlashVars" value="<%=pau.flashvars()%>&formName=UploadQueue" />
        <param name="movie" value="dmxMultiUploader.swf" />
        <param name="quality" value="best" />
        <param name="wmode" value="transparent" />
        <embed src="dmxMultiUploader.swf" name="upload1" quality="best" flashvars="<%=pau.flashvars()%>&formName=UploadQueue" wmode="transparent" type="application/x-shockwave-flash" width="550" height="350" pluginspage="http://www.macromedia.com/go/getflashplayer" />    
      </object>
      <input type="hidden" name="Filedata" />
<script type="text/javascript">window.upload1 = document.forms["UploadQueue"].upload1;</script>
<input type="hidden" name="albumID" value="<%=Request("AlbumID")%>" />
<input type="hidden" name="MM_insert" value="UploadQueue" />
    </form>
    <!-- InstanceEndEditable --></td>
  </tr>
</table>
</body>
<!-- InstanceEnd --></html>


Reply to this topic