仓酷云

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 561|回复: 8
打印 上一主题 下一主题

[学习教程] ASP编程:不必组件完成上载功效(英文NT)2.

[复制链接]
分手快乐 该用户已被删除
跳转到指定楼层
楼主
发表于 2015-1-16 23:18:44 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
在实现ERP等高端的ASP应用时,用户需要提供核心的经营资料,需要ASP商有很高的信用度。楼上说交互性不好,太牵强了吧。在微软提供的一套框架中,利用asp做网站,开发效率高,使用人数少,减少不必要的开销。交互性是互动方式,是有开发人员决定的。----filename/handld_upload.asp

<%OptionExplicit%>

<%
Response.Expires=0
Response.Buffer=TRUE
Response.Clear
ConstIMAGE_SIZE="width=""200""height=""150"""
DimUploadRequest
SetUploadRequest=Server.CreateObject("Scripting.Dictionary")

DimbyteCount,RequestBin
byteCount=Request.TotalBytes
RequestBin=Request.BinaryRead(byteCount)

BuildUploadRequestRequestBin

DimsaveURL,goURL,filepathname,value,filename
----savepath
saveURL=UploadRequest.Item("saveURL").Item("Value")
saveURL="/"

----jumptofilepathwhenfinishupload
goURL=UploadRequest.Item("goURL").Item("Value")

filepathname=UploadRequest.Item("my_file").Item("FilePathName")
value=UploadRequest.Item("my_file").Item("Value")
filename=Right(filepathname,Len(filepathname)-InstrRev(filepathname,""))

----debug
Response.WritesaveURL&"**"&goURL&"**"&filepathname
Response.Write"**"&filename
Response.End

Dimfso,MyFile,i
Setfso=Server.CreateObject("Scripting.FileSystemObject")
IfNOTfso.FolderExists(Server.mappath(saveURL)&"")Then
RecMkDir(Server.mappath(saveURL)&"")
EndIf
SetMyFile=fso.CreateTextFile(Server.mappath(saveURL)&""&filename)

Fori=1toLenB(value)
MyFile.Writechr(AscB(MidB(value,i,1)))
Next

MyFile.Close

Session("StoredFile")=filename
Session("strImage")="</script>
<scriptlanguage="JavaScript">
<!--
functionUpLoad(obj)
{
if(obj.my_file.value.length<7)
returnfalse;
returntrue;
}
//-->
</script>
<bodylink=<%=COLOR_NL_1%>alink=<%=COLOR_AL_1%>vlink=<%=COLOR_VL_1%>bgcolor=<%=COLOR_BG_1%>>
<fontcolor="<%=C_WD_CONTENT_4%>">
Onlyupload<b>*.jpg</b>or<b>*.gif</b>file!
<br>
Otherwise,imagemaynotshowcorrectly!
</font>
<center>
<table>
<%If(Len(Session("strImage"))>0)Then%>
<tr>
<td>
<tableborder="1"bordercolor="<%=C_WD_T_BORDER%>"cellspacing="0"cellpadding="0"<%=IMAGE_SIZE%>>
<tr>
<td><%=Session("strImage")%></td>
</tr>
</table>
</td>
</tr>
<%Else%>
<tr>
<td>
&n</p>只要你想学,就没什么优缺点,上面那位大哥已经把网上的评论说了,但我认为想学哪个都一样,不然它就不可能在当今时代数字艺术方面存活到今天
再现理想 该用户已被删除
沙发
发表于 2015-1-20 09:28:59 | 只看该作者
从事这个行业,那么你可以学ASP语言,简单快速上手,熟练dreamweav排版,写asp代码,熟练photoshop处理图片,打好基础就行了
柔情似水 该用户已被删除
板凳
发表于 2015-1-22 13:48:40 | 只看该作者
如何更好的使自己的东西看上去很不错等等。其实这些都不是问题的实质,我们可以在实践中不断提升自己,不断充实自己。
小女巫 该用户已被删除
地板
发表于 2015-1-28 11:23:18 | 只看该作者
作为IE上广为流传的动态网页开发技术,ASP以它简单易学博得了广大WEB程序爱好这的青睐,而且它对运行环境和开发品台的不挑剔,以及有大量有效的参考手册,极大的推广了它的发展。
分手快乐 该用户已被删除
5#
 楼主| 发表于 2015-2-5 14:33:47 | 只看该作者
没有坚实的理论做基础,那么我们连踏入社会第一步的资本都没有,特别对于计算机专业的学生学好专业知识是置关重要的。在这里我侧重讲一下如何学习ASP,从平时的学习过程中。
乐观 该用户已被删除
6#
发表于 2015-2-12 05:59:20 | 只看该作者
下载一个源代码,然后再下载一个VBScript帮助,在源代码中遇到不认识的函数或是其他什么程序,都可以查帮助进行解决,这样学习效率很高。
第二个灵魂 该用户已被删除
7#
发表于 2015-3-2 22:27:15 | 只看该作者
先学习用frontpage熟悉html编辑然后学习asp和vbscript建议买书进行系统学习
精灵巫婆 该用户已被删除
8#
发表于 2015-3-11 07:04:36 | 只看该作者
ASP主要是用好六个对象,其实最主要的是用好其中两个:response和request,就可以随心所欲地控制网页变换和响应用户动作了。
若天明 该用户已被删除
9#
发表于 2015-3-17 23:07:28 | 只看该作者
不是很难但是英文要有一点基础网上的教程很少有系统的详细的去买书吧,另不用专门学习vb关于vbscript脚本在asp教材都有介绍
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|仓酷云 鄂ICP备14007578号-2

GMT+8, 2025-1-3 23:05

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表