Ver Mensaje Individual
  #12 (permalink)  
Antiguo 18/01/2007, 14:26
Avatar de Myakire
Myakire
Colaborador
 
Fecha de Ingreso: enero-2002
Ubicación: Centro de la república
Mensajes: 8.849
Antigüedad: 23 años, 3 meses
Puntos: 146
Re: Uso Correcto del Xupload

Ya me consegui un servidor distinto, deja ahora prueba ahí, por lo pronto deja te paso los ejemplos involucrados:

02_redirect.asp
Código:
<HTML>
<HEAD>
<TITLE>XUpload Code Sample: 02_redirect.asp</TITLE>
</HEAD>
<BODY BGCOLOR="#FFFFFF">

<H2>XUpload: Browser Redirection</H2>
<h3>Demonstrates redirection to another page
to display the results of an upload script.</h3>
<P>
<h4>Note: two .asp files are involved in the process:
02_redirect_upload.asp and 02_redirect_reply.asp.</H4>
<OBJECT 
	classid="CLSID:E87F6C8E-16C0-11D3-BEF7-009027438003" 
	codeBase="XUpload.ocx"
	height="200"
	id="UploadCtl" 
	width="500">

<!--Required parameters: upload script's server and location-->
<PARAM NAME="Server" VALUE="localhost">
<PARAM NAME="Script" VALUE="/xupload/02_redirect_upload.asp">

<!--Redirect browser to a server script upon completion of an upload-->
<PARAM NAME="RedirectURL" VALUE="http://localhost/xupload/02_redirect_reply.asp">

</OBJECT>

<!-- Microsoft workaround for the Click-to-Activate problem -->
<script type="text/javascript" src="ie_workaround.js"></script>

</BODY>
</HTML>
02_redirect_reply.asp
Código:
<% Response.Write Request.Form("XUPLOADREPLY") %>
02_redirect_upload.asp
Código:
<HTML>

<HEAD>
<META http-equiv="Content-Type" content="text/html; charset=utf-8">
<TITLE>XUpload Code Sample: 02_redirect_upload.asp</TITLE>
</HEAD>

<BODY>

<% 

Set Upload = Server.CreateObject("Persits.Upload")
Upload.IgnoreNoPost = True
Upload.CodePage = 65001
nCount = Upload.Save("c:\upload")

%>
<h3>Success! <% = nCount %> files uploaded.</h3>

<TABLE CELLSPACING=0 CELLPADDING=2 BORDER=1>
<TR><TH>Path</TH><TH>Size</TH><TH>Content-Type</TH></TR>
<%
For Each File in Upload.Files
%>
<TR><TD><% = Server.HtmlEncode( File.Path ) %></TD>
	<TD ALIGN="RIGHT"><% = File.Size %></TD>
	<TD><% = File.ContentType %></TD></TR>
<%
Next
%>
</TABLE>

</BODY>
</HTML>