字符串判斷問題

sunnly · 发表于 2006-9-6 12:50

最初由 ruili_zeng 发布
[B]其實有更好的方法。
判斷一個字符串是否是數字

SQL> select decode(ltrim('9797979765464','0123456789'),null,'Yes','No') Is_Number from dual;

IS_NUMBER
---------
Yes

SQL> select decode(ltrim('adjd3939','0123456789'),null,'Yes','No') Is_Number from dual;

IS_NUMBER
---------
No

SQL> [/B]

这方法判断一个字符串中是否含有特定字符是不错,但如果像LZ一样要把非数字和非字母的排除,但如果含有隐形字符如回车和空格...等符号,就容易判断出错.
select decode(ltrim('adjd3939 ',
                  '0123456789
                  abcdefghijklmnopqrstunwsyz
                  ABCDEFGHIJKLMNOPQRSTUNWSYZ'),
            null,
            'Yes',
            'No') Is_Number
  from dual;

sandyliang · 发表于 2006-9-6 13:59

直接写不就得了吗.
DECLARE
  p_str  VARCHAR2(100);
  m    NUMBER;
  p_flag VARCHAR2(20);
  s    VARCHAR2(20);
BEGIN
  p_str := 'A324Z';
  m    := length(p_str);
  FOR i IN 1 .. m LOOP
--dbms_output.put_line(SUBSTR(p_str, i, 1));
s := SUBSTR(p_str, i, 1);
IF NOT ((s >= 'A' AND s <= 'Z') OR (s >= '0' AND s <= '9')) THEN
   p_flag := 'F';
END IF;
  END LOOP;
  dbms_output.put_line(p_flag);
END;