欢迎加入EUCMS官方QQ交流群,与更多EUCMS用户一起讨论,共同发财!

QQ群:1222386
> 资讯中心 >> 建站技术 >>正文
ASP无刷新AJAX上传代码示例
2021-07-17 562 收藏

特别提示:本代码引用了化境ASP无组件代码

前端JS部分:

function upload(id){
                $("#imgWait"+id+"").show();
                var formData = new FormData();
                formData.append("file", document.getElementById("file"+id+"").files[0]);
                //通过formData提交数据
                $.ajax({
                    url: "upload.asp",
                    type: "POST",
                    data: formData,
                    contentType: false,
                    processData: false,
                    success: function (data) {
						if(data.indexOf("usualtooltrue") >= 0 ) {
							var datas = data.split('usualtooltrue');
							$("#list"+id+"").val(datas[1]);
                            alert("上传成功!");
                        }else{
                        alert("上传失败!");
                        }
                        $("#imgWait"+id+"").hide();
                    },
                    error: function () {
                        alert("上传失败!");
                        $("#imgWait"+id+"").hide();
                    }
                });
            }

后端部分:

Public Function CheckAndCreateFolder(FolderName)
set fso=server.createobject("scripting.filesystemobject")
if fso.fileexists(server.mappath(FolderName)) then
CheckAndCreateFolder="yes"
else
CheckAndCreateFolder="no"
end if
set fso=Nothing
End Function
filepath="upload/"
set upload=new upload_5xsoft'此处引用化境无组件上传
set file=upload.file("file")
if file.FileSize<>0 then
  fn=year(now)&month(now)&day(now)&hour(now)&minute(now)&second(now)&"."&file.FileExt
  file.saveas server.MapPath(filepath&fn)
If CheckAndCreateFolder(filepath&fn)="yes" then
 response.Write"usualtooltrue"&filepath&fn&""
 Else
 response.Write"usualtoolerror"
 End If 
else
  response.Write"usualtoolerror"
end If

 

你觉得这篇文章怎么样?

1 0
参与讨论
请自觉遵守互联网相关的政策法规,严禁发布色情、暴力、反动的言论。
成品站
购买流程
  • 注册会员
  • 选择网站模板
  • 免费开通试用
  • 自助绑定域名
  • 付款转正
  • 提交备案
  • 域名生效
  • 网站正式上线
  • 分站:
    扫描关注微信

    扫描加微信

    13852154923

    0516-66628816

    工作日 9:00-12:00 13:30-18:00
    周六及部分节假日提供值班服务
    2186398
    群:1222386
    做网站徐州网架厂家
    Copyright@2003-2024 徐州亿优网架钢结构工程有限公司版权所有 Powered by EUCMS-v6.3 | 网站地图 苏ICP备19019550号 苏公网安备32030202000952号