CodeS-SourceS est hébergé par Frontier.fr

Ce site au démarrage

begin process at 2012 02 05 04:24:50

Accueil Codes Tutoriels Forum Livres Emploi Services Connexion

Trouver un code source :

dans

[ Dernières recherches ]

Accueil >

Composants

> TUTORIAL ASPSMARTUPLOAD (POUR AIDER CEUX QUI COMME MOI N'ONT PAS TROUVÉ AILLEURS)

TUTORIAL ASPSMARTUPLOAD (POUR AIDER CEUX QUI COMME MOI N'ONT PAS TROUVÉ AILLEURS)

Information sur la source

Note :

7,00 / 10

Catégorie :Composants Classé sous :upload, aspsmartupload, envoyer, fichier, composant Niveau :Débutant Date de création :03/10/2004 Vu :22 952

Auteur : ranouf

Ecrire un message privé

Site perso

Commentaire sur cette source (12)

Ajouter un commentaire et/ou une note

Description

Explique comment se servir du composant AspSmartUpload, composant gratuit qui permet d'up des fichiers sur votre serveur, copiez la source ci-dessous dans le fichier index.asp et lancez le a partir de votre serveur.

L'installation du composant ASPSmartUpload s'effectue selon les étapes suivantes :

Télécharger les fichiers sur le site de ASPSmart
(http://www.aspsmart.com/scripts/download/downloa dfree.asp?product=aspSmartUpload&L=FR).

Décompresser le fichier ZIP.
Copier les fichiers DLL dans le répertoire C:\WINNT\SYSTEM32.
Exécuter à partir de l'invite MS-DOS
REGSVR32.EXE C:\WINNT\SYSTEM32\aspSmartUpload.dll .

Source

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<title>Document sans titre</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body>
<%
'------------------------------------------------------------
Public sub UploaderFichier(mySmartUpload, strAdresse)
'------------------------------------------------------------
'--- upload fichier a une adresse donnée
'------------------------------------------------------------
Dim Fichier
Dim strAdr
On error resume next'si erreur on continue quand meme
'mySmartUpload.MaxFileSize = 5000' Taille maximale autorisée : 5 Ko
'mySmartUpload.AllowedFilesList = "gif,jpg"' Upload autorisé sur les gif et jpg uniquement
mySmartUpload.Upload' Selectionne chaque fichier
For each Fichier In mySmartUpload.files
If not Fichier.IsMissing Then
strAdr=strAdresse & Fichier.FileName
Fichier.SaveAs(strAdr)' Upload du fichier
End If
Next
if err.number =0 then 'test si erreur
direc= "<img src="""& strAdr & """><br>"'si pas erreur alors on affichera l'image dl
else
direc="une erreur c produite : "& strAdr &"<br>"'si erreur alors on affiche l'erreur
end if
response.Write(direc)
End sub
if request.queryString("Action")="Upload" then
response.expires=0 'ça je sais pas
response.buffer=true'ça je sais pas non plus
On error resume next' Gérer les erreur
' Variables
Dim mySmartUpload 'ce qui permet d'up le fichier
Dim strAdr 'Adresse du fichier
Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")' Création de l'Objet
strAdr=Server.MapPath("\Tests\Upload\")'à changer pour installer ou vous le voulez
'--- Upload les fichiers à l'adresse strAdr
UploaderFichier mySmartUpload, strAdr
set mySmartUpload=nothing'Si aucune erreur s'est produite on redirige vers uploadok.asp
End if
%>
<form method="POST" action="index.asp?action=Upload" enctype="multipart/form-data">
<input type="file" name="Fichier1" size="20"><br>
<input type="submit" value="uploader" name="action">
</form>
</body>
</html>

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<title>Document sans titre</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>

<body>
	<%
	
'------------------------------------------------------------
Public sub UploaderFichier(mySmartUpload, strAdresse)
'------------------------------------------------------------
'--- upload fichier a une adresse donnée
'------------------------------------------------------------
    
	Dim Fichier
	Dim strAdr
	
	On error resume next'si erreur on continue quand meme
	
	'mySmartUpload.MaxFileSize = 5000' Taille maximale autorisée : 5 Ko
	'mySmartUpload.AllowedFilesList = "gif,jpg"' Upload autorisé sur les gif et jpg uniquement
	
	mySmartUpload.Upload' Selectionne chaque fichier
	
	For each Fichier In mySmartUpload.files
		If not Fichier.IsMissing Then
		
			strAdr=strAdresse & Fichier.FileName
			Fichier.SaveAs(strAdr)' Upload du fichier
			
		End If
	Next
	
	if err.number =0 then 'test si erreur
		direc= "<img src="""& strAdr & """><br>"'si pas erreur alors on affichera l'image dl
	else
		direc="une erreur c produite : "& strAdr &"<br>"'si erreur alors on affiche l'erreur
	end if
	
	response.Write(direc)
	
End sub

	if request.queryString("Action")="Upload" then
		response.expires=0 'ça je sais pas
		response.buffer=true'ça je sais pas non plus
		
		
		On error resume next' Gérer les erreur
		' Variables
		
		Dim mySmartUpload 'ce qui permet d'up le fichier
		
		Dim strAdr 'Adresse du fichier
		
		Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")' Création de l'Objet
		



		

		
		strAdr=Server.MapPath("\Tests\Upload\")'à changer pour installer ou vous le voulez
		
		'--- Upload les fichiers à l'adresse strAdr
		UploaderFichier mySmartUpload, strAdr
		
		set mySmartUpload=nothing'Si aucune erreur s'est produite on redirige vers uploadok.asp
		

		
	End if
	%>
	<form method="POST" action="index.asp?action=Upload" enctype="multipart/form-data">
		<input type="file" name="Fichier1" size="20"><br>
		<input type="submit" value="uploader" name="action">
	</form>
</body>
</html>

Conclusion

si vous avez des questions n'hésitez pas

Sources du même auteur

CUSTOM USER CONTROL COLLECTION

Toutes les sources de ranouf

Sources de la même categorie

CUSTOM USER CONTROL COLLECTION par ranouf

COMPACTER DU JAVASCRIPT par jesusonline

WEBCONTROL WYSIWYG POUR ASP.NET par Yxion

ANTIBOT par ghuysmans99

INCLURE UNE LIBRAIRIE par Warwick

Toutes les sources de la catégorie Composants

Sources en rapport avec celle ci

ENVOI (SAUVEGARDE) D'UN FICHIER BINAIRE SUR UN SITE DISTANT ... par Chrigou

UPLOAD D'IMAGES VIA ADODB.STREAM ET SQL SERVER par Nicolas_kojack

ASP.NET UPLOAD D'UN FICHIER DU PC CLIENT VERS VOTRE SITE par michelsto

UPLOAD DE FICHIERS EN ASP SANS COMPOSANT par lelouperre

UPLOAD DE FICHIER EN PUR ASP SANS COMPOSANT SERVEUR par toxic_avanger

Commentaires et avis

Commentaire de ranouf le 23/02/2005 09:27:23

c moi qui ai dait ça je m'en souvenais plus !!! ça va m"etre de nouvo util merci moi

Commentaire de kclaude le 08/06/2005 18:10:48

Ranouf relis toi avant de poster par pitier :x

Commentaire de Romain_cim le 19/01/2006 16:52:08

Bonjour,

Est-ce que quelqu'un a déja essayer de trouver une méthode pour uploader un répertoire entier? Sur la page de saisie on sélectionnerait un répertoire de l'arborescence et, à la validation, les fichiers de ce répertoire seraient uploadés.

Merci

Commentaire de epink le 27/03/2006 04:40:24

j'ai pas trop compris comment ca marchait .... enfin la pour l'instant ca marche en local sur mon pc mais moi ce que je voudrai c'est uploader sur un serveur distant... Est-ce possible ? merci d'avance....

Commentaire de ranouf le 27/03/2006 08:51:25

slt EPINK, si ton serveur a ce composant installé oui c possible. Qui plus est renseignes toi pour savoir si un dossier est prévu à cet effet, car il faut que tu es les droits d'écriture sur le dossier pour l'utilisateur du serveur web.

En gros tu tests, si ça marche pas t'appelles ton fournisseur et tu lui demandes de l'installer

Commentaire de Macno78 le 09/06/2006 13:01:40

A partir d'une certaine taille de fichier (70 Mo pour moi) le composant renvoie une erreur. Y a t'il un moyen d'augmenter cette limite ?
(Serveur IIS5.0 sur Windows 2000)

Commentaire de ranouf le 11/06/2006 13:50:11

Pas la moindre idée dsl, a quoi que ... Dans les paramètre de IIS, il existe un paramètre de ce genre, j'avais été confronté à ce genre de pb je crois me souvenir. PAr contre plus la moindre idée sur comment faire !
Dsl

Commentaire de ghosterbox le 20/10/2006 07:09:11

j'ai fait ceci :
Décompresser le fichier ZIP.
Copier les fichiers DLL dans le répertoire C:\WINNT\SYSTEM32.
Exécuter à partir de l'invite MS-DOS
REGSVR32.EXE C:\WINNT\SYSTEM32\aspSmartUpload.dll .

Quand je clique sur "uploader", ca affiche une erreur sur la page web "Impossible d'afficher la page". Faut-il faire qq chose en plus des DLL? merci

Commentaire de cyirc le 15/03/2007 19:39:26

Imposible de télécharger ASPSmart. Es ce que quelqu'un peut le metre sur son site web svp.

Commentaire de Daft Dwarf le 16/07/2007 11:43:28

Bonjour à tous!
Voilà j'essaye d'utiliser AspSmart mais je rencontre une difficulté, en remlaçant le champs texte par un champs file et en enregistrant le résultat dans un champ hidden, j'arrive à récupérer la bonne adresse physique de l'image à uploader (qui se trouve sur mon disque dur). Le problème, c'est qu'il ne trouve pas le fichier, il m'affiche une erreur "File Not Found error 1030".
Je pense que c'est parce que le "oSmartImg.openFile cstr(strPictureName)" s'effectue à partir du répertoire où se trouve le fichier upload.asp
Quelqu'un peut-il me dire comment faire pour que l'OpenFile cherche sur mon disque dur et non dans son répertoire svp? Parce que j'ai cherché de longues heures sur internet et je ne trouve pas de solution à mon problème.
Merci d'avance.

Commentaire de batssakuru le 11/09/2007 10:27:51

--> Cyirc

http://www.codigofonte.com.br/download/componentes/asp/aspsmartupload

Commentaire de hafsamir32 le 05/03/2010 12:17:48

Bonjour,

Mon but est d'interdir d'uploader des fichiers comme "exe, bat, ...",. Pour cela, j'ai insrérer les deux codes suivants :

MonUPLOAD.AllowedFilesList = "jpg,jpeg,gif,png" ' (ici : images uniquement)
MonUPLOAD.DeniedFilesList = "bat,exe,com,asp,php,pdf,txt,doc,xls"

Résultat : Ca marche pas, les fichiers de type : "exe, ..." peuvent toujours être uploader !

Merci

Ajouter un commentaire

Discussions en rapport avec ce code source dans le forum

upload + verification [ par bebe.vodka ] salut!voila, en fait j'utilise le composant aspSmartUpload dans un programme pour l'upload de fichiers. je verifie aussi si mon fichier existe deja su problème d'upload [ par legoland ] Salut à tous,J'utilise AspSmartUpload et lorsque j'uploade mon fichier sur le serveur sof que le fichier créé pèse 1ko et ne peux pas être lu. Pourtan upload d'un fichier sans composant ni formulaire [ par Jarodnet ] Hello !je recherche le moyen d'uploader un fichier en ASP (VBScript).Dans mon code, dans un premier temps, je parcours le répertoire partagé donné par upload sans composant erreur [ par Florynth ] Bonjour, je me sers du upload sans composant de nix pour envoyer un fichier sur le serveur... Ça marche bien mais pas si le fichier et plus gros (et renommer un fichier lors d'un upload avec AspSmartUpload [ par aymdeb ] Bonjour, J'uploade des fichiers avec AspSmartUpload. J'aimerai renommer tous les fichiers pour être sûr qu'il écrase rien?Comment faire Upload fichier [ par ProphetKy ] Bonjour à tous,je voudrais faire un beau module d'upload de fichier vers le serveur.Mais je n'arrive pas à rendre certaines actions de l'uti Upload Fichier [ par yanis7518 ] SalutCommetn faire pour uploader un fichier depuis un emplacement sur un disque dur vers mon seveur web???merci Probleme upload de gros fichiers [ par naej94 ] Salut à tous, Je dévellope actuellement une application de transfert de fichier pour la boite ou je travail en C#/aspx , j'ai d'abord tout codé en loc envoyer un fichier xml avec requete http post [ par IslandMan974 ] bonjour,Voila je voudrais savoir comment envoyer un fichier xml en utilisant une methode http post.Je desire realiser une Form avec un input file pour Attente pendant l'upload d'une fichier [ par adrixx ] Que faire pour faire patientez l'utilisateur pendant l'upload d'un fichierJe voudrais savoir également ce qu'il faut installer sur mon poste pour qu'A

Nos sponsors

Derniers Blogs

CSS CONTENT STATE SELECTORS (PERSONNAL DRAFT) par FREMYCOMPANY

MBA : POURQUOI FAIRE ET COMMENT LE CHOISIR ? par ROMELARD Fabrice

Y'A DES ERREURS QUI PEUVENT RENDRE LE DéVELOPPEUR VIOLENT par Aleks

[HYPER-V 3] PRéSENTATION DES COMMANDLETS POWERSHELL par Pierrick CATRO-BROUILLET

IIS7 - COMPRESSION GZIP par cyril

Forum

RE : COORDONNéES SOURIS par Megafan

SCRIPT par nadialadypower

DEMANDE D'INFOS SUR LE REFERENCEMENT, LA PUB POUR LES SITES DYNAMIQUES par Picou972

COORDONNéES SOURIS par babe59

INSTALLATION DU SERVEUR OBIEE par xx07pedro

Côté IT

Offres d'emploi

Formations Video

Appels d'offres

Cherche referenceur astucieux
Budget : 1 500€
Recherche expert advisor sous mql4 hedging
Budget : 200€
Creation boutique en ligne iphone- android - Republication.
Budget : 4 000€

Logiciels

Easy-Planning (1.0.0.1)
EASY-PLANNING (1.0.0.1)

Basé sur les mêmes principes que MyPlanning, Easy-Planning permet de créer des plannings sous la ...

Cliquez pour télécharger Easy-Planning
Academy System (17.1.3.0)
ACADEMY SYSTEM (17.1.3.0)

Logiciel de gestion des établissements. - élèves/étudiants (inscription, dossier, absence...) -...

Cliquez pour télécharger Academy System
COLLECTOR PLUS (3.00B)
COLLECTOR PLUS (3.00B)

COLLECTOR PLUS version 3.00B est un logiciel utilisant une base de données alimentée par : - L...

Cliquez pour télécharger COLLECTOR PLUS
PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO (V7.4)
PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO (V7.4)

PONAMEDIA TV DEVIENS HELLLOOO FLASH LA TV SUR VOTRE ORDINATEUR. Toute une plateforme Multi...

Cliquez pour télécharger PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO
LettresFaciles 2011 (8.0.0.1)
LETTRESFACILES 2011 (8.0.0.1)

LettresFaciles est un logiciel facilitant la création et la rédaction de lettres types. Son inte...

Cliquez pour télécharger LettresFaciles 2011