RWSN#55808 M2M
svn path=/Customer/trunk/; revision=44990
This commit is contained in:
@@ -27596,7 +27596,7 @@ BEGIN
|
||||
WHILE v_email = '' AND INSTR (v_bodypart, '<') > 0
|
||||
LOOP
|
||||
v_bodypart := SUBSTR (v_bodypart, INSTR (v_bodypart, '<'));
|
||||
IF INSTR (v_bodypart, '>') < LEAST (INSTR (v_bodypart, CHR (13)), INSTR (v_bodypart, CHR (10)), 255) -- Staan < en > op dezelfde regel?
|
||||
IF INSTR (v_bodypart, '>') > 0 AND INSTR (v_bodypart, '>') < INSTR (REPLACE (REPLACE (v_bodypart, CHR (13), '#'), CHR (10), '#') || '#', '#') -- Staan < en > op dezelfde regel?
|
||||
THEN
|
||||
v_email := TRIM (SUBSTR (v_bodypart, 2, INSTR (v_bodypart, '>') - 2)); -- v_email=gedeelte tussen < en > op dezelfde regel!
|
||||
ELSE
|
||||
|
||||
Reference in New Issue
Block a user