Bonjour,
Dans l’idée du script java ci-dessous:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
import java.util.regex.Pattern;
 
/**
 * RegexpGenerator
 */
public class RegexpGenerator {
    public static Pattern generateRegexp(String prototype) {
        return Pattern.compile(generateRegexpFrom(prototype));
    }
 
    private static String generateRegexpFrom(String prototype) {
        StringBuilder stringBuilder = new StringBuilder();
 
        for (int i = 0; i < prototype.length(); i++) {
            char c = prototype.charAt(i);
 
            if (Character.isDigit(c)) {
                stringBuilder.append("\\d");
            } else if (Character.isLetter(c)) {
                stringBuilder.append("\\w");
            } else { // falltrought: literal
 
                stringBuilder.append(c);
            }
        }
 
        return stringBuilder.toString();
    }
 
    private static void test(String prototype) {
        Pattern pattern = generateRegexp(prototype);
        System.out.println(String.format("%s -> %s", prototype, pattern));
 
        if (!pattern.matcher(prototype).matches()) {
            throw new AssertionError();
        }
    }
 
    public static void main(String[] args) {
        String[] prototypes = {
            "2009/11/12",
            "I'm a test",
            "me too!!!",
            "124.323.232.112",
            "ISBN 332212"
        };
 
        for (String prototype : prototypes) {
            test(prototype);
        }
    }
}
Pensez-vous qui soit possible de faire la même chose en VbScript?