Support forums - Strange first try

Support forums » Products » Cute Editor for ASP » Re: Strange first try

Strange first try

Last post 12-15-2011, 6:19 AM by Kenneth. 1 replies.


	Sort Posts: Previous Next

12-14-2011, 8:09 PM 72007

bbaldrober
Joined on 12-15-2011
Posts 7

Strange first try

Reply Quote

I'm using the sample code as taken from the Aspuploader website for manually initiating uploads, and I get this weird window. Note the dropdown box just below the title. The only entry in the dropdown box is the program containing the aspuploader code. Any ideas?

Here's the window I get: /forum_uploads2/ResultWindow20111214a.doc

Here's the code I'm running:

<%@ Language="VBScript" %>

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<title>
  Form - Start uploading manually
</title>
<link href="demo.css" rel="stylesheet" type="text/css" />

<script type="text/javascript">
function doStart()
{
  var uploadobj = document.getElementById('myuploader');
  if (uploadobj.getqueuecount() > 0)
  {
   uploadobj.startupload();
  }
  else
  {
   alert("Please browse files for upload");
  }
}
</script>

</head>
<body>
<div class="demo">
   <h2>Start uploading manually</h2>
   <p>This sample demonstrates how to start uploading manually after file selection vs automatically.</p>

<form id="form1" method="POST">
    <%
    Dim uploader
    Set uploader=new AspUploader
    uploader.MaxSizeKB=10240
    uploader.Name="myuploader"
    uploader.InsertText="Upload File (Max 10M)"
    uploader.MultipleFilesUpload=true

    uploader.ManualStartUpload=true

    %>
    <%=uploader.GetString() %>

    <br /><br /><br />
    <button id="submitbutton" onclick="doStart();return false;">Start Uploading Files</button>

   </form>

   <br/><br/><br/>
<%

If Request.Form("myuploader")&""<>"" Then

Dim list,i
list=Split(Request.Form("myuploader"),"/")

For i=0 to Ubound(list)
  if i>0 then
   Response.Write("<hr/>")
  end if
  Dim mvcfile
  Set mvcfile=uploader.GetUploadedFile(list(i))

  Response.Write("<div style='font-family:Fixedsys'>")
  Response.Write("Uploaded File:")
  Response.Write("<br/>FileName : ")
  Response.Write(mvcfile.FileName)
  Response.Write("<br/>FileSize : ")
  Response.Write(mvcfile.FileSize)
  Response.Write("<br/>FilePath : ")
  Response.Write(mvcfile.FilePath)
  Response.Write("</div>")
Next
End If

%>

</div>
</body>
</html>

Filed under: aspuploader, manual

12-15-2011, 6:19 AM 72014 in reply to 72007

Kenneth
Joined on 02-13-2008
Posts 3,886

Re: Strange first try

Reply Quote

Hi bbaldrober,

What product you are using? Asp editor? asp uploader?

The uploader code above is correct.

Is your site online? If so, can you send me the uploader page url? So I can check it for you.

Regards,

Ken