[ASP]使用类，实现模块化(7)

End sub

Function killint(i,killstr,killsub)
 If Not IsNumeric(i) Then
 i=killstr
 ElseIf i<=0 Then
 i=killsub
 End if
 killint=Int(Left(i,5))
 End Function 
%>

说明：

此源码5do8单独写出，本源码我享有解释权，但不保证源码的安全，任何损失使用者自己承担，本源码仅仅限于在耕耘村(http: //www.5do8.com)，蓝色理想(http://www.blueidea.com)和缔客论坛(http://www.dw8.cn)站内交流。当然，不许抄袭。