仓酷云

标题: ASP教程之在webclass中利用文件上传功效 [打印本页]

作者: 只想知道 时间: 2015-1-16 22:58
标题: ASP教程之在webclass中利用文件上传功能
ASP一般认为只能运行在IIS上，正如前面所提到的，这并不是十分正确，事实上，ASP也能运行在Apache上。ApacheASP可在任意Apache服务器上运行有限的ASP功能，所需做的，只需打开mod_perl。web|上传在webclass中利用文件上传功效

webclass实例：http://www.shinco.com/jjx/wcnews/news.asp
很多文件上传组件其实不能在vb中一般利用，我测试了chinaaspfileup,aspSmartupload,aspuploadenterprise,inotesupload等组件，均不克不及正
常利用。其次要缘故原由，是由于在vb中没有促发组件的OnStartPage历程。我们没法改写这些组件，以是要本人编码来办理这个成绩，记得之前有网友谈过这个成绩，但没有代码贴出来。
实在之前chinaasp上有个编写web体例上载文件的组件的贴子(我一下找不了，这是我转贴的地点http://www.shinco.com/jjx/activeubb/NewsDetail.asp?id=134,略微改写一下就可以在webclass中利用了

将原onstartpage历程改成
PublicSubOnStartPage(PassedRequestAsRequest)

------------------界说部分变量----------------------
DimvarByteCount
Dimi
---------------------------------------------------

------------------创建ASP工具-----------------------
SetMyRequest=PassedRequest
---------------------------------------------------

------------------读取客户端传来的全体数据-----------
varByteCount=MyRequest.TotalBytes
lngArrayLen=varByteCount-1
ReDimbinArray(varByteCount-1)
binArray=MyRequest.BinaryRead(varByteCount)
---------------------------------------------------

--------------------猎取定界符---------------------
intDjfLen=0
DoUntilbinArray(intDjfLen+1)=13
intDjfLen=intDjfLen+1
Loop
ReDimbinDjf(intDjfLen)
Fori=0TointDjfLen
binDjf(i)=binArray(i)
Next
---------------------------------------------------
EndSub

在webclass中利用

dimuploadasnewuploadfile
upload.onstartpage(request)

然后就能够用该类供应的办法了举行操纵了，这个组件的功效比chinaaspupload要差些。但已充足利用了

其他修改

1、为了能用getthevalue办法准确获得inputtype为checkbox,radio等的值，在

FindtheName中到场毛病处置
PrivateFunctionFindTheName(nmAsString)AsLong
OnErrorGoToFindTheNameError
******************************参数申明*****************************
**
*nm:要寻觅的Form元素名*
*前往值：乐成――找到时的地点，失利――-1*
**
*******************************************************************

------------------界说部分变量----------------------
DimsAsLong
DimeAsLong
DimiAsLong

DimbinTmp()AsByte
DimstrNameAsString
---------------------------------------------------

------------------寻觅要获得值的Form元素名------------------------
s=0
DoWhile1
s=FindTheDjf(s)
Ifs-1Then
s=s+intDjfLen+41
e=s
DoWhilebinArray(e+1)34
e=e+1
Loop
ReDimbinTmp(e-s)
Fori=sToe
binTmp(i-s)=binArray(i)
Next
strName=StrConv(binTmp,64)
IfStrComp(nm,strName)=0Then
FindTheName=e+1
ExitDo
EndIf
Else
FindTheName=-1
ExitDo
EndIf
Loop
--------------------------------------------------------------
ExitFunction
FindTheNameError:
FindTheName=-1

EndFunction

2、删除类声明中的
PrivateMyScriptingContextAsScriptingContext界说

</p>缺点:安全性不是太差了，还行，只要你充分利用系统自带的工具;唯一缺点就是执行效率慢，如何进行网站优化以后，效果会比较好。

作者: 分手快乐 时间: 2015-1-20 06:51
以HTML语言整合(HTML负责界面上，ASP则负责功能上)形成一个B/S(浏览器/服务器)模式的网页程序。

作者: 愤怒的大鸟 时间: 2015-1-28 22:48
ASP.Net和ASP的最大区别在于编程思维的转换，而不仅仅在于功能的增强。ASP使用VBS/JS这样的脚本语言混合html来编程，而那些脚本语言属于弱类型、面向结构的编程语言，而非面向对象，这就明显产生以下几个问题：

作者: 若天明 时间: 2015-1-30 13:11
下载一个源代码，然后再下载一个VBScript帮助，在源代码中遇到不认识的函数或是其他什么程序，都可以查帮助进行解决，这样学习效率很高。

作者: 简单生活 时间: 2015-1-30 17:29
掌握asp的特性而且一定要知道为什么。

作者: 深爱那片海 时间: 2015-2-2 22:06
还有如何才能在最短的时间内学完?我每天可以有效学习2小时，双休日4小时。

作者: 小魔女 时间: 2015-2-8 10:30
下面简单介绍一下我学习ASP的方法,希望对想学习ASP的朋友有所帮助...

作者: 变相怪杰 时间: 2015-2-25 09:10
兴趣爱好，那么你无须学编程，申请一个域名和空间，在网上下载一些免费开源的CMS系统，你不用改代码，只须熟悉它们的后台操作，像office一样简单方便，很快就能建一个站点，很多站长都是这样做的

作者: 再见西城 时间: 2015-3-15 11:53
还有如何才能在最短的时间内学完?我每天可以有效学习2小时，双休日4小时。

作者: 莫相离 时间: 2015-3-22 00:20
那么，ASP.Net有哪些改进呢？

欢迎光临仓酷云 (http://ckuyun.com/)