Artifact
b01e266c84d0914f16f0128771f32798675e45df:
- File
stg_autoconnect.js
— part of check-in
[48f28b46ba]
at
2015-01-15 11:31:26
on branch trunk
— В скрипте 'авто-подключение к Хранилищу' сделан выбор: устанавливать флажок рекурсивного захвата или нет
(user:
EvilBeaver
size: 9533)
0000: ef bb bf 24 65 6e 67 69 6e 65 20 4a 53 63 72 69 ...$engine JScri
0010: 70 74 0d 0a 24 75 6e 61 6d 65 20 73 74 67 5f 61 pt..$uname stg_a
0020: 75 74 6f 63 6f 6e 6e 65 63 74 0d 0a 24 64 6e 61 utoconnect..$dna
0030: 6d 65 20 d0 90 d0 b2 d1 82 d0 be 2d d0 bf d0 be me ........-....
0040: d0 b4 d0 ba d0 bb d1 8e d1 87 d0 b5 d0 bd d0 b8 ................
0050: d0 b5 20 d0 ba 20 d1 85 d1 80 d0 b0 d0 bd d0 b8 .. .. ..........
0060: d0 bb d0 b8 d1 89 d1 83 0d 0a 24 61 64 64 69 6e ..........$addin
0070: 20 73 74 64 63 6f 6d 6d 61 6e 64 73 0d 0a 24 61 stdcommands..$a
0080: 64 64 69 6e 20 67 6c 6f 62 61 6c 0d 0a 0d 0a 67 ddin global....g
0090: 6c 6f 62 61 6c 2e 63 6f 6e 6e 65 63 74 47 6c 6f lobal.connectGlo
00a0: 62 61 6c 73 28 53 65 6c 66 53 63 72 69 70 74 29 bals(SelfScript)
00b0: 0d 0a 2f 2f 20 28 d1 81 29 20 d0 90 d0 bb d0 b5 ..// (..) ......
00c0: d0 ba d1 81 d0 b0 d0 bd d0 b4 d1 80 20 d0 9e d1 ............ ...
00d0: 80 d0 b5 d1 84 d0 ba d0 be d0 b2 20 6f 72 65 66 ........... oref
00e0: 6b 6f 76 20 61 74 20 67 6d 61 69 6c 2e 63 6f 6d kov at gmail.com
00f0: 0d 0a 2f 2f 20 d0 ad d1 82 d0 be 20 d0 bd d0 b5 ..// ...... ....
0100: d0 b1 d0 be d0 bb d1 8c d1 88 d0 be d0 b9 20 d1 .............. .
0110: 81 d0 ba d1 80 d0 b8 d0 bf d1 82 20 d0 b4 d0 bb ........... ....
0120: d1 8f 20 d0 bf d0 be d0 b4 d1 81 d1 82 d0 b0 d0 .. .............
0130: bd d0 be d0 b2 d0 ba d0 b8 20 d0 bf d1 83 d1 82 ......... ......
0140: d0 b8 2f d0 b8 d0 bc d0 b5 d0 bd d0 b8 2f d0 bf ../........../..
0150: d0 b0 d1 80 d0 be d0 bb d1 8f 20 d0 b2 20 d0 b4 .......... .. ..
0160: d0 b8 d0 b0 d0 bb d0 be d0 b3 d0 b5 20 d0 bf d0 ............ ...
0170: be d0 b4 d0 ba d0 bb d1 8e d1 87 d0 b5 d0 bd d0 ................
0180: b8 d1 8f 20 d0 ba 20 d1 85 d1 80 d0 b0 d0 bd d0 ... .. .........
0190: b8 d0 bb d0 b8 d1 89 d1 83 2e 0d 0a 2f 2f 20 d0 ............// .
01a0: 94 d0 b0 d0 bd d0 bd d1 8b d0 b5 20 d1 81 d0 be ........... ....
01b0: d1 85 d1 80 d0 b0 d0 bd d1 8f d0 b5 d1 82 d1 81 ................
01c0: d1 8f 20 d0 b2 20 d0 bf d1 80 d0 be d1 84 d0 b0 .. .. ..........
01d0: d0 b9 d0 bb d0 b5 20 d0 b1 d0 b0 d0 b7 d0 b0 2f ...... ......../
01e0: d0 bf d0 be d0 bb d1 8c d0 b7 d0 be d0 b2 d0 b0 ................
01f0: d1 82 d0 b5 d0 bb d1 8c 2e 0d 0a 2f 2f 20 d0 9f ...........// ..
0200: d1 80 d0 b8 20 d0 bf d0 b5 d1 80 d0 b2 d0 be d0 .... ...........
0210: bc 20 d0 bf d0 be d0 b4 d0 ba d0 bb d1 8e d1 87 . ..............
0220: d0 b5 d0 bd d0 b8 d0 b8 20 d0 ba 20 d1 85 d1 80 ........ .. ....
0230: d0 b0 d0 bd d0 b8 d0 bb d0 b8 d1 89 d1 83 20 d1 .............. .
0240: 81 d0 ba d1 80 d0 b8 d0 bf d1 82 20 d0 bf d1 80 ........... ....
0250: d0 b5 d0 b4 d0 bb d0 b0 d0 b3 d0 b0 d0 b5 d1 82 ................
0260: 20 d0 b7 d0 b0 d0 bf d0 be d0 bc d0 bd d0 b8 d1 ...............
0270: 82 d1 8c 20 d0 b2 d0 b2 d0 b5 d0 b4 d0 b5 d0 bd ... ............
0280: d0 bd d1 8b d0 b5 20 d0 b4 d0 b0 d0 bd d0 bd d1 ...... .........
0290: 8b d0 b5 2c 0d 0a 2f 2f 20 d0 b8 20 d0 b2 20 d0 ...,..// .. .. .
02a0: b4 d0 b0 d0 bb d1 8c d0 bd d0 b5 d0 b9 d1 88 d0 ................
02b0: b5 d0 bc 20 d1 81 d1 80 d0 b0 d0 b7 d1 83 20 d0 ... .......... .
02c0: bf d0 be d0 b4 d1 81 d1 82 d0 b0 d0 b2 d0 bb d1 ................
02d0: 8f d0 b5 d1 82 20 d0 b8 d1 85 20 d0 bf d1 80 d0 ..... .... .....
02e0: b8 20 d0 bf d0 be d0 b4 d0 ba d0 bb d1 8e d1 87 . ..............
02f0: d0 b5 d0 bd d0 b8 d0 b8 20 d0 ba 20 d1 85 d1 80 ........ .. ....
0300: d0 b0 d0 bd d0 b8 d0 bb d0 b8 d1 89 d1 83 2e 0d ................
0310: 0a 2f 2f 20 d0 95 d1 81 d0 bb d0 b8 20 d0 b2 d0 .// ........ ...
0320: b0 d0 bc 20 d0 bd d0 b0 d0 b4 d0 be 20 d0 b2 d0 ... ........ ...
0330: b2 d0 b5 d1 81 d1 82 d0 b8 20 d0 b4 d1 80 d1 83 ......... ......
0340: d0 b3 d0 b8 d0 b5 20 d0 b4 d0 b0 d0 bd d0 bd d0 ...... .........
0350: b5 2c 20 d0 b2 d1 8b d0 bf d0 be d0 bb d0 bd d0 ., .............
0360: b8 d1 82 d0 b5 20 d0 bc d0 b0 d0 ba d1 80 d0 be ..... ..........
0370: d1 81 20 22 d0 a1 d0 b1 d1 80 d0 be d1 81 d0 b8 .. "............
0380: d1 82 d1 8c d0 a1 d0 be d1 85 d1 80 d0 b0 d0 bd ................
0390: d0 b5 d0 bd d0 bd d1 8b d0 b5 d0 94 d0 b0 d0 bd ................
03a0: d0 bd d1 8b d0 b5 22 0d 0a 0d 0a 2f 2f 20 d0 97 ......"....// ..
03b0: d0 b0 d0 b4 d0 b0 d0 b4 d0 b8 d0 bc 20 d0 bf d1 ............ ...
03c0: 83 d1 82 d0 b8 20 d1 85 d1 80 d0 b0 d0 bd d0 b5 ..... ..........
03d0: d0 bd d0 b8 d1 8f 20 d0 bd d0 b0 d1 81 d1 82 d1 ...... .........
03e0: 80 d0 be d0 b5 d0 ba 0d 0a 76 61 72 20 70 66 6c .........var pfl
03f0: 50 61 74 68 20 3d 20 22 53 74 67 41 75 74 6f 43 Path = "StgAutoC
0400: 6f 6e 6e 65 63 74 2f 22 0d 0a 76 61 72 20 70 66 onnect/"..var pf
0410: 6c 44 61 74 61 20 3d 20 70 66 6c 50 61 74 68 20 lData = pflPath
0420: 2b 20 22 64 61 74 61 22 20 20 20 20 20 20 20 20 + "data"
0430: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2f //
0440: 20 d0 94 d0 b0 d0 bd d0 bd d1 8b d0 b5 0d 0a 76 ..............v
0450: 61 72 20 70 66 6c 53 68 6f 77 4d 65 73 73 61 67 ar pflShowMessag
0460: 65 20 3d 20 70 66 6c 50 61 74 68 20 2b 20 22 53 e = pflPath + "S
0470: 68 6f 77 4d 65 73 73 61 67 65 22 20 20 20 20 20 howMessage"
0480: 20 20 20 2f 2f 20 d0 9f d0 be d0 ba d0 b0 d0 b7 // ..........
0490: d1 8b d0 b2 d0 b0 d1 82 d1 8c 20 d1 81 d0 be d0 .......... .....
04a0: be d0 b1 d1 89 d0 b5 d0 bd d0 b8 d0 b5 20 d0 bf ............. ..
04b0: d1 80 d0 b8 20 d0 bf d0 be d0 b4 d1 81 d1 82 d0 .... ...........
04c0: b0 d0 bd d0 be d0 b2 d0 ba d0 b5 0d 0a 76 61 72 .............var
04d0: 20 70 66 6c 43 75 72 72 65 6e 74 42 61 73 65 50 pflCurrentBaseP
04e0: 61 74 68 20 3d 20 70 66 6c 50 61 74 68 20 2b 20 ath = pflPath +
04f0: 22 43 75 72 72 65 6e 74 42 61 73 65 50 61 74 68 "CurrentBasePath
0500: 22 3b 20 2f 2f 20 d0 a5 d1 80 d0 b0 d0 bd d0 b8 "; // ..........
0510: d0 bc 20 d0 bf d1 83 d1 82 d1 8c 20 d0 ba 20 d0 .. ........ .. .
0520: b1 d0 b0 d0 b7 d0 b5 20 d0 b4 d0 b0 d0 bd d0 bd ....... ........
0530: d1 8b d1 85 2c 20 d0 b5 d1 81 d0 bb d0 b8 20 d0 ...., ........ .
0540: bf d0 be d0 bc d0 b5 d0 bd d1 8f d0 bb d0 b0 d1 ................
0550: 81 d1 8c 2c 20 d1 82 d0 be d0 b3 d0 b4 d0 b0 20 ..., ..........
0560: d0 b1 d1 83 d0 b4 d0 b5 d0 bc 20 d1 81 d0 bf d1 .......... .....
0570: 80 d0 b0 d1 88 d0 b8 d0 b2 d0 b0 d1 82 d1 8c 20 ...............
0580: d1 82 d0 be d1 87 d0 bd d0 be 20 d0 bd d0 b0 d0 .......... .....
0590: b4 d0 be 20 d0 bf d0 be d0 b4 d0 ba d0 bb d1 8e ... ............
05a0: d1 87 d0 b8 d1 82 d1 81 d1 8f 2e 0d 0a 76 61 72 .............var
05b0: 20 70 66 6c 41 75 74 6f 52 65 63 75 72 73 69 76 pflAutoRecursiv
05c0: 65 43 68 65 63 6b 4f 75 74 20 3d 20 70 66 6c 50 eCheckOut = pflP
05d0: 61 74 68 20 2b 20 22 41 75 74 6f 52 65 63 75 72 ath + "AutoRecur
05e0: 73 69 76 65 43 68 65 63 6b 4f 75 74 22 3b 20 2f siveCheckOut"; /
05f0: 2f 20 d0 9e d0 bf d1 86 d0 b8 d1 8f 20 d0 b0 d0 / .......... ...
0600: b2 d1 82 d0 be d0 bc d0 b0 d1 82 d0 b8 d1 87 d0 ................
0610: b5 d1 81 d0 ba d0 be d0 b9 20 d1 83 d1 81 d1 82 ......... ......
0620: d0 b0 d0 bd d0 be d0 b2 d0 ba d0 b8 20 d1 84 d0 ............ ...
0630: bb d0 b0 d0 b6 d0 ba d0 b0 20 22 d0 b7 d0 b0 d1 ......... ".....
0640: 85 d0 b2 d0 b0 d1 82 d1 8b d0 b2 d0 b0 d1 82 d1 ................
0650: 8c 20 d1 80 d0 b5 d0 ba d1 83 d1 80 d1 81 d0 b8 . ..............
0660: d0 b2 d0 bd d0 be 22 0d 0a 76 61 72 20 70 72 65 ......"..var pre
0670: 76 43 6f 6e 6e 65 63 74 53 75 63 63 65 73 73 65 vConnectSuccesse
0680: 64 20 3d 20 74 72 75 65 0d 0a 0d 0a 2f 2f 20 d0 d = true....// .
0690: 9d d0 b0 d1 81 d1 82 d1 80 d0 be d0 b9 d0 ba d1 ................
06a0: 83 20 d0 be d1 82 d0 be d0 b1 d1 80 d0 b0 d0 b6 . ..............
06b0: d0 b5 d0 bd d0 b8 d1 8f 20 d1 81 d0 be d0 be d0 ........ .......
06c0: b1 d1 89 d0 b5 d0 bd d0 b8 d0 b9 20 d0 b1 d1 83 ........... ....
06d0: d0 b4 d0 b5 d0 bc 20 d1 85 d1 80 d0 b0 d0 bd d0 ...... .........
06e0: b8 d1 82 d1 8c 20 d0 b5 d0 b4 d0 b8 d0 bd d0 be ..... ..........
06f0: 20 d0 b4 d0 bb d1 8f 20 d0 b2 d1 81 d0 b5 d1 85 ...... ........
0700: 20 d0 b1 d0 b0 d0 b7 2c 20 d0 b2 20 d0 bf d1 80 ......, .. ....
0710: d0 be d1 84 d0 b8 d0 bb d0 b5 20 d0 a1 d0 bd d0 .......... .....
0720: b5 d0 b3 d0 be d0 bf d0 b0 d1 82 d0 b0 0d 0a 70 ...............p
0730: 72 6f 66 69 6c 65 52 6f 6f 74 2e 63 72 65 61 74 rofileRoot.creat
0740: 65 56 61 6c 75 65 28 70 66 6c 53 68 6f 77 4d 65 eValue(pflShowMe
0750: 73 73 61 67 65 2c 20 74 72 75 65 2c 20 70 66 6c ssage, true, pfl
0760: 53 6e 65 67 6f 70 61 74 29 0d 0a 2f 2f 20 d0 9f Snegopat)..// ..
0770: d0 be d0 b4 d1 86 d0 b5 d0 bf d0 bb d1 8f d0 b5 ................
0780: d0 bc d1 81 d1 8f 20 d0 ba 20 d1 81 d0 be d0 b1 ...... .. ......
0790: d1 8b d1 82 d0 b8 d1 8e 20 d0 bf d0 be d0 ba d0 ........ .......
07a0: b0 d0 b7 d0 b0 20 d0 bc d0 be d0 b4 d0 b0 d0 bb ..... ..........
07b0: d1 8c d0 bd d1 8b d1 85 20 d0 be d0 ba d0 be d0 ........ .......
07c0: bd 2e 20 d0 95 d1 81 d0 bb d0 b8 20 d1 81 d0 be .. ........ ....
07d0: 20 d0 b2 d1 80 d0 b5 d0 bc d0 b5 d0 bd d0 b5 d0 ...............
07e0: bc 20 d0 bf d0 be d1 8f d0 b2 d0 b8 d1 82 d1 81 . ..............
07f0: d1 8f 20 d1 81 d0 be d0 b1 d1 8b d1 82 d0 b8 d0 .. .............
0800: b5 20 d0 bf d0 be d0 b4 d0 ba d0 bb d1 8e d1 87 . ..............
0810: d0 b5 d0 bd d0 b8 d1 8f 20 d0 ba 20 d1 85 d1 80 ........ .. ....
0820: d0 b0 d0 bd d0 b8 d0 bb d0 b8 d1 89 d1 83 2c 0d ..............,.
0830: 0a 2f 2f 20 d1 82 d0 be 20 d0 bd d0 b0 d0 b4 d0 .// .... .......
0840: be 20 d0 b1 d1 83 d0 b4 d0 b5 d1 82 20 d0 b4 d0 . .......... ...
0850: b5 d0 bb d0 b0 d1 82 d1 8c 20 d1 8d d1 82 d0 be ......... ......
0860: 20 d0 b2 20 d1 82 d0 be d0 bc 20 d1 81 d0 be d0 .. ...... .....
0870: b1 d1 8b d1 82 d0 b8 d0 b8 2c 20 d0 b8 20 d0 bf ........., .. ..
0880: d0 be d1 81 d0 bb d0 b5 20 d0 be d1 82 d0 ba d0 ........ .......
0890: bb d1 8e d1 87 d0 b0 d1 82 d1 8c d1 81 d1 8f 20 ...............
08a0: d0 be d1 82 20 d0 bf d0 b5 d1 80 d0 b5 d1 85 d0 .... ...........
08b0: b2 d0 b0 d1 82 d0 b0 20 d0 bc d0 be d0 b4 d0 b0 ....... ........
08c0: d0 bb d1 8c d0 bd d1 8b d1 85 20 d0 be d0 ba d0 .......... .....
08d0: be d0 bd 2e 0d 0a 65 76 65 6e 74 73 2e 63 6f 6e ......events.con
08e0: 6e 65 63 74 28 77 69 6e 64 6f 77 73 2c 20 22 6f nect(windows, "o
08f0: 6e 44 6f 4d 6f 64 61 6c 22 2c 20 53 65 6c 66 53 nDoModal", SelfS
0900: 63 72 69 70 74 2e 73 65 6c 66 29 0d 0a 0d 0a 66 cript.self)....f
0910: 75 6e 63 74 69 6f 6e 20 63 6e 6e 53 74 72 69 6e unction cnnStrin
0920: 67 28 29 0d 0a 7b 0d 0a 20 20 20 20 d0 9a d0 b0 g()..{.. ....
0930: d1 82 d0 b0 d0 bb d0 be d0 b3 d0 98 d0 91 20 3d .............. =
0940: 20 d0 9d d0 a1 d1 82 d1 80 28 d0 a1 d1 82 d1 80 ........(......
0950: d0 be d0 ba d0 b0 d0 a1 d0 be d0 b5 d0 b4 d0 b8 ................
0960: d0 bd d0 b5 d0 bd d0 b8 d1 8f d0 98 d0 bd d1 84 ................
0970: d0 be d1 80 d0 bc d0 b0 d1 86 d0 b8 d0 be d0 bd ................
0980: d0 bd d0 be d0 b9 d0 91 d0 b0 d0 b7 d1 8b 28 29 ..............()
0990: 2c 20 22 46 69 6c 65 22 29 0d 0a 20 20 20 20 69 , "File").. i
09a0: 66 28 d0 9a d0 b0 d1 82 d0 b0 d0 bb d0 be d0 b3 f(..............
09b0: d0 98 d0 91 29 0d 0a 20 20 20 20 20 20 20 20 72 ....).. r
09c0: 65 74 75 72 6e 20 d0 9a d0 b0 d1 82 d0 b0 d0 bb eturn ..........
09d0: d0 be d0 b3 d0 98 d0 91 0d 0a 20 20 20 20 65 6c .......... el
09e0: 73 65 0d 0a 20 20 20 20 20 20 20 20 72 65 74 75 se.. retu
09f0: 72 6e 20 d0 9d d0 a1 d1 82 d1 80 28 d0 a1 d1 82 rn ........(....
0a00: d1 80 d0 be d0 ba d0 b0 d0 a1 d0 be d0 b5 d0 b4 ................
0a10: d0 b8 d0 bd d0 b5 d0 bd d0 b8 d1 8f d0 98 d0 bd ................
0a20: d1 84 d0 be d1 80 d0 bc d0 b0 d1 86 d0 b8 d0 be ................
0a30: d0 bd d0 bd d0 be d0 b9 d0 91 d0 b0 d0 b7 d1 8b ................
0a40: 28 29 2c 20 22 53 72 76 72 22 29 20 2b 20 22 3a (), "Srvr") + ":
0a50: 22 20 2b 20 d0 9d d0 a1 d1 82 d1 80 28 d0 a1 d1 " + ........(...
0a60: 82 d1 80 d0 be d0 ba d0 b0 d0 a1 d0 be d0 b5 d0 ................
0a70: b4 d0 b8 d0 bd d0 b5 d0 bd d0 b8 d1 8f d0 98 d0 ................
0a80: bd d1 84 d0 be d1 80 d0 bc d0 b0 d1 86 d0 b8 d0 ................
0a90: be d0 bd d0 bd d0 be d0 b9 d0 91 d0 b0 d0 b7 d1 ................
0aa0: 8b 28 29 2c 20 22 52 65 66 22 29 0d 0a 7d 0d 0a .(), "Ref")..}..
0ab0: 0d 0a 76 61 72 20 63 6f 75 6e 74 20 3d 20 30 3b ..var count = 0;
0ac0: 0d 0a 0d 0a 2f 2f 20 d0 9e d0 b1 d1 80 d0 b0 d0 ....// .........
0ad0: b1 d0 be d1 82 d1 87 d0 b8 d0 ba 20 d0 bf d0 be ........... ....
0ae0: d0 ba d0 b0 d0 b7 d0 b0 20 d0 bc d0 be d0 b4 d0 ........ .......
0af0: b0 d0 bb d1 8c d0 bd d1 8b d1 85 20 d0 be d0 ba ........... ....
0b00: d0 be d0 bd 2e 0d 0a 66 75 6e 63 74 69 6f 6e 20 .......function
0b10: 6f 6e 44 6f 4d 6f 64 61 6c 28 64 6c 67 49 6e 66 onDoModal(dlgInf
0b20: 6f 29 0d 0a 7b 0d 0a 20 20 20 20 69 66 28 64 6c o)..{.. if(dl
0b30: 67 49 6e 66 6f 2e 63 61 70 74 69 6f 6e 20 3d 3d gInfo.caption ==
0b40: 20 22 d0 a1 d0 be d0 b5 d0 b4 d0 b8 d0 bd d0 b5 "..............
0b50: d0 bd d0 b8 d0 b5 20 d1 81 20 d1 85 d1 80 d0 b0 ...... .. ......
0b60: d0 bd d0 b8 d0 bb d0 b8 d1 89 d0 b5 d0 bc 20 d0 .............. .
0b70: ba d0 be d0 bd d1 84 d0 b8 d0 b3 d1 83 d1 80 d0 ................
0b80: b0 d1 86 d0 b8 d0 b8 22 29 0d 0a 20 20 20 20 7b .......").. {
0b90: 0d 0a 20 20 20 20 09 63 6f 75 6e 74 2b 2b 3b 0d .. .count++;.
0ba0: 0a 0d 0a 20 20 20 20 09 69 66 20 28 63 6f 75 6e ... .if (coun
0bb0: 74 20 3e 20 31 36 29 20 7b 0d 0a 09 09 70 72 65 t > 16) {....pre
0bc0: 76 43 6f 6e 6e 65 63 74 53 75 63 63 65 73 73 65 vConnectSuccesse
0bd0: 64 20 3d 20 74 72 75 65 3b 0d 0a 20 20 20 20 20 d = true;..
0be0: 20 20 20 20 20 20 20 20 20 20 20 65 76 65 6e 74 event
0bf0: 73 2e 63 6f 6e 6e 65 63 74 28 44 65 73 69 67 6e s.connect(Design
0c00: 65 72 2c 20 22 6f 6e 49 64 6c 65 22 2c 20 53 65 er, "onIdle", Se
0c10: 6c 66 53 63 72 69 70 74 2e 73 65 6c 66 29 3b 0d lfScript.self);.
0c20: 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
0c30: 20 63 6f 75 6e 74 20 3d 20 30 3b 0d 0a 20 20 20 count = 0;..
0c40: 20 20 20 20 20 7d 0d 0a 20 20 20 20 20 20 20 20 }..
0c50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0d 0a ..
0c60: 20 20 20 20 20 20 20 20 69 66 28 64 6c 67 49 6e if(dlgIn
0c70: 66 6f 2e 73 74 61 67 65 20 3d 3d 20 62 65 66 6f fo.stage == befo
0c80: 72 65 44 6f 4d 6f 64 61 6c 29 0d 0a 20 20 20 20 reDoModal)..
0c90: 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 20 20 20 {..
0ca0: 20 20 20 76 61 72 20 64 61 74 61 20 3d 20 70 72 var data = pr
0cb0: 6f 66 69 6c 65 52 6f 6f 74 2e 67 65 74 56 61 6c ofileRoot.getVal
0cc0: 75 65 28 70 66 6c 44 61 74 61 29 0d 0a 20 20 20 ue(pflData)..
0cd0: 20 20 20 20 20 20 20 20 20 69 66 28 64 61 74 61 if(data
0ce0: 29 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 7b ).. {
0cf0: 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..
0d00: 20 20 69 66 28 21 70 72 65 76 43 6f 6e 6e 65 63 if(!prevConnec
0d10: 74 53 75 63 63 65 73 73 65 64 29 0d 0a 20 20 20 tSuccessed)..
0d20: 20 20 20 20 20 20 20 20 20 20 20 20 20 7b 0d 0a {..
0d30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0d40: 20 20 20 20 69 66 28 4d 65 73 73 61 67 65 42 6f if(MessageBo
0d50: 78 28 22 d0 90 d0 b2 d1 82 d0 be 2d d1 81 d0 be x("........-....
0d60: d0 b5 d0 b4 d0 b8 d0 bd d0 b5 d0 bd d0 b8 d0 b5 ................
0d70: 20 d1 81 20 d1 85 d1 80 d0 b0 d0 bd d0 b8 d0 bb .. ............
0d80: d0 b8 d1 89 d0 b5 d0 bc 20 d0 b1 d1 8b d0 bb d0 ........ .......
0d90: be 20 d0 bd d0 b5 d1 83 d0 b4 d0 b0 d1 87 d0 bd . ..............
0da0: d1 8b d0 bc 2e 20 d0 a1 d0 b1 d1 80 d0 be d1 81 ..... ..........
0db0: d0 b8 d1 82 d1 8c 20 d1 81 d0 be d1 85 d1 80 d0 ...... .........
0dc0: b0 d0 bd d0 b5 d0 bd d0 bd d1 8b d0 b5 20 d0 b4 ............. ..
0dd0: d0 b0 d0 bd d0 bd d1 8b d0 b5 3f 22 2c 20 6d 62 ..........?", mb
0de0: 59 65 73 4e 6f 20 7c 20 6d 62 44 65 66 42 75 74 YesNo | mbDefBut
0df0: 74 6f 6e 31 20 7c 20 6d 62 49 63 6f 6e 51 75 65 ton1 | mbIconQue
0e00: 73 74 69 6f 6e 2c 20 22 d0 a1 d0 bd d0 b5 d0 b3 stion, "........
0e10: d0 be d0 bf d0 b0 d1 82 22 29 20 3d 3d 20 6d 62 ........") == mb
0e20: 61 59 65 73 29 0d 0a 20 20 20 20 20 20 20 20 20 aYes)..
0e30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 70 p
0e40: 72 6f 66 69 6c 65 52 6f 6f 74 2e 64 65 6c 65 74 rofileRoot.delet
0e50: 65 56 61 6c 75 65 28 70 66 6c 44 61 74 61 29 0d eValue(pflData).
0e60: 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
0e70: 20 7d 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 }..
0e80: 20 20 20 20 65 6c 73 65 0d 0a 20 20 20 20 20 20 else..
0e90: 20 20 20 20 20 20 20 20 20 20 7b 0d 0a 20 20 20 {..
0ea0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0eb0: 20 76 61 72 20 63 75 72 72 65 6e 74 42 61 73 65 var currentBase
0ec0: 50 61 74 68 20 3d 20 70 72 6f 66 69 6c 65 52 6f Path = profileRo
0ed0: 6f 74 2e 67 65 74 56 61 6c 75 65 28 70 66 6c 43 ot.getValue(pflC
0ee0: 75 72 72 65 6e 74 42 61 73 65 50 61 74 68 29 3b urrentBasePath);
0ef0: 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..
0f00: 20 20 20 20 20 20 69 66 20 28 21 63 75 72 72 65 if (!curre
0f10: 6e 74 42 61 73 65 50 61 74 68 29 0d 0a 20 20 20 ntBasePath)..
0f20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0f30: 20 20 20 20 20 63 75 72 72 65 6e 74 42 61 73 65 currentBase
0f40: 50 61 74 68 20 3d 20 63 6e 6e 53 74 72 69 6e 67 Path = cnnString
0f50: 28 29 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 ();..
0f60: 20 20 20 20 20 20 20 20 20 0d 0a 20 20 20 20 20 ..
0f70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 i
0f80: 66 20 28 63 75 72 72 65 6e 74 42 61 73 65 50 61 f (currentBasePa
0f90: 74 68 2e 74 6f 4c 6f 77 65 72 43 61 73 65 28 29 th.toLowerCase()
0fa0: 20 21 3d 20 63 6e 6e 53 74 72 69 6e 67 28 29 2e != cnnString().
0fb0: 74 6f 4c 6f 77 65 72 43 61 73 65 28 29 29 7b 0d toLowerCase()){.
0fc0: 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
0fd0: 20 20 20 20 20 20 20 20 20 76 61 72 20 71 75 65 var que
0fe0: 73 74 69 6f 6e 53 74 69 72 6e 67 20 3d 20 22 20 stionStirng = "
0ff0: d0 94 d0 bb d1 8f 20 d0 b1 d0 b0 d0 b7 d1 8b 20 ...... ........
1000: d1 81 d0 be d1 85 d1 80 d0 b0 d0 bd d0 b5 d0 bd ................
1010: d0 b0 20 d0 b4 d1 80 d1 83 d0 b3 d0 b0 d1 8f 20 .. ............
1020: d1 81 d1 82 d1 80 d0 be d0 ba d0 b0 20 d0 bf d0 ............ ...
1030: be d0 b4 d0 ba d0 bb d1 8e d1 87 d0 b5 d0 bd d0 ................
1040: b8 d1 8f 2e 20 5c 6e 22 3b 0d 0a 20 20 20 20 20 .... \n";..
1050: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
1060: 20 20 20 71 75 65 73 74 69 6f 6e 53 74 69 72 6e questionStirn
1070: 67 20 2b 3d 20 22 d0 a2 d0 b5 d0 ba d1 83 d1 89 g += "..........
1080: d0 b8 d0 b9 20 d0 bf d1 83 d1 82 d1 8c 3a 22 2b .... ........:"+
1090: 63 6e 6e 53 74 72 69 6e 67 28 29 2b 22 5c 6e 22 cnnString()+"\n"
10a0: 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ;..
10b0: 20 20 20 20 20 20 20 20 20 20 20 71 75 65 73 74 quest
10c0: 69 6f 6e 53 74 69 72 6e 67 20 2b 3d 20 22 d0 a1 ionStirng += "..
10d0: d0 be d1 85 d1 80 d0 b0 d0 bd d0 b5 d0 bd d0 bd ................
10e0: d1 8b d0 b9 20 d0 bf d1 83 d1 82 d1 8c 3a 22 2b .... ........:"+
10f0: 63 75 72 72 65 6e 74 42 61 73 65 50 61 74 68 2b currentBasePath+
1100: 22 20 5c 6e 22 3b 0d 0a 20 20 20 20 20 20 20 20 " \n";..
1110: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
1120: 71 75 65 73 74 69 6f 6e 53 74 69 72 6e 67 20 2b questionStirng +
1130: 3d 20 22 5c 74 20 d0 92 d0 9d d0 98 d0 9c d0 90 = "\t ..........
1140: d0 9d d0 98 d0 95 20 d0 92 d0 9e d0 9f d0 a0 d0 ...... .........
1150: 9e d0 a1 20 5c 6e 22 2b 22 d0 9f d1 80 d0 be d0 ... \n"+".......
1160: b4 d0 be d0 bb d0 b6 d0 b8 d1 82 d1 8c 20 d0 b0 ............. ..
1170: d0 b2 d1 82 d0 be d0 bf d0 be d0 b4 d0 ba d0 bb ................
1180: d1 8e d1 87 d0 b5 d0 bd d0 b8 d0 b5 3f 22 3b 0d ............?";.
1190: 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
11a0: 20 20 20 20 20 20 20 20 20 69 66 28 4d 65 73 73 if(Mess
11b0: 61 67 65 42 6f 78 28 20 71 75 65 73 74 69 6f 6e ageBox( question
11c0: 53 74 69 72 6e 67 2c 20 6d 62 59 65 73 4e 6f 20 Stirng, mbYesNo
11d0: 7c 20 6d 62 44 65 66 42 75 74 74 6f 6e 31 20 7c | mbDefButton1 |
11e0: 20 6d 62 49 63 6f 6e 51 75 65 73 74 69 6f 6e 2c mbIconQuestion,
11f0: 20 22 d0 90 d0 b2 d1 82 d0 be 2d d1 81 d0 be d0 "........-.....
1200: b5 d0 b4 d0 b8 d0 bd d0 b5 d0 bd d0 b8 d0 b5 20 ...............
1210: d0 ba 20 d1 85 d1 80 d0 b0 d0 bd d0 b8 d0 bb d0 .. .............
1220: b8 d1 89 d1 83 21 22 29 20 3d 3d 20 6d 62 61 4e .....!") == mbaN
1230: 6f 29 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 o)..
1240: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
1250: 72 65 74 75 72 6e 3b 0d 0a 20 20 20 20 20 20 20 return;..
1260: 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 0d 0a }..
1270: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
1280: 20 20 20 20 2f 2f 20 d0 95 d1 81 d0 bb d0 b8 20 // ........
1290: d0 b5 d1 81 d1 82 d1 8c 20 d1 81 d0 be d1 85 d1 ........ .......
12a0: 80 d0 b0 d0 bd d0 b5 d0 bd d0 bd d1 8b d0 b5 20 ...............
12b0: d0 b4 d0 b0 d0 bd d0 bd d1 8b d0 b5 2c 20 d1 82 ............, ..
12c0: d0 be 20 d0 b2 d0 b2 d0 be d0 b4 d0 b8 d0 bc 20 .. ............
12d0: d0 b8 d1 85 0d 0a 20 20 20 20 20 20 20 20 20 20 ......
12e0: 20 20 20 20 20 20 20 20 20 20 64 6c 67 49 6e 66 dlgInf
12f0: 6f 2e 66 6f 72 6d 2e 67 65 74 43 6f 6e 74 72 6f o.form.getContro
1300: 6c 28 22 55 73 65 72 4e 61 6d 65 22 29 2e 76 61 l("UserName").va
1310: 6c 75 65 20 3d 20 64 61 74 61 2e 6c 6f 67 69 6e lue = data.login
1320: 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..
1330: 20 20 20 20 20 20 64 6c 67 49 6e 66 6f 2e 66 6f dlgInfo.fo
1340: 72 6d 2e 67 65 74 43 6f 6e 74 72 6f 6c 28 22 55 rm.getControl("U
1350: 73 65 72 50 61 73 73 77 6f 72 64 22 29 2e 76 61 serPassword").va
1360: 6c 75 65 20 3d 20 64 61 74 61 2e 70 61 73 73 77 lue = data.passw
1370: 6f 72 64 0d 0a 20 20 20 20 20 20 20 20 20 20 20 ord..
1380: 20 20 20 20 20 20 20 20 20 64 6c 67 49 6e 66 6f dlgInfo
1390: 2e 66 6f 72 6d 2e 67 65 74 43 6f 6e 74 72 6f 6c .form.getControl
13a0: 28 22 44 65 70 6f 74 50 61 74 68 22 29 2e 76 61 ("DepotPath").va
13b0: 6c 75 65 20 3d 20 64 61 74 61 2e 70 61 74 68 0d lue = data.path.
13c0: 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
13d0: 20 20 20 20 20 64 6c 67 49 6e 66 6f 2e 63 61 6e dlgInfo.can
13e0: 63 65 6c 20 3d 20 74 72 75 65 20 20 20 2f 2f 20 cel = true //
13f0: d0 9e d1 82 d0 bc d0 b5 d0 bd d1 8f d0 b5 d0 bc ................
1400: 20 d0 bf d0 be d0 ba d0 b0 d0 b7 20 d0 b4 d0 b8 .......... ....
1410: d0 b0 d0 bb d0 be d0 b3 d0 b0 0d 0a 20 20 20 20 ............
1420: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
1430: 64 6c 67 49 6e 66 6f 2e 72 65 73 75 6c 74 20 3d dlgInfo.result =
1440: 20 31 20 20 20 20 20 20 2f 2f 20 d0 9a d0 b0 d0 1 // .....
1450: ba 20 d0 b1 d1 83 d0 b4 d1 82 d0 be 20 d0 b2 20 . .......... ..
1460: d0 bd d0 b5 d0 bc 20 d0 bd d0 b0 d0 b6 d0 b0 d0 ...... .........
1470: bb d0 b8 20 d0 9e d0 ba 0d 0a 20 20 20 20 20 20 ... ......
1480: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 66 if
1490: 28 70 72 6f 66 69 6c 65 52 6f 6f 74 2e 67 65 74 (profileRoot.get
14a0: 56 61 6c 75 65 28 70 66 6c 53 68 6f 77 4d 65 73 Value(pflShowMes
14b0: 73 61 67 65 29 29 20 20 20 20 2f 2f 20 d0 98 d0 sage)) // ...
14c0: bd d1 84 d0 be d1 80 d0 bc d0 b8 d1 80 d1 83 d0 ................
14d0: b5 d0 bc 20 d0 bf d0 be d0 bb d1 8c d0 b7 d0 be ... ............
14e0: d0 b2 d0 b0 d1 82 d0 b5 d0 bb d1 8f 2c 20 d0 b5 ............, ..
14f0: d1 81 d0 bb d0 b8 20 d0 be d0 bd 20 d1 85 d0 be ...... .... ....
1500: d1 87 d0 b5 d1 82 0d 0a 20 20 20 20 20 20 20 20 ........
1510: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
1520: 4d 65 73 73 61 67 65 28 22 d0 90 d0 b2 d1 82 d0 Message(".......
1530: be 2d d0 bf d0 be d0 b4 d0 ba d0 bb d1 8e d1 87 .-..............
1540: d0 b5 d0 bd d0 b8 d0 b5 20 d0 ba 20 d1 85 d1 80 ........ .. ....
1550: d0 b0 d0 bd d0 b8 d0 bb d0 b8 d1 89 d1 83 20 27 .............. '
1560: 22 20 2b 20 64 61 74 61 2e 70 61 74 68 20 2b 20 " + data.path +
1570: 22 27 20 d0 bf d0 be d0 bb d1 8c d0 b7 d0 be d0 "' .............
1580: b2 d0 b0 d1 82 d0 b5 d0 bb d0 b5 d0 bc 20 27 22 ............. '"
1590: 20 2b 20 64 61 74 61 2e 6c 6f 67 69 6e 20 2b 20 + data.login +
15a0: 22 27 22 29 0d 0a 20 20 20 20 20 20 20 20 20 20 "'")..
15b0: 20 20 20 20 20 20 20 20 20 20 2f 2f 20 d0 92 d0 // ...
15c0: b7 d0 b2 d0 b5 d0 b4 d0 b5 d0 bc 20 d0 bf d1 80 ........... ....
15d0: d0 be d1 86 d0 b5 d0 b4 d1 83 d1 80 d1 83 20 d0 .............. .
15e0: be d0 bf d1 80 d0 b5 d0 b4 d0 b5 d0 bb d0 b5 d0 ................
15f0: bd d0 b8 d1 8f 20 d1 83 d1 81 d0 bf d0 b5 d1 88 ..... ..........
1600: d0 bd d0 be d1 81 d1 82 d0 b8 20 d1 81 d0 be d0 .......... .....
1610: b5 d0 b4 d0 b8 d0 bd d0 b5 d0 bd d0 b8 d1 8f 20 ...............
1620: d1 81 20 d1 85 d1 80 d0 b0 d0 bd d0 b8 d0 bb d0 .. .............
1630: b8 d1 89 d0 b5 d0 bc 0d 0a 20 20 20 20 20 20 20 .........
1640: 20 20 20 20 20 20 20 20 20 20 20 20 20 70 72 65 pre
1650: 76 43 6f 6e 6e 65 63 74 53 75 63 63 65 73 73 65 vConnectSuccesse
1660: 64 20 3d 20 66 61 6c 73 65 0d 0a 20 20 20 20 20 d = false..
1670: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 e
1680: 76 65 6e 74 73 2e 63 6f 6e 6e 65 63 74 28 44 65 vents.connect(De
1690: 73 69 67 6e 65 72 2c 20 22 6f 6e 49 64 6c 65 22 signer, "onIdle"
16a0: 2c 20 53 65 6c 66 53 63 72 69 70 74 2e 73 65 6c , SelfScript.sel
16b0: 66 29 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 f)..
16c0: 20 20 20 20 7d 0d 0a 20 20 20 20 20 20 20 20 20 }..
16d0: 20 20 20 7d 0d 0a 20 20 20 20 20 20 20 20 7d 0d }.. }.
16e0: 0a 20 20 20 20 20 20 20 20 65 6c 73 65 20 69 66 . else if
16f0: 28 64 6c 67 49 6e 66 6f 2e 73 74 61 67 65 20 3d (dlgInfo.stage =
1700: 3d 20 61 66 74 65 72 44 6f 4d 6f 64 61 6c 20 26 = afterDoModal &
1710: 26 20 64 6c 67 49 6e 66 6f 2e 72 65 73 75 6c 74 & dlgInfo.result
1720: 20 3d 3d 20 31 29 0d 0a 20 20 20 20 20 20 20 20 == 1)..
1730: 7b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 2f {.. /
1740: 2f 20 d0 9f d1 80 d0 b5 d0 b4 d0 bb d0 be d0 b6 / ..............
1750: d0 b8 d0 bc 20 d1 81 d0 be d1 85 d1 80 d0 b0 d0 .... ...........
1760: bd d0 b8 d1 82 d1 8c 20 d0 b2 d0 b2 d0 b5 d0 b4 ....... ........
1770: d0 b5 d0 bd d0 bd d1 8b d0 b5 20 d0 b4 d0 b0 d0 .......... .....
1780: bd d0 bd d1 8b d0 b5 0d 0a 20 20 20 20 20 20 20 .........
1790: 20 20 20 20 20 69 66 28 4d 65 73 73 61 67 65 42 if(MessageB
17a0: 6f 78 28 22 d0 9f d0 be d0 b4 d1 81 d1 82 d0 b0 ox("............
17b0: d0 b2 d0 bb d1 8f d1 82 d1 8c 20 d0 b2 d0 b2 d0 .......... .....
17c0: b5 d0 b4 d0 b5 d0 bd d0 bd d1 8b d0 b5 20 d0 b7 ............. ..
17d0: d0 bd d0 b0 d1 87 d0 b5 d0 bd d0 b8 d1 8f 20 d0 .............. .
17e0: b0 d0 b2 d1 82 d0 be d0 bc d0 b0 d1 82 d0 b8 d1 ................
17f0: 87 d0 b5 d1 81 d0 ba d0 b8 20 d0 bf d1 80 d0 b8 ......... ......
1800: 20 d0 bf d0 be d1 81 d0 bb d0 b5 d0 b4 d1 83 d1 ...............
1810: 8e d1 89 d0 b8 d1 85 20 d0 bf d0 be d0 b4 d0 ba ....... ........
1820: d0 bb d1 8e d1 87 d0 b5 d0 bd d0 b8 d1 8f d1 85 ................
1830: 3f 22 2c 0d 0a 20 20 20 20 20 20 20 20 20 20 20 ?",..
1840: 20 20 20 20 20 6d 62 59 65 73 4e 6f 20 7c 20 6d mbYesNo | m
1850: 62 44 65 66 42 75 74 74 6f 6e 31 20 7c 20 6d 62 bDefButton1 | mb
1860: 49 63 6f 6e 51 75 65 73 74 69 6f 6e 29 20 3d 3d IconQuestion) ==
1870: 20 6d 62 61 59 65 73 29 0d 0a 20 20 20 20 20 20 mbaYes)..
1880: 20 20 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 20 {..
1890: 20 20 20 20 20 20 20 20 20 2f 2f 20 d0 a1 d0 be // ....
18a0: d1 85 d1 80 d0 b0 d0 bd d0 b8 d0 bc 20 d0 b8 d1 ............ ...
18b0: 85 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ...
18c0: 20 20 20 76 61 72 20 64 61 74 61 20 3d 20 76 38 var data = v8
18d0: 4e 65 77 28 22 d0 a1 d1 82 d1 80 d1 83 d0 ba d1 New("...........
18e0: 82 d1 83 d1 80 d0 b0 22 2c 20 22 6c 6f 67 69 6e .......", "login
18f0: 2c 70 61 73 73 77 6f 72 64 2c 70 61 74 68 22 2c ,password,path",
1900: 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..
1910: 20 20 20 20 20 20 64 6c 67 49 6e 66 6f 2e 66 6f dlgInfo.fo
1920: 72 6d 2e 67 65 74 43 6f 6e 74 72 6f 6c 28 22 55 rm.getControl("U
1930: 73 65 72 4e 61 6d 65 22 29 2e 76 61 6c 75 65 2c serName").value,
1940: 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..
1950: 20 20 20 20 20 20 64 6c 67 49 6e 66 6f 2e 66 6f dlgInfo.fo
1960: 72 6d 2e 67 65 74 43 6f 6e 74 72 6f 6c 28 22 55 rm.getControl("U
1970: 73 65 72 50 61 73 73 77 6f 72 64 22 29 2e 76 61 serPassword").va
1980: 6c 75 65 2c 0d 0a 20 20 20 20 20 20 20 20 20 20 lue,..
1990: 20 20 20 20 20 20 20 20 20 20 64 6c 67 49 6e 66 dlgInf
19a0: 6f 2e 66 6f 72 6d 2e 67 65 74 43 6f 6e 74 72 6f o.form.getContro
19b0: 6c 28 22 44 65 70 6f 74 50 61 74 68 22 29 2e 76 l("DepotPath").v
19c0: 61 6c 75 65 29 0d 0a 20 20 20 20 20 20 20 20 20 alue)..
19d0: 20 20 20 20 20 20 20 76 61 72 20 63 75 72 72 65 var curre
19e0: 6e 74 42 61 73 65 50 61 74 68 20 3d 20 63 6e 6e ntBasePath = cnn
19f0: 53 74 72 69 6e 67 28 29 3b 0d 0a 20 20 20 20 20 String();..
1a00: 20 20 20 20 20 20 20 20 20 20 20 70 72 6f 66 69 profi
1a10: 6c 65 52 6f 6f 74 2e 63 72 65 61 74 65 56 61 6c leRoot.createVal
1a20: 75 65 28 70 66 6c 44 61 74 61 2c 20 66 61 6c 73 ue(pflData, fals
1a30: 65 2c 20 70 66 6c 42 61 73 65 55 73 65 72 29 20 e, pflBaseUser)
1a40: 20 20 20 2f 2f 20 d0 a5 d1 80 d0 b0 d0 bd d0 b8 // ..........
1a50: d0 bc 20 d0 be d1 82 d0 b4 d0 b5 d0 bb d1 8c d0 .. .............
1a60: bd d0 be 20 d0 b4 d0 bb d1 8f 20 d0 b1 d0 b0 d0 ... ...... .....
1a70: b7 d1 8b 2f d0 bf d0 be d0 bb d1 8c d0 b7 d0 be .../............
1a80: d0 b2 d0 b0 d1 82 d0 b5 d0 bb d1 8f 0d 0a 20 20 ..............
1a90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 70 72 pr
1aa0: 6f 66 69 6c 65 52 6f 6f 74 2e 63 72 65 61 74 65 ofileRoot.create
1ab0: 56 61 6c 75 65 28 70 66 6c 43 75 72 72 65 6e 74 Value(pflCurrent
1ac0: 42 61 73 65 50 61 74 68 2c 20 66 61 6c 73 65 2c BasePath, false,
1ad0: 20 70 66 6c 42 61 73 65 55 73 65 72 29 3b 0d 0a pflBaseUser);..
1ae0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
1af0: 70 72 6f 66 69 6c 65 52 6f 6f 74 2e 73 65 74 56 profileRoot.setV
1b00: 61 6c 75 65 28 70 66 6c 44 61 74 61 2c 20 64 61 alue(pflData, da
1b10: 74 61 29 0d 0a 20 20 20 20 20 20 20 20 20 20 20 ta)..
1b20: 20 20 20 20 20 70 72 6f 66 69 6c 65 52 6f 6f 74 profileRoot
1b30: 2e 73 65 74 56 61 6c 75 65 28 70 66 6c 43 75 72 .setValue(pflCur
1b40: 72 65 6e 74 42 61 73 65 50 61 74 68 2c 20 63 75 rentBasePath, cu
1b50: 72 72 65 6e 74 42 61 73 65 50 61 74 68 29 0d 0a rrentBasePath)..
1b60: 20 20 20 20 20 20 20 20 20 20 20 20 7d 0d 0a 20 }..
1b70: 20 20 20 20 20 20 20 7d 0d 0a 20 20 20 20 20 20 }..
1b80: 20 20 0d 0a 20 20 20 20 7d 0d 0a 20 20 20 20 65 .. }.. e
1b90: 6c 73 65 20 69 66 28 64 6c 67 49 6e 66 6f 2e 73 lse if(dlgInfo.s
1ba0: 74 61 67 65 20 3d 3d 20 6f 70 65 6e 4d 6f 64 61 tage == openModa
1bb0: 6c 57 6e 64 20 26 26 20 28 64 6c 67 49 6e 66 6f lWnd && (dlgInfo
1bc0: 2e 63 61 70 74 69 6f 6e 20 3d 3d 20 22 d0 97 d0 .caption == "...
1bd0: b0 d1 85 d0 b2 d0 b0 d1 82 20 d0 be d0 b1 d1 8a ......... ......
1be0: d0 b5 d0 ba d1 82 d0 be d0 b2 20 d0 b2 20 d1 85 .......... .. ..
1bf0: d1 80 d0 b0 d0 bd d0 b8 d0 bb d0 b8 d1 89 d0 b5 ................
1c00: 20 d0 ba d0 be d0 bd d1 84 d0 b8 d0 b3 d1 83 d1 ...............
1c10: 80 d0 b0 d1 86 d0 b8 d0 b8 22 20 7c 7c 0d 0a 20 ........." ||..
1c20: 20 20 20 20 20 20 20 64 6c 67 49 6e 66 6f 2e 63 dlgInfo.c
1c30: 61 70 74 69 6f 6e 20 3d 3d 20 22 d0 9f d0 be d0 aption == ".....
1c40: bc d0 b5 d1 89 d0 b5 d0 bd d0 b8 d0 b5 20 d0 be ............. ..
1c50: d0 b1 d1 8a d0 b5 d0 ba d1 82 d0 be d0 b2 20 d0 .............. .
1c60: b2 20 d1 85 d1 80 d0 b0 d0 bd d0 b8 d0 bb d0 b8 . ..............
1c70: d1 89 d0 b5 20 d0 ba d0 be d0 bd d1 84 d0 b8 d0 .... ...........
1c80: b3 d1 83 d1 80 d0 b0 d1 86 d0 b8 d0 b8 22 29 29 ............."))
1c90: 0d 0a 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 20 .. {..
1ca0: 20 2f 2f 66 6f 72 28 76 61 72 20 69 20 3d 20 30 //for(var i = 0
1cb0: 3b 20 69 20 3c 20 64 6c 67 49 6e 66 6f 2e 66 6f ; i < dlgInfo.fo
1cc0: 72 6d 2e 63 6f 6e 74 72 6f 6c 73 43 6f 75 6e 74 rm.controlsCount
1cd0: 3b 20 69 2b 2b 29 0d 0a 20 20 20 20 20 20 20 20 ; i++)..
1ce0: 2f 2f 20 20 20 20 4d 65 73 73 61 67 65 28 64 6c // Message(dl
1cf0: 67 49 6e 66 6f 2e 66 6f 72 6d 2e 67 65 74 43 6f gInfo.form.getCo
1d00: 6e 74 72 6f 6c 28 69 29 2e 6e 61 6d 65 29 0d 0a ntrol(i).name)..
1d10: 20 20 20 20 20 20 20 20 64 6c 67 49 6e 66 6f 2e dlgInfo.
1d20: 66 6f 72 6d 2e 67 65 74 43 6f 6e 74 72 6f 6c 28 form.getControl(
1d30: 22 47 65 74 52 65 63 75 72 73 69 76 65 22 29 2e "GetRecursive").
1d40: 76 61 6c 75 65 20 3d 20 67 65 74 52 65 63 75 72 value = getRecur
1d50: 73 69 76 65 43 68 65 63 6b 6f 75 74 4f 70 74 69 siveCheckoutOpti
1d60: 6f 6e 28 29 3b 0d 0a 20 20 20 20 7d 0d 0a 7d 0d on();.. }..}.
1d70: 0a 0d 0a 66 75 6e 63 74 69 6f 6e 20 6f 6e 49 64 ...function onId
1d80: 6c 65 28 29 0d 0a 7b 0d 0a 20 20 20 20 70 72 65 le()..{.. pre
1d90: 76 43 6f 6e 6e 65 63 74 53 75 63 63 65 73 73 65 vConnectSuccesse
1da0: 64 20 3d 20 74 72 75 65 0d 0a 20 20 20 20 65 76 d = true.. ev
1db0: 65 6e 74 73 2e 64 69 73 63 6f 6e 6e 65 63 74 28 ents.disconnect(
1dc0: 44 65 73 69 67 6e 65 72 2c 20 22 6f 6e 49 64 6c Designer, "onIdl
1dd0: 65 22 2c 20 53 65 6c 66 53 63 72 69 70 74 2e 73 e", SelfScript.s
1de0: 65 6c 66 29 0d 0a 7d 0d 0a 0d 0a 66 75 6e 63 74 elf)..}....funct
1df0: 69 6f 6e 20 67 65 74 52 65 63 75 72 73 69 76 65 ion getRecursive
1e00: 43 68 65 63 6b 6f 75 74 4f 70 74 69 6f 6e 28 29 CheckoutOption()
1e10: 7b 0d 0a 20 20 20 20 76 61 72 20 63 75 72 72 65 {.. var curre
1e20: 6e 74 56 61 6c 75 65 20 3d 20 70 72 6f 66 69 6c ntValue = profil
1e30: 65 52 6f 6f 74 2e 67 65 74 56 61 6c 75 65 28 70 eRoot.getValue(p
1e40: 66 6c 41 75 74 6f 52 65 63 75 72 73 69 76 65 43 flAutoRecursiveC
1e50: 68 65 63 6b 4f 75 74 29 3b 0d 0a 0d 0a 20 20 20 heckOut);....
1e60: 20 69 66 28 63 75 72 72 65 6e 74 56 61 6c 75 65 if(currentValue
1e70: 20 3d 3d 20 6e 75 6c 6c 29 7b 0d 0a 20 20 20 20 == null){..
1e80: 20 20 20 20 2f 2f 20 d0 a2 d0 b0 d0 ba d0 be d0 // .........
1e90: b9 20 d0 be d0 bf d1 86 d0 b8 d0 b8 20 d0 bd d0 . .......... ...
1ea0: b5 20 d0 b7 d0 b0 d0 bf d0 b8 d1 81 d0 b0 d0 bd . ..............
1eb0: d0 be 2e 20 d0 94 d0 bb d1 8f 20 d0 be d0 b1 d1 ... ...... .....
1ec0: 80 d0 b0 d1 82 d0 bd d0 be d0 b9 20 d1 81 d0 be ........... ....
1ed0: d0 b2 d0 bc d0 b5 d1 81 d1 82 d0 b8 d0 bc d0 be ................
1ee0: d1 81 d1 82 d0 b8 2c 20 d0 b4 d0 bb d1 8f 20 d1 ......, ...... .
1ef0: 82 d0 b5 d1 85 2c 20 d0 ba d0 be d0 bc d1 83 20 ....., ........
1f00: d0 bd d1 80 d0 b0 d0 b2 d0 b8 d0 bb d1 81 d1 8f ................
1f10: 20 d1 80 d0 b5 d0 ba d1 83 d1 80 d1 81 d0 b8 d0 ...............
1f20: b2 d0 bd d1 8b d0 b9 20 d0 b7 d0 b0 d1 85 d0 b2 ....... ........
1f30: d0 b0 d1 82 20 d0 bf d0 be 2d d1 83 d0 bc d0 be .... ....-......
1f40: d0 bb d1 87 d0 b0 d0 bd d0 b8 d1 8e 0d 0a 20 20 ..............
1f50: 20 20 20 20 20 20 2f 2f 20 d0 bc d1 8b 20 d0 b2 // .... ..
1f60: d1 81 d0 b5 d0 b3 d0 b4 d0 b0 20 d0 b1 d1 83 d0 .......... .....
1f70: b4 d0 b5 d0 bc 20 d0 b2 d0 be d0 b7 d0 b2 d1 80 ..... ..........
1f80: d0 b0 d0 b7 d0 b0 d1 82 d1 8c 20 74 72 75 65 0d .......... true.
1f90: 0a 20 20 20 20 20 20 20 20 63 75 72 72 65 6e 74 . current
1fa0: 56 61 6c 75 65 20 3d 20 74 72 75 65 3b 0d 0a 20 Value = true;..
1fb0: 20 20 20 7d 0d 0a 0d 0a 20 20 20 20 72 65 74 75 }.... retu
1fc0: 72 6e 20 63 75 72 72 65 6e 74 56 61 6c 75 65 3b rn currentValue;
1fd0: 0d 0a 7d 0d 0a 0d 0a 0d 0a 53 65 6c 66 53 63 72 ..}......SelfScr
1fe0: 69 70 74 2e 73 65 6c 66 5b 22 6d 61 63 72 6f 73 ipt.self["macros
1ff0: d0 a1 d0 b1 d1 80 d0 be d1 81 d0 b8 d1 82 d1 8c ................
2000: 20 63 d0 be d1 85 d1 80 d0 b0 d0 bd d0 b5 d0 bd c..............
2010: d0 bd d1 8b d0 b5 20 d0 b4 d0 b0 d0 bd d0 bd d1 ...... .........
2020: 8b d0 b5 22 5d 20 3d 20 66 75 6e 63 74 69 6f 6e ..."] = function
2030: 28 29 0d 0a 7b 0d 0a 20 20 20 20 70 72 6f 66 69 ()..{.. profi
2040: 6c 65 52 6f 6f 74 2e 64 65 6c 65 74 65 56 61 6c leRoot.deleteVal
2050: 75 65 28 70 66 6c 44 61 74 61 29 3b 0d 0a 20 20 ue(pflData);..
2060: 20 20 70 72 6f 66 69 6c 65 52 6f 6f 74 2e 64 65 profileRoot.de
2070: 6c 65 74 65 56 61 6c 75 65 28 70 66 6c 43 75 72 leteValue(pflCur
2080: 72 65 6e 74 42 61 73 65 50 61 74 68 29 3b 0d 0a rentBasePath);..
2090: 0d 0a 7d 0d 0a 0d 0a 53 65 6c 66 53 63 72 69 70 ..}....SelfScrip
20a0: 74 2e 73 65 6c 66 5b 22 6d 61 63 72 6f 73 d0 9f t.self["macros..
20b0: d0 be d0 ba d0 b0 d0 b7 d1 8b d0 b2 d0 b0 d1 82 ................
20c0: d1 8c 20 d1 81 d0 be d0 be d0 b1 d1 89 d0 b5 d0 .. .............
20d0: bd d0 b8 d0 b5 20 d0 bf d1 80 d0 b8 20 d0 bf d0 ..... ...... ...
20e0: be d0 b4 d0 ba d0 bb d1 8e d1 87 d0 b5 d0 bd d0 ................
20f0: b8 d0 b8 22 5d 20 3d 20 66 75 6e 63 74 69 6f 6e ..."] = function
2100: 28 29 0d 0a 7b 0d 0a 20 20 20 20 70 72 6f 66 69 ()..{.. profi
2110: 6c 65 52 6f 6f 74 2e 73 65 74 56 61 6c 75 65 28 leRoot.setValue(
2120: 70 66 6c 53 68 6f 77 4d 65 73 73 61 67 65 2c 20 pflShowMessage,
2130: 74 72 75 65 29 0d 0a 7d 0d 0a 0d 0a 53 65 6c 66 true)..}....Self
2140: 53 63 72 69 70 74 2e 73 65 6c 66 5b 22 6d 61 63 Script.self["mac
2150: 72 6f 73 d0 9d d0 b5 20 d0 bf d0 be d0 ba d0 b0 ros.... ........
2160: d0 b7 d1 8b d0 b2 d0 b0 d1 82 d1 8c 20 d1 81 d0 ............ ...
2170: be d0 be d0 b1 d1 89 d0 b5 d0 bd d0 b8 d0 b5 20 ...............
2180: d0 bf d1 80 d0 b8 20 d0 bf d0 be d0 b4 d0 ba d0 ...... .........
2190: bb d1 8e d1 87 d0 b5 d0 bd d0 b8 d0 b8 22 5d 20 ............."]
21a0: 3d 20 66 75 6e 63 74 69 6f 6e 28 29 0d 0a 7b 0d = function()..{.
21b0: 0a 20 20 20 20 70 72 6f 66 69 6c 65 52 6f 6f 74 . profileRoot
21c0: 2e 73 65 74 56 61 6c 75 65 28 70 66 6c 53 68 6f .setValue(pflSho
21d0: 77 4d 65 73 73 61 67 65 2c 20 66 61 6c 73 65 29 wMessage, false)
21e0: 0d 0a 7d 0d 0a 0d 0a 53 65 6c 66 53 63 72 69 70 ..}....SelfScrip
21f0: 74 2e 73 65 6c 66 5b 22 6d 61 63 72 6f 73 d0 9d t.self["macros..
2200: d0 b0 d1 81 d1 82 d1 80 d0 be d0 b8 d1 82 d1 8c ................
2210: 20 d0 b0 d0 b2 d1 82 d0 be d0 bc d0 b0 d1 82 d0 ...............
2220: b8 d1 87 d0 b5 d1 81 d0 ba d0 b8 d0 b9 20 d1 80 ............. ..
2230: d0 b5 d0 ba d1 83 d1 80 d1 81 d0 b8 d0 b2 d0 bd ................
2240: d1 8b d0 b9 20 d0 b7 d0 b0 d1 85 d0 b2 d0 b0 d1 .... ...........
2250: 82 22 5d 20 3d 20 66 75 6e 63 74 69 6f 6e 28 29 ."] = function()
2260: 0d 0a 7b 0d 0a 20 20 20 20 76 61 72 20 6d 62 59 ..{.. var mbY
2270: 65 73 20 3d 20 36 3b 0d 0a 20 20 20 20 76 61 72 es = 6;.. var
2280: 20 6d 62 4e 6f 20 3d 20 37 3b 0d 0a 20 20 20 20 mbNo = 7;..
2290: 76 61 72 20 76 61 6c 75 65 53 65 74 20 3d 20 6e var valueSet = n
22a0: 75 6c 6c 3b 0d 0a 0d 0a 20 20 20 20 76 61 72 20 ull;.... var
22b0: 61 6e 73 77 65 72 20 3d 20 4d 65 73 73 61 67 65 answer = Message
22c0: 42 6f 78 28 22 d0 92 d0 ba d0 bb d1 8e d1 87 d0 Box("...........
22d0: b8 d1 82 d1 8c 20 d0 b0 d0 b2 d1 82 d0 be d0 bc ..... ..........
22e0: d0 b0 d1 82 d0 b8 d1 87 d0 b5 d1 81 d0 ba d1 83 ................
22f0: d1 8e 20 d1 83 d1 81 d1 82 d0 b0 d0 bd d0 be d0 .. .............
2300: b2 d0 ba d1 83 20 d1 84 d0 bb d0 b0 d0 b3 d0 b0 ..... ..........
2310: 20 5c 22 d0 97 d0 b0 d1 85 d0 b2 d0 b0 d1 82 d1 \".............
2320: 8b d0 b2 d0 b0 d1 82 d1 8c 20 d1 80 d0 b5 d0 ba ......... ......
2330: d1 83 d1 80 d1 81 d0 b8 d0 b2 d0 bd d0 be 5c 22 ..............\"
2340: 22 2c 20 34 2c 20 22 d0 9d d0 b0 d1 81 d1 82 d1 ", 4, ".........
2350: 80 d0 be d0 b9 d0 ba d0 b0 20 d1 84 d0 bb d0 b0 ......... ......
2360: d0 b6 d0 ba d0 b0 20 5c 22 d0 a0 d0 b5 d0 ba d1 ...... \".......
2370: 83 d1 80 d1 81 d0 b8 d0 b2 d0 bd d0 be 5c 22 22 .............\""
2380: 29 3b 0d 0a 20 20 20 20 0d 0a 20 20 20 20 69 66 );.. .. if
2390: 28 61 6e 73 77 65 72 20 3d 3d 20 6d 62 59 65 73 (answer == mbYes
23a0: 29 0d 0a 20 20 20 20 20 20 20 20 76 61 6c 75 65 ).. value
23b0: 53 65 74 20 3d 20 74 72 75 65 3b 0d 0a 20 20 20 Set = true;..
23c0: 20 65 6c 73 65 20 69 66 28 61 6e 73 77 65 72 20 else if(answer
23d0: 3d 3d 20 6d 62 4e 6f 29 0d 0a 20 20 20 20 20 20 == mbNo)..
23e0: 20 20 76 61 6c 75 65 53 65 74 20 3d 20 66 61 6c valueSet = fal
23f0: 73 65 3b 0d 0a 0d 0a 20 20 20 20 69 66 28 61 6e se;.... if(an
2400: 73 77 65 72 20 21 3d 20 6e 75 6c 6c 29 7b 0d 0a swer != null){..
2410: 20 20 20 20 20 20 20 20 2f 2f 20 d0 9f d0 be d0 // .....
2420: bb d1 8c d0 b7 d0 be d0 b2 d0 b0 d1 82 d0 b5 d0 ................
2430: bb d1 8c 20 d0 bd d0 b5 20 d0 be d1 82 d0 ba d0 ... .... .......
2440: b0 d0 b7 d0 b0 d0 bb d1 81 d1 8f 20 d0 be d1 82 ........... ....
2450: 20 d0 b2 d1 8b d0 b1 d0 be d1 80 d0 b0 20 d0 b8 ............ ..
2460: 20 d1 85 d0 be d1 87 d0 b5 d1 82 20 d0 bf d0 be .......... ....
2470: d0 bc d0 b5 d0 bd d1 8f d1 82 d1 8c 20 d0 be d0 ............ ...
2480: bf d1 86 d0 b8 d1 8e 0d 0a 20 20 20 20 20 20 20 .........
2490: 20 70 72 6f 66 69 6c 65 52 6f 6f 74 2e 63 72 65 profileRoot.cre
24a0: 61 74 65 56 61 6c 75 65 28 70 66 6c 41 75 74 6f ateValue(pflAuto
24b0: 52 65 63 75 72 73 69 76 65 43 68 65 63 6b 4f 75 RecursiveCheckOu
24c0: 74 2c 20 74 72 75 65 2c 20 70 66 6c 43 6f 6d 70 t, true, pflComp
24d0: 75 74 65 72 29 3b 0d 0a 20 20 20 20 20 20 20 20 uter);..
24e0: 70 72 6f 66 69 6c 65 52 6f 6f 74 2e 73 65 74 56 profileRoot.setV
24f0: 61 6c 75 65 28 70 66 6c 41 75 74 6f 52 65 63 75 alue(pflAutoRecu
2500: 72 73 69 76 65 43 68 65 63 6b 4f 75 74 2c 20 76 rsiveCheckOut, v
2510: 61 6c 75 65 53 65 74 29 3b 0d 0a 20 20 20 20 20 alueSet);..
2520: 20 20 20 73 61 76 65 50 72 6f 66 69 6c 65 28 29 saveProfile()
2530: 3b 0d 0a 20 20 20 20 7d 0d 0a 7d 0d 0a ;.. }..}..