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文件
１、找到：增加图片过程当中的　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">同时保留远程图片

２、在编纂图片历程（editpic）中的不异中央增加响应的代码便可。

ok，竣工

但愿人人能举一前往，别的用到图片的中央也是一样的挪用办法。

接待到临本站：http://www.4fnet.com.cn因为ASP脚本语言非常简单，因此其代码也简单易懂，结合HTML代码，可快速地完成网站的应用程序。还无法完全实现一些企业级的功能：完全的集群、负载均横。

运用经典的例子。并且自己可以用他来实现一些简单的系统。如果可以对他进行进一步的修改，找出你觉得可以提高性能的地方，加上自己的设计，那就更上一个层次了，也就会真正地感到有所收获。

还有如何才能在最短的时间内学完?我每天可以有效学习2小时，双休日4小时。

我就感觉到ASP和一些常用的数据库编程以及软件工程方面的思想是非常重要的。我现在也在尝试自己做网页，这其中就用到了ASP，我想它的作用是可想而知的。

封装性使得代码逻辑清晰，易于管理，并且应用到ASP.Net上就可以使业务逻辑和Html页面分离，这样无论页面原型如何改变，业务逻辑代码都不必做任何改动；继承性和多态性使得代码的可重用性大大提高。

那么，ASP.Net有哪些改进呢？

以上是语言本身的弱点，在功能方面ASP同样存在问题，第一是功能太弱，一些底层操作只能通过组件来完成，在这点上是远远比不上PHP/JSP，其次就是缺乏完善的纠错/调试功能，这点上ASP/PHP/JSP差不多。

我可以结合自己的经验大致给你说一说，希望对你有所帮助，少走些弯路。