HOME > Atención al cliente > Programación > ASPMAIL

ASPSmartUpload.

Ejemplo Simple:

<%
' Variables
' *********
Dim mySmartUpload
Dim intCount

' Creacion del Objecto
' ***************
Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")
' Upload
' ******
mySmartUpload.Upload
' Guarde el archivo con su nombre original en un path virtual del servidor

*************************************
intCount = mySmartUpload.Save("aspSmartUpload/Upload")
' Ejemplo con un Path Fisico ' intCount = mySmartUpload.Save("c:\domains\sudominio.com\sucarpeta\")
' Mostrar el numero de archivos subidos
' ************************************
Response.Write(intCount & " file(s) uploaded.")
%>