J'ai le code suivant, mais mon soucis est que l'upload ne se passe pas du tout, et je ne parviens pas à trouver mon erreur :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17 On Error Resume Next Dim mySmartUpload Dim intCount Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload") mySmartUpload.AllowedFilesList = "htm,txt" DeniedFilesList can also be used : mySmartUpload.DeniedFilesList = "exe,bat,asp" mySmartUpload.DenyPhysicalPath = True mySmartUpload.MaxFileSize = 50000 mySmartUpload.TotalMaxFileSize = 200000 mySmartUpload.Upload intCount = mySmartUpload.Save("C:\") If Err Then Response.Write("<b>Wrong selection : </b>" & Err.description) Else Response.Write(intCount & " file(s) uploaded.") End If
Partager