<%Function LeftStr(byVal Str,byVal StrLen) Dim l,t,c,i l=Len(str) t=0 For i=1 To l c=AscW(Mid(str,i,1)) If c<0 Or c>255 Then t=t+2 Else t=t+1 IF t>=StrLen Then LeftStr=left(Str,i)&"..." Exit For Else LeftStr=Str End If Next End Function %>
热门信息
·四大怀药之铁棍山药(图...
·老架一路
·老架二路
·资料信息
·新架一路
·新架二路
推荐信息
·四大怀药之铁棍山药(图...
·老架一路
·老架二路
·新架一路
·新架二路
 
你的位置: 首页 -> 太极产品
·[太极产品] 老架一路2008-08-211592
·[太极产品] 老架二路2008-08-21472
·[太极产品] 新架一路2008-08-21430
·[太极产品] 新架二路2008-08-21294
·[太极产品] 四大怀药之铁棍山药(图)----你吃过吗? 2007-06-261852
·[太极产品] 资料信息 2007-06-12471
页次:1/0 每页30 文章数6

9 7 8 :

QQ:232555688 电话:83100206 手机:13510359683 电邮:weixie@sztjq.com 粤ICP备06086521号