<%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-03-171555
·[教练风采] 王利娟--主教练 2008-03-051516
·[教练风采] 吴武进--主教练 2008-03-051052
·[教练风采] 沈德才---教练 2007-06-12904
·[教练风采] 深圳太极拳教练员集体照2007-06-121471
·[教练风采] 上梅林辅导中心(附图)2007-06-12923
页次:1/0 每页30 文章数6

9 7 8 :

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