% ShowSmallClassType=ShowSmallClassType_Default MaxPerPage=MaxPerPage_Default strFileName="Product.asp?BigClassName=" & BigClassName '& "&SmallClassName=" & SmallClassName %> <% function InterceptString(txt,length) txt=trim(txt) x = len(txt) y = 0 if x >= 1 then for ii = 1 to x if asc(mid(txt,ii,1)) < 0 or asc(mid(txt,ii,1)) >255 then '¦pªG¬Oº~¦r y = y + 2 else y = y + 1 end if if y >= length then txt = left(trim(txt),ii) '¦r²Å¦êªø exit for end if next InterceptString = txt &"..." else InterceptString = "" &"..." end if End Function %>