<%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 %>
热门信息
·(视频)陈氏太极拳三十...
·(视频)CCTV-4《武林...
·奥运会开幕式太极拳表...
·刚柔相济话太极
·张东武,王海军,陈斌,傅...
·新民网专访陈正雷大师...
·《河之南》--太极拳...
推荐信息
·还没有文章 
你的位置: 首页 -> 视频欣赏
·[视频欣赏] (视频)陈氏太极拳三十四式--魏勰2008-09-182590
·[视频欣赏] 张东武,王海军,陈斌,傅能斌,陈娟表演2008-09-1829
·[视频欣赏] 《河之南》--太极拳2008-09-1816
·[视频欣赏] 刚柔相济话太极2008-09-1838
·[视频欣赏] 新民网专访陈正雷大师2008-09-1519
·[视频欣赏] 奥运会开幕式太极拳表演 2008-09-15150
·[视频欣赏] (视频)CCTV-4《武林传奇-大道太极》2008-09-151076
页次:1/0 每页30 文章数7

9 7 8 :

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