ASP网页设计保留远程图片函数修正正版
SQLServer是基于服务器端的中型的数据库,可以适合大容量数据的应用,在功能上管理上也要比Access要强得多。在处理海量数据的效率,后台开发的灵活性,可扩展性等方面强大。函数趁明天有空,修改了一下这个函数,经测试,在当地服务器经由过程,在空间商服务器也可一般利用,没发明毛病。我的卡巴斯基不报毒了。^_^只需修正一下,这个函数是放在哪一个网站都合用的。在此只与增加图片为例申明一下挪用办法,别的地位办法相似。
在我本机测试乐成,因为如今连不上空间的FTP,以是无办在空间上测试,发明成绩请到群中提出。
1、把上面函数放到Ft_admin_conn.asp的最初
==================================
=函数名:saveimgfile
=功能:保留远程图片
=参数申明:imgfileurl--远程图片地点
=修正日期:2006-4-1913:20
=程序凉风
=网站:http://www.4fnet.com.cn
==================================
functionsaveimgfile(imgfileurl)
dimimg_type,savepath,imgfiletype,flag,imgbody
savepath="../FUploadFile/"&year(now())&"-"&month(now())
flag=false
imgfiletype=right(imgfileurl,4)猎取远程图片的格局
img_type=".gif|.bmp|.jpg|.png"设置同意保留在当地的图片格局
typeArr=split(img_type,"|")
fori=0toubound(typeArr)-1
ifimgfiletype=typeArr(i)then
flag=true
exitfor
endif
next
ifflag=falsethen假如不是同意保留到当地的图片格局,则只毗连远程图片
saveimgfile=imgfileurl
else
setxml_http=server.createobject("microsoft.xmlhttp")
xml_http.open"get",imgfileurl,false
xml_http.send
imgbody=xml_http.responsebody
setxml_http=nothing
serverpath=server.mappath(savepath)
setfilefolder=server.createobject("scripting.filesystemobject")
iffilefolder.folderexists(serverpath)=falsethen
filefolder.createfolder(serverpath)
endif
randomize
savepath=savepath&"/"&year(now())&month(now())&day(now())&hour(now())&minute(now())&int(10*rnd)&imgfiletype
setadodbs=server.createobject("adodb.stream")
adodbs.open
adodbs.type=1
adodbs.writeimgbody
adodbs.savetofile(server.mappath(savepath))保留到当地
adodbs.seteos
setadodbs=nothing
iffilefolder.fileexists(server.mappath(savepath))=falsethen假如保留乐成,即前往远程地点,只作远程毗连,制止一些防盗连网站不克不及保留
saveimgfile=imgfileurl
else
savepath=replace(savepath,"../","")
saveimgfile=savepath
endif
setfilefolder=nothing
endif
endfunction
2、翻开admin/admin_pic.asp文件
1、找到:增加图片过程当中的 pic_pic=checksql("缩略图片地点",request.form("pic"),1,100) (也许在第368行)鄙人面拔出代码:
ifleft(pic_url,7)="http://"andrequest.form("save")="true"then
pic_url=saveimgfile(pic_url)
pic_pic=pic_url
endif
再找到:<inputtype="submit"name="Submit"value="断定新增"> (也许在第481行)拔出以下代码:
<inputtype="checkbox"name="save"value="true">同时保留远程图片
2、在编纂图片历程(editpic)中的不异中央增加响应的代码便可。
ok,竣工
但愿人人能举一前往,别的用到图片的中央也是一样的挪用办法。
接待到临本站:http://www.4fnet.com.cn因为ASP脚本语言非常简单,因此其代码也简单易懂,结合HTML代码,可快速地完成网站的应用程序。还无法完全实现一些企业级的功能:完全的集群、负载均横。 我可以结合自己的经验大致给你说一说,希望对你有所帮助,少走些弯路。 以上是语言本身的弱点,在功能方面ASP同样存在问题,第一是功能太弱,一些底层操作只能通过组件来完成,在这点上是远远比不上PHP/JSP,其次就是缺乏完善的纠错/调试功能,这点上ASP/PHP/JSP差不多。 那么,ASP.Net有哪些改进呢? 封装性使得代码逻辑清晰,易于管理,并且应用到ASP.Net上就可以使业务逻辑和Html页面分离,这样无论页面原型如何改变,业务逻辑代码都不必做任何改动;继承性和多态性使得代码的可重用性大大提高。 我就感觉到ASP和一些常用的数据库编程以及软件工程方面的思想是非常重要的。我现在也在尝试自己做网页,这其中就用到了ASP,我想它的作用是可想而知的。 还有如何才能在最短的时间内学完?我每天可以有效学习2小时,双休日4小时。 运用经典的例子。并且自己可以用他来实现一些简单的系统。如果可以对他进行进一步的修改,找出你觉得可以提高性能的地方,加上自己的设计,那就更上一个层次了,也就会真正地感到有所收获。
页:
[1]