ASPupload上传组件下载_course

ASPupload上传组件，上传图片、文档必备的组件。好用快捷！ 相关下载链接：//download.csdn.net/download/qq_21944093/9018643?utm_source=

AspUpload asp上传组件下载_course

很好用的 很真实的 希望各位不要拍砖 我好不容易找到的呢分享给大家 顺便换点分来 相关下载链接：//download.csdn.net/download/baibaip/3287552?utm_sou

AspUpload，asp上传组件下载_course

AspUpload ASP上传组件，非常方便，轻巧 相关下载链接：//download.csdn.net/download/fsh0328/2810629?utm_source=bbsseo

谁用过ASPUPLOAD组件啊？？？？请教一下，急急！！！_course

我想实现ASP上传文件，有网友介绍了ASPUPLOAD这个组件，但我想请问一下，那是不是我的网站的服务器一定要支持这个组件才可以啊！！还是只要拷贝DLL文件上去就可以了

ASP无组件上传怎样命名为原文件名+随机数啊_course

<%@LANGUAGE="VBSCRIPT"%> <%Response.buffer=True%> <!--#include file="Connections/conn2.asp" --> <!--==========================================--> <!--#include file="inc/upload.asp"--> <!--==========================================--> <% Dim MM_editAction MM_editAction = CStr(Request.ServerVariables("SCRIPT_NAME")) If (Request.QueryString <> "") Then MM_editAction = MM_editAction & "?" & Server.HTMLEncode(Request.QueryString) End If ' boolean to abort record edit Dim MM_abortEdit MM_abortEdit = false '==================================================== Dim objUpload,objFile,strPicPath,intRandom,strFileExt Set objUpload = new upload_file If (CStr(objUpload.oForm("MM_insert")) = "form1") Then If (Not MM_abortEdit) Then Set objFile = objUpload.File("attachment") If objFile.FileSize > 0 Then randomize Timer intRandom = int(90000 * rnd) + 10000 strFileExt = Lcase(objFile.FileExt) strPicPath =year(now)&month(now)&day(now)&intRandom&"."&strFileExt objFile.SaveToFile Server.MapPath("/upload/" & strPicPath) else strPicPath="" end if '=================================================================================== 下面是ＵＰＬＯＡＤ.ASP的代码 <!--#include file="AienUpload/UpLoad_Class.asp"--> <% on error resume next Server.ScriptTimeout = 9999999 Dim Upload,successful,thisFile,allFiles,upPath,path set Upload=new AnUpLoad Upload.openProcesser=true '打开进度条显示 Upload.SingleSize=clng(500 * 1024)*1024 '设置单个文件最大上传限制,按字节计；默认为不限制，本例为512M Upload.MaxSize=clng(500 * 1024)*1024 '设置最大上传限制,按字节计；默认为不限制，本例为1G Upload.Exe="rar|jpg|bmp|gif|iso|zip|txt|doc|docx|xls|xlsx" '设置允许上传的扩展名 Upload.GetData() if Upload.ErrorID>0 then upload.setApp "faild",1,0 ,Upload.description else if Upload.files(-1).count>0 then dim str for each file in Upload.files(-1) upPath=request.querystring("path") path=server.mappath(upPath) set tempCls=Upload.files(file) upload.setApp "saving",Upload.TotalSize,Upload.TotalSize,tempCls.FileName successful=tempCls.SaveToFile(path,1) thisFile="{name:'" & tempCls.FileName & "',size:" & tempCls.Size & "}" allFiles=allFiles & thisFile & "," set tempCls=nothing next upload.setApp "saved",Upload.TotalSize,Upload.TotalSize,mid(allFiles,1,len(allFiles)-1) else upload.setApp "faild",1,0,"没有上传任何文件" end if end if if err then upload.setApp "faild",1,0,err.description set Upload=nothing %> 目前的命名方式是日期+随机数，我想要实现的是原名+日期+随机数，请高手帮着改下啊

不支持 Aspupload3.0组件 上传，服务器可能未安装该组件(但我安装了aspUPload组件啦！！）问题解决！在线等！！！！！！！！！！！！！！_course

上传的时候提示：不支持 Aspupload3.0组件 上传，服务器可能未安装该组件 但以前都是好的也，组件也装了，如设为无组件上传，上传的时候也提示说没有安装上传组件！ 请教高手这是什么问题！！！！！

谁能告诉我asp中上传组件是如何实现上传的？？？_course

谁能告诉我asp中上传组件是如何实现上传的？？？ 最好有范列（vc++、delphi） 他不会是ftp方式吧。ftp方式的功能要强的多。而且服务器端也不需要装ftp server 端