|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
asp对于服务器的要求较高,一般的服务器如果访问量一大就垮了,不得不重启。ado|stream|对象 <%
’*************************************************************
’转发时请保存此声明信息,这段声明不并会影响你的速度!
’*************************************************************
’*************************************************************
’@author: 面条
’@realname: 徐仁禄
’@email: xurenlu@sohu.com
’@QQ: 55547082
’@Homepage: http://www.ksdn.net
’@版权声名:
’ 非盈利性质整体或团体可以避免费利用.
’*************************************************************
’*************************************************************
’ 类称号: files
’ 类功效: 完成文件读写功效,使用adodb.stream完成,在不撑持fso的主机上也能够读写文件.
’*************************************************************
class files
private adSaveCreateOverWrite ’创立文件的时分可以掩盖已存在的文件.
private adSaveCreateNotExist ’保留文件的时分假如文件不存在,可以创立文件.
’*************************************************************
’ 事务称号: Class_Initialize()
’ 事务产生前提: 类创立时分发生该事务
’ 事务内容: 给公有变量赋值
’ 事务传入参数: 无
’*************************************************************
sub Class_Initialize()
adSaveCreateOverWrite =2
adSaveCreateNotExist = 1
end sub
’*************************************************************
’ 函数称号: function readfile(filepath)
’ 函数内容: 读出文件
’ 传入参数: filepath:要读的文件的相对途径
’ 前往参数: 要读的文件的内容.
’*************************************************************
function readfile(filepath)
on error resume next
dim stm2
set stm2 =server.createobject("ADODB.Stream")
stm2.Charset = "gb2312"
stm2.Open
stm2.LoadFromFile filepath
readfile = stm2.ReadText
end function
’***************************************</p> 楼上说交互性不好,太牵强了吧。在微软提供的一套框架中,利用asp做网站,开发效率高,使用人数少,减少不必要的开销。交互性是互动方式,是有开发人员决定的。 |
|