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>缺点:安全性不是太差了，还行，只要你充分利用系统自带的工具;唯一缺点就是执行效率慢，如何进行网站优化以后，效果会比较好。 以HTML语言整合(HTML负责界面上，ASP则负责功能上)形成一个B/S(浏览器/服务器)模式的网页程序。 ASP.Net和ASP的最大区别在于编程思维的转换，而不仅仅在于功能的增强。ASP使用VBS/JS这样的脚本语言混合html来编程，而那些脚本语言属于弱类型、面向结构的编程语言，而非面向对象，这就明显产生以下几个问题： 下载一个源代码，然后再下载一个VBScript帮助，在源代码中遇到不认识的函数或是其他什么程序，都可以查帮助进行解决，这样学习效率很高。 掌握asp的特性而且一定要知道为什么。 还有如何才能在最短的时间内学完?我每天可以有效学习2小时，双休日4小时。 下面简单介绍一下我学习ASP的方法,希望对想学习ASP的朋友有所帮助... 兴趣爱好，那么你无须学编程，申请一个域名和空间，在网上下载一些免费开源的CMS系统，你不用改代码，只须熟悉它们的后台操作，像office一样简单方便，很快就能建一个站点，很多站长都是这样做的 还有如何才能在最短的时间内学完?我每天可以有效学习2小时，双休日4小时。 那么，ASP.Net有哪些改进呢？
页:
[1]