ITPub博客

首页 > Linux操作系统 > Linux操作系统 > 检查中文的一段代码

检查中文的一段代码

原创 Linux操作系统 作者:leniz 时间:2009-04-28 16:48:08 0 删除 编辑
DATA: alpha_num(120) TYPE c.
alpha_num = ' abcdefghijklopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789,./;''[]\-=`<>?:"{}|_+~!@#$%^&*()'.
data len type i.
data n type i.
len = strlen( input ).
do len times.
  n = sy-index - 1.
  if not alpha_num cs input+n(1).
    concatenate output input+n(1) into output.
  endif.
enddo.
 
******* 很简单,关键是把alpha的字符找齐比较费力,记录一下。

来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/554557/viewspace-592100/,如需转载,请注明出处,否则将追究法律责任。

请登录后发表评论 登录
全部评论

注册时间:2008-05-31

  • 博文量
    448
  • 访问量
    1103095