保存远程图片到本地文件夹！

最新推荐文章于 2023-03-10 16:52:22 发布

清，纯一色

最新推荐文章于 2023-03-10 16:52:22 发布

阅读量159

点赞数

CC 4.0 BY-SA版权

原文链接：http://www.cnblogs.com/lyz8/p/3970024.html

本文介绍了一段使用 ASP 代码实现从指定 URL 下载图片并保存到服务器的方法。通过生成包含日期和随机数的唯一文件名来避免文件冲突，并详细展示了如何利用 Microsoft XML HTTP 请求对象获取图片内容并将其保存到本地。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

<%
Function saveimg(url)
	savepath="upload"
	temp=split(url,".")
	'以下是用时间与随机数重命名文件名
	randomize
	ranNum=int(90000*rnd)+10000'随机数
	filename=year(now)&month(now)&day(now)&hour(now)&minute(now)&second(now)&ranNum&"."&temp(ubound(temp))'时间与随机数组合命名图片名称
	set xmlhttp=server.createobject("Microsoft.XMLHTTP")
	xmlhttp.open "get",url,false
	xmlhttp.send
	img=xmlhttp.ResponseBody
	set xmlhttp=nothing
	set objAdostream=server.createobject("ADODB.Stream")
	objAdostream.Open()
	objAdostream.type=1
	objAdostream.Write(img)
	objAdostream.SaveToFile(server.mappath(savepath&"\"&filename))
	objAdostream.SetEOS
	set objAdostream=nothing
	saveimg=filename
End Function
%>

<%
call saveimg("http://www.baidu.com/img/bd_logo1.png")
%>

转载于:https://www.cnblogs.com/lyz8/p/3970024.html