拆分IP字符串，比如说222.23.14.58要把它拆成四段，str1=222 str2=23 str3=14 str4=58
请问如何拆更好，还要防止出错，如222.13.14就可以友好的提示数据错误。

多谢，不过楼上的有个地方错了。
IF UBound(IPAry)<>4 Then
那里应该是3。

经过调试，最终代码如下，也欢迎指教。
ipp=split(sip,".")
if IsArray(ipp)=False Then
%><tr><td>非法IP地址字符串　错误1</td></tr><%
else
%><%=UBound(ipp)%><%
if UBound(ipp)<>3 Then
%><tr><td>非法IP地址字符串　长度不对</td></tr><%
else
str1=ipp(0)
str2=ipp(1)
str3=ipp(2)
str4=ipp(3)
if isNumeric(str1)=0 Or isNumeric(str2)=0 Or isNumeric(str3)=0 Or isNumeric(str4)=0 Then
%><tr><td>非法IP地址字符串　IP全是由数字和小数点组成的</td></tr><%
else
if str1>255 or str2>255 or str3>255 or str4>255 or str1<0 or str2<0 or str3<0 or str4<0 then
%><tr><td>非法IP地址字符串　IP为0-255中的数值，你的输入超出了范围！</td></tr><%
end if
end if
end if
end if