马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
ASP脚本是采用明文(plaintext)方式来编写的。显现这个用在内里限定字体个数的器材:
DimrsTitle,tmpLeft
rsTitle=Rs("Title")
IfLen(rsTitle)>intTitLenThen
????rsLeft=rsTitle
????DoWhileLen(rsLeft)>intTitLenOrLen(Right(rsTitle,intTitLen*j))>intTitLen
?????Response.WriteLeft(rsLeft,intTitLen)&"
"
?????rsLeft=Right(rsLeft,Len(rsLeft)-intTitLen)
????Loop
????IfNotIsNull(rsLeft)Then
?????Response.WritersLeft
????EndIf
???Else
????Response.WritersTitle
???EndIf
这个市一时写得,写得对照差!谁如果有好的,别健忘交换阿!
大家可以自己去看一看.可以说看得想呕吐.以前有次下了个动网来看.里面连基本内置函数的保护措施(函数没防御性)都没有.难怪经常补这个补那个了.可能现在.NET版会好点吧 |