若天明 发表于 2015-1-16 22:13:00

ASP网站制作之ASP无组件上传图片的源代码

ASP在国内异常流行,因为国内大多使用的是盗版的Windows和盗版的SQLServer,而ASP+COM+SQLServer实际上也是一种不错的搭配,其性能也不输于PHP+MYSQL,特别是Windows系统和SQLServer都有图形界面,比APACHE和MYSQL易于维护,因此对于不重视知识产权的国家来说也是一种不错的选择。上传|上传图片|无组件|源代码<!--#includefile="upload_5xsoft.inc"-->
<%
Setconn=Server.CreateObject("Adodb.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;DataSource="&Server.MapPath("db.mdb")
conn.openconnstr
----------------------------------------
functiongetextendname(filename)
extname=lcase(filename)
extname=right(extname,3)
extname=right(extname,3-instr(extname,"."))
getextendname=extname
endfunction
---------------------------------------------------
-------------------------------------------------------
functionfilename()
filename=now()
filename=replace(filename,"-","")
filename=replace(filename,":","")
filename=replace(filename,"","")
filename=filename
endfunction
----------------------------------------------------------
-------------------------------------------------------------------
setupload=newupload_5xsoft
setupfile=upload.file("files")
title=upload.form("t1")
info=upload.form("t2")
ifupfile.filesize>0andupfile.filename""then
ifinstr("jpg,bmp,gif",getextendname(upfile.filename))>0then
ifupfile.filesize<204800then
fname=filename&"."&getextendname(upfile.filename)
upfile.saveasserver.mappath("pic/"&fname)

sql="insertintoimg(title,info,imgpath)values("+title+","+info+","+fname+")"
conn.Executesql
conn.close
response.write"<script>alert(增加图片乐成!);top.location.href=index.asp;</script>"
else
response.write"<scriptlanguage=javascript>alert(文件上传失利,巨细凌驾了200K!);history.back();</script>"
endif
else
response.write"<scriptlanguage=javascript>alert(文件上传失利,其不为图片格局!);history.back();</script>"
endif
endif
--------------------------------------------------------
帮助用户快速实现各种应用服务,ASP商有整合各方面资源的能力,可在短期内为用户提供所需的解决方案。例如,典型的ERP安装,如果要在客户端安装的话需要半年到二年的时间,但是美国的一些ASP商如USI和CORIO能在90—120天内提供ERP应用方案。

简单生活 发表于 2015-1-18 23:18:47

Server:这个表示的服务器,操作服务器的一些东西使用这个,如Server.Mappath转换服务器路径,Server.CreateObject实例化一个组件

冷月葬花魂 发表于 2015-1-27 16:14:15

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

老尸 发表于 2015-2-5 12:08:36

你可以通过继承已有的对象最大限度保护你以前的投资。并且C#和C++、Java一样提供了完善的调试/纠错体系。

乐观 发表于 2015-2-11 18:10:02

不能只是将它停留在纸上谈兵的程度上。

admin 发表于 2015-3-2 17:54:03

Request:从字面上讲就是“请求”,因此这个是处理客户端提交的东东的,例如Resuest.Form,Request.QueryString,或者干脆Request("变量名")

透明 发表于 2015-3-11 05:01:15

我们必须明确一个大方向,不要只是停留在因为学而去学,我们应有方向应有目标.

金色的骷髅 发表于 2015-3-17 21:08:32

ASP.Net摆脱了以前ASP使用脚本语言来编程的缺点,理论上可以使用任何编程语言包括C++,VB,JS等等,当然,最合适的编程语言还是MS为.NetFrmaework专门推出的C(读csharp),它可以看作是VC和Java的混合体吧。

愤怒的大鸟 发表于 2015-3-25 02:57:34

多看多学多思。多看一些关于ASP的书籍,一方面可以扩展知识面一方面可以鉴借别人是如何掌握、运用ASP的;多学善于关注别人,向同学老师多多学习,不论知识的大小;多思则是要将学到的知识灵活运用。
页: [1]
查看完整版本: ASP网站制作之ASP无组件上传图片的源代码