Parent Directory | Revision Log | Patch
revision 1.1 by joko, Wed Sep 28 20:36:46 2005 UTC | revision 1.2 by joko, Sun Oct 9 18:43:03 2005 UTC | |
---|---|---|
# | Line 47 Public Sub parse() | Line 47 Public Sub parse() |
47 | 'Debug.Print "key: " & key | 'Debug.Print "key: " & key |
48 | switches.add key | switches.add key |
49 | 'switches.item(i + 1) = key | 'switches.item(i + 1) = key |
50 | ||
51 | On Error Resume Next | |
52 | If (value <> "") Then | If (value <> "") Then |
53 | options.add readValue(value), key | options.add readValue(value), key |
54 | i = i + 1 | i = i + 1 |
55 | Else | Else |
56 | options.add 1, key | options.add 1, key |
57 | End If | End If |
58 | On Error GoTo 0 | |
59 | ||
60 | End If | End If |
61 | ||
62 | Next i | Next i |
|
MailToCvsAdmin">MailToCvsAdmin | ViewVC Help |
Powered by ViewVC 1.1.26 |