<%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 %>
郑铁职院组织部
你的位置:
首页
->
干部工作
->
干部教育
- 干部工作 - 干部教育
·[
干部教育
]
关于在“讲正气、树新风”主题教育活动第二阶段...
2007-04-25
23
搜索:
本类栏目
->
干部教育
热门阅读
·
关于在“讲正气、树新风...
推荐阅读
·还没有文章
版权所有 Copyright© 2006-2007 郑州铁路职业技术学院
郑州铁路职业技术学院党委组织部 主办