|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
结论:和PHP一样,ASP简单而易于维护,很适合小型网站应用,通过DCOM和MTS技术,ASP甚至还可以完成小规模的企业应用,但ASP的致命缺点就是不支持跨平台的系统,在大型项目开发和维护上非常困难。这个是VB的代码,本人新建一个ActiveXDLL,然后改动工程称号和类称号,然后在类中输出以下内容便可。
//////////////////////////////
中文称号:INI文件操纵类
英文称号:Blood_INIClass
Blood
制造工夫:2002.2.8
版本:1.0
版权一切Blood2002-2003
//////////////////////////////
声名变量
PrivatestrAppNameAsStringINI大节称号
PrivatestrKeyNameAsStringINI项目名
PrivatestrValueStrAsStringINI的项目值
PrivatestrFileNameAsStringINI文件名
声名操纵INI文件的API
PrivateDeclareFunctionGetPrivateProfileStringLib"kernel32"Alias"GetPrivateProfileStringA"(ByVallpApplicationNameAsString,ByVallpKeyNameAsAny,ByVallpDefaultAsString,ByVallpReturnedStringAsString,ByValnSizeAsLong,ByVallpFileNameAsString)AsLong
PrivateDeclareFunctionWritePrivateProfileStringLib"kernel32"Alias"WritePrivateProfileStringA"(ByVallpApplicationNameAsString,ByVallpKeyNameAsAny,ByVallpStringAsString,ByVallpFileNameAsString)AsLong
////////////////////
入手下手界说函数
////////////////////
界说写INI文件的函数
PublicFunctionWriteINI()AsLong
经由过程API将值写进INI文件
WriteINI=WritePrivateProfileString(strAppName,strKeyName,strValueStr,strFileName)
EndFunction
界说读INI文件的函数
PublicFunctionGetINI()AsString
ConstSTRING_SIZE=255指定字符串长度
DimlngLengthAsLong界说API函数前往的长度
DimstrDefaultAsString*STRING_SIZE界说在没有找到指定的项目时前往的默许值
DimstrReturnAsString*STRING_SIZE界说一个字符串缓冲区
经由过程API函数获得INI文件的内容
lngLength=GetPrivateProfileString(strAppName,strKeyName,strDefault,strReturn,STRING_SIZE,strFileName)
经由过程判别API函数前往的长度来断定前往的值
If(lngLength=0)Then
GetINI=strValueStr
Else
GetINI=Mid(strReturn,1,lngLength)
EndIf
EndFunction
////////////////////
界说函数停止
////////////////////
////////////////////
入手下手界说属性
////////////////////
获得INI文件的称号
PublicPropertyLetFileName(ByValstrFileAsString)
strFileName=strFile
EndProperty
获得项目值
PublicPropertyLetValueStr(ByValstrValueAsString)
strValueStr=strValue
EndProperty
获得项目称号
PublicPropertyLetKeyName(ByValstrKeyAsString)
strKeyName=strKey
EndProperty
获得大节称号
PublicPropertyLetAppName(ByValstrAppAsString)
strAppName=strApp
EndProperty
////////////////////
停止界说属性
////////////////////
</p>由于ASP还是一种Script语言所没除了大量使用组件外,没有办法提高其工作效率。它必须面对即时编绎的时间考验,同时我们还不知其背后的组件会是一个什么样的状况; |
|