Liren Large Software Subsidy 5

home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 5 / 05.iso / a / a084 / 2.ddi / CKSAMPLE / CONNECT.SCT < prev next >
Unknown | 1993-05-25 | 4.3 KB
open in:
MacOS 8.1 |
Win98 |
DOS
view JSON data |
view as text

This file was not able to be converted.
This format is not currently supported by dexvert.
Confidence	Program	Detection	Match Type	Support
`66%`	dexvert	Sound Control Module `(music/soundControl)`	ext	Supported
`100%`	file	Adobe Photoshop Color swatch, version 0, 134 colors; 1st RGB space (0), w 0x21, x 0, y 0, z 0 ; 2nd RGB space (0), w 0, x 0, y 0, z 0	default (weak)
`99%`	file	data	default
`50%`	TrID	MacBinary 1	default (weak)
`49%`	TrID	Adobe PhotoShop Brush	default (weak)
`100%`	siegfried	x-fmt/342 Microsoft FoxPro Memo	default (weak)
hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 00 86 00 00 00 21 | 00 00 00 00 00 00 00 00 |.......!|........|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000060| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000080| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000090| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000100| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000110| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000120| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000130| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000140| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000150| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000160| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000170| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000180| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000190| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000200| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000210| 00 00 00 01 00 00 00 1a | 22 20 43 6f 6e 6e 65 63 |........|" Connec|
|00000220| 74 20 74 6f 20 44 61 74 | 61 20 53 6f 75 72 63 65 |t to Dat|a Source|
|00000230| 20 22 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 | "......|........|
|00000240| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000250| 00 00 00 00 00 01 00 00 | 00 3d 64 61 74 61 73 6f |........|.=dataso|
|00000260| 75 72 63 65 09 3d 20 22 | 22 0d 0a 75 73 65 72 69 |urce.= "|"..useri|
|00000270| 64 09 09 3d 20 22 22 0d | 0a 70 61 73 73 77 6f 72 |d..= "".|.passwor|
|00000280| 64 09 3d 20 22 22 0d 0a | 63 6f 6e 6e 73 74 72 09 |d.= ""..|connstr.|
|00000290| 09 3d 20 22 22 0d 0a 00 | 00 00 00 00 00 00 00 00 |.= ""...|........|
|000002a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002b0| 00 00 00 00 00 00 00 00 | 01 00 00 00 0f 22 44 61 |........|....."Da|
|000002c0| 74 61 20 53 6f 75 72 63 | 65 3a 20 22 00 00 00 00 |ta Sourc|e: "....|
|000002d0| 00 00 00 00 00 00 00 00 | 00 01 00 00 00 0a 44 61 |........|......Da|
|000002e0| 74 61 53 6f 75 72 63 65 | 00 00 00 00 00 00 00 00 |taSource|........|
|000002f0| 00 00 00 00 00 00 00 00 | 00 00 01 00 00 00 06 55 |........|.......U|
|00000300| 73 65 72 49 44 00 00 00 | 00 00 00 00 00 00 00 00 |serID...|........|
|00000310| 00 00 00 00 00 00 00 00 | 00 00 00 01 00 00 00 08 |........|........|
|00000320| 50 61 73 73 77 6f 72 64 | 00 00 00 00 00 00 00 00 |Password|........|
|00000330| 00 00 00 00 00 00 00 00 | 00 00 00 00 01 00 00 00 |........|........|
|00000340| 07 63 6f 6e 6e 73 74 72 | 00 00 00 00 00 00 00 00 |.connstr|........|
|00000350| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 01 00 00 |........|........|
|00000360| 00 0a 45 78 69 74 41 63 | 74 69 6f 6e 00 00 00 00 |..ExitAc|tion....|
|00000370| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 01 00 |........|........|
|00000380| 00 00 14 22 40 2a 48 4e | 20 5c 21 4f 4b 3b 5c 3f |..."@*HN| \!OK;\?|
|00000390| 43 61 6e 63 65 6c 22 00 | 00 00 00 00 00 00 00 01 |Cancel".|........|
|000003a0| 00 00 04 a3 49 46 20 28 | 65 78 69 74 61 63 74 69 |....IF (|exitacti|
|000003b0| 6f 6e 20 3d 3d 20 31 29 | 0d 0a 0d 0a 09 49 46 20 |on == 1)|.....IF |
|000003c0| 28 45 4d 50 54 59 28 64 | 61 74 61 73 6f 75 72 63 |(EMPTY(d|atasourc|
|000003d0| 65 29 29 0d 0a 09 09 57 | 41 49 54 20 57 49 4e 44 |e))....W|AIT WIND|
|000003e0| 4f 57 20 22 44 61 74 61 | 20 53 6f 75 72 63 65 20 |OW "Data| Source |
|000003f0| 69 73 20 72 65 71 75 69 | 72 65 64 21 22 20 4e 4f |is requi|red!" NO|
|00000400| 57 41 49 54 0d 0a 09 09 | 52 45 54 55 52 4e 20 32 |WAIT....|RETURN 2|
|00000410| 20 20 26 26 20 61 64 76 | 61 6e 63 65 20 74 6f 20 |  && adv|ance to |
|00000420| 64 61 74 61 20 73 6f 75 | 72 63 65 20 66 69 65 6c |data sou|rce fiel|
|00000430| 64 0d 0a 09 45 4e 44 49 | 46 0d 0a 09 49 46 20 28 |d...ENDI|F...IF (|
|00000440| 45 4d 50 54 59 28 75 73 | 65 72 69 64 29 29 0d 0a |EMPTY(us|erid))..|
|00000450| 09 09 57 41 49 54 20 57 | 49 4e 44 4f 57 20 22 55 |..WAIT W|INDOW "U|
|00000460| 73 65 72 20 49 64 20 69 | 73 20 72 65 71 75 69 72 |ser Id i|s requir|
|00000470| 65 64 21 22 20 4e 4f 57 | 41 49 54 0d 0a 09 09 52 |ed!" NOW|AIT....R|
|00000480| 45 54 55 52 4e 20 33 20 | 26 26 20 61 64 76 61 6e |ETURN 3 |&& advan|
|00000490| 63 65 20 74 6f 20 75 73 | 65 72 20 69 64 20 66 69 |ce to us|er id fi|
|000004a0| 65 6c 64 0d 0a 09 45 4e | 44 49 46 0d 0a 0d 0a 09 |eld...EN|DIF.....|
|000004b0| 64 61 74 61 73 6f 75 72 | 63 65 09 3d 20 41 4c 4c |datasour|ce.= ALL|
|000004c0| 54 52 49 4d 28 64 61 74 | 61 73 6f 75 72 63 65 29 |TRIM(dat|asource)|
|000004d0| 0d 0a 09 75 73 65 72 69 | 64 09 09 3d 20 41 4c 4c |...useri|d..= ALL|
|000004e0| 54 52 49 4d 28 75 73 65 | 72 69 64 29 0d 0a 09 70 |TRIM(use|rid)...p|
|000004f0| 61 73 73 77 6f 72 64 09 | 3d 20 41 4c 4c 54 52 49 |assword.|= ALLTRI|
|00000500| 4d 28 70 61 73 73 77 6f | 72 64 29 0d 0a 09 63 6f |M(passwo|rd)...co|
|00000510| 6e 6e 73 74 72 09 09 3d | 20 41 4c 4c 54 52 49 4d |nnstr..=| ALLTRIM|
|00000520| 28 63 6f 6e 6e 73 74 72 | 29 0d 0a 0d 0a 09 72 65 |(connstr|).....re|
|00000530| 74 63 6f 64 65 20 3d 20 | 64 62 73 65 74 6f 70 74 |tcode = |dbsetopt|
|00000540| 28 30 2c 20 22 44 69 73 | 70 45 72 72 6f 72 22 2c |(0, "Dis|pError",|
|00000550| 20 30 29 0d 0a 09 49 46 | 20 28 72 65 74 63 6f 64 | 0)...IF| (retcod|
|00000560| 65 20 3c 20 30 29 0d 0a | 09 09 44 4f 20 72 65 70 |e < 0)..|..DO rep|
|00000570| 6f 65 72 72 6f 2e 73 70 | 72 20 57 49 54 48 20 72 |oerro.sp|r WITH r|
|00000580| 65 74 63 6f 64 65 0d 0a | 09 45 4e 44 49 46 0d 0a |etcode..|.ENDIF..|
|00000590| 0d 0a 09 57 41 49 54 20 | 57 49 4e 44 4f 57 20 22 |...WAIT |WINDOW "|
|000005a0| 41 74 74 65 6d 70 74 69 | 6e 67 20 74 6f 20 63 6f |Attempti|ng to co|
|000005b0| 6e 6e 65 63 74 2e 2e 2e | 22 20 4e 4f 57 41 49 54 |nnect...|" NOWAIT|
|000005c0| 0d 0a 09 63 6b 68 61 6e | 64 6c 65 20 3d 20 64 62 |...ckhan|dle = db|
|000005d0| 63 6f 6e 6e 65 63 74 28 | 64 61 74 61 73 6f 75 72 |connect(|datasour|
|000005e0| 63 65 2c 20 75 73 65 72 | 69 64 2c 20 70 61 73 73 |ce, user|id, pass|
|000005f0| 77 6f 72 64 2c 20 63 6f | 6e 6e 73 74 72 29 0d 0a |word, co|nnstr)..|
|00000600| 0d 0a 09 49 46 20 28 63 | 6b 68 61 6e 64 6c 65 20 |...IF (c|khandle |
|00000610| 3c 20 30 29 0d 0a 09 09 | 72 65 74 63 6f 64 65 20 |< 0)....|retcode |
|00000620| 3d 20 63 6b 68 61 6e 64 | 6c 65 0d 0a 09 09 44 4f |= ckhand|le....DO|
|00000630| 20 72 65 70 6f 65 72 72 | 6f 2e 73 70 72 20 57 49 | repoerr|o.spr WI|
|00000640| 54 48 20 72 65 74 63 6f | 64 65 0d 0a 09 09 52 45 |TH retco|de....RE|
|00000650| 54 55 52 4e 20 32 0d 0a | 09 45 4e 44 49 46 0d 0a |TURN 2..|.ENDIF..|
|00000660| 0d 0a 09 72 65 74 63 6f | 64 65 20 3d 20 64 62 73 |...retco|de = dbs|
|00000670| 65 74 6f 70 74 28 63 6b | 68 61 6e 64 6c 65 2c 20 |etopt(ck|handle, |
|00000680| 22 42 61 74 63 68 22 2c | 20 31 29 0d 0a 09 49 46 |"Batch",| 1)...IF|
|00000690| 20 28 72 65 74 63 6f 64 | 65 20 3c 20 30 29 0d 0a | (retcod|e < 0)..|
|000006a0| 09 09 44 4f 20 72 65 70 | 6f 65 72 72 6f 2e 73 70 |..DO rep|oerro.sp|
|000006b0| 72 20 57 49 54 48 20 72 | 65 74 63 6f 64 65 0d 0a |r WITH r|etcode..|
|000006c0| 09 45 4e 44 49 46 0d 0a | 0d 0a 09 72 65 74 63 6f |.ENDIF..|...retco|
|000006d0| 64 65 20 3d 20 64 62 73 | 65 74 6f 70 74 28 63 6b |de = dbs|etopt(ck|
|000006e0| 68 61 6e 64 6c 65 2c 20 | 22 44 69 73 70 45 72 72 |handle, |"DispErr|
|000006f0| 6f 72 22 2c 20 30 29 0d | 0a 09 49 46 20 28 72 65 |or", 0).|..IF (re|
|00000700| 74 63 6f 64 65 20 3c 20 | 30 29 0d 0a 09 09 44 4f |tcode < |0)....DO|
|00000710| 20 72 65 70 6f 65 72 72 | 6f 2e 73 70 72 20 57 49 | repoerr|o.spr WI|
|00000720| 54 48 20 72 65 74 63 6f | 64 65 0d 0a 09 45 4e 44 |TH retco|de...END|
|00000730| 49 46 0d 0a 0d 0a 09 72 | 65 74 63 6f 64 65 20 3d |IF.....r|etcode =|
|00000740| 20 64 62 73 65 74 6f 70 | 74 28 63 6b 68 61 6e 64 | dbsetop|t(ckhand|
|00000750| 6c 65 2c 20 22 42 72 6f | 77 73 65 22 2c 20 30 29 |le, "Bro|wse", 0)|
|00000760| 0d 0a 09 49 46 20 28 72 | 65 74 63 6f 64 65 20 3c |...IF (r|etcode <|
|00000770| 20 30 29 0d 0a 09 09 44 | 4f 20 72 65 70 6f 65 72 | 0)....D|O repoer|
|00000780| 72 6f 2e 73 70 72 20 57 | 49 54 48 20 72 65 74 63 |ro.spr W|ITH retc|
|00000790| 6f 64 65 0d 0a 09 45 4e | 44 49 46 0d 0a 0d 0a 09 |ode...EN|DIF.....|
|000007a0| 6d 65 73 73 5f 73 74 72 | 20 3d 20 22 44 61 74 61 |mess_str| = "Data|
|000007b0| 20 53 6f 75 72 63 65 3a | 20 22 2b 64 61 74 61 73 | Source:| "+datas|
|000007c0| 6f 75 72 63 65 0d 0a 09 | 53 45 54 20 4d 45 53 53 |ource...|SET MESS|
|000007d0| 41 47 45 20 54 4f 20 6d | 65 73 73 5f 73 74 72 0d |AGE TO m|ess_str.|
|000007e0| 0a 09 57 41 49 54 20 57 | 49 4e 44 4f 57 20 22 59 |..WAIT W|INDOW "Y|
|000007f0| 6f 75 20 61 72 65 20 6e | 6f 77 20 63 6f 6e 6e 65 |ou are n|ow conne|
|00000800| 63 74 65 64 20 74 6f 20 | 44 61 74 61 20 53 6f 75 |cted to |Data Sou|
|00000810| 72 63 65 3a 20 22 2b 64 | 61 74 61 73 6f 75 72 63 |rce: "+d|atasourc|
|00000820| 65 20 4e 4f 57 41 49 54 | 0d 0a 45 4e 44 49 46 0d |e NOWAIT|..ENDIF.|
|00000830| 0a 43 4c 45 41 52 20 52 | 45 41 44 0d 0a 52 45 54 |.CLEAR R|EAD..RET|
|00000840| 55 52 4e 20 30 0d 0a 00 | 00 00 00 00 00 00 00 00 |URN 0...|........|
|00000850| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000860| 00 00 00 00 01 00 00 00 | 04 22 4f 4b 22 00 00 00 |........|."OK"...|
|00000870| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000880| 00 00 00 00 00 01 00 00 | 00 11 22 43 6f 6e 6e 65 |........|.."Conne|
|00000890| 63 74 20 53 74 72 69 6e | 67 3a 22 00 00 00 00 00 |ct Strin|g:".....|
|000008a0| 00 00 00 00 00 00 01 00 | 00 00 0b 22 50 61 73 73 |........|..."Pass|
|000008b0| 77 6f 72 64 3a 22 00 00 | 00 00 00 00 00 00 00 00 |word:"..|........|
|000008c0| 00 00 00 00 00 00 00 01 | 00 00 00 12 22 55 73 65 |........|...."Use|
|000008d0| 72 20 49 64 65 6e 74 69 | 66 69 65 72 3a 22 00 00 |r Identi|fier:"..|
|000008e0| 00 00 00 00 00 00 00 00 | 01 00 00 00 1a 22 20 43 |........|....." C|
|000008f0| 6f 6e 6e 65 63 74 20 74 | 6f 20 44 61 74 61 20 53 |onnect t|o Data S|
|00000900| 6f 75 72 63 65 20 22 00 | 00 00 00 00 00 00 00 00 |ource ".|........|
|00000910| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000920| 00 00 00 00 00 00 00 00 | 00 00 01 00 00 00 0d 4d |........|.......M|
|00000930| 53 20 53 61 6e 73 20 53 | 65 72 69 66 00 00 00 00 |S Sans S|erif....|
|00000940| 00 00 00 00 00 00 00 00 | 00 00 00 01 00 00 00 48 |........|.......H|
|00000950| 09 64 61 74 61 73 6f 75 | 72 63 65 09 3d 20 22 22 |.datasou|rce.= ""|
|00000960| 0d 0a 09 75 73 65 72 69 | 64 09 09 3d 20 22 22 0d |...useri|d..= "".|
|00000970| 0a 09 70 61 73 73 77 6f | 72 64 09 3d 20 22 22 0d |..passwo|rd.= "".|
|00000980| 0a 09 63 6f 6e 6e 73 74 | 72 09 09 3d 20 73 70 61 |..connst|r..= spa|
|00000990| 63 65 28 34 30 29 0d 0a | 00 00 00 00 00 00 00 00 |ce(40)..|........|
|000009a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 01 00 |........|........|
|000009b0| 00 00 0f 22 44 61 74 61 | 20 53 6f 75 72 63 65 3a |..."Data| Source:|
|000009c0| 20 22 00 00 00 00 00 00 | 00 00 00 00 00 00 00 01 | "......|........|
|000009d0| 00 00 00 0d 4d 53 20 53 | 61 6e 73 20 53 65 72 69 |....MS S|ans Seri|
|000009e0| 66 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |f.......|........|
|000009f0| 01 00 00 00 12 22 55 73 | 65 72 20 49 64 65 6e 74 |....."Us|er Ident|
|00000a00| 69 66 69 65 72 3a 22 00 | 00 00 00 00 00 00 00 00 |ifier:".|........|
|00000a10| 00 01 00 00 00 0d 4d 53 | 20 53 61 6e 73 20 53 65 |......MS| Sans Se|
|00000a20| 72 69 66 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |rif.....|........|
|00000a30| 00 00 01 00 00 00 0b 22 | 50 61 73 73 77 6f 72 64 |......."|Password|
|00000a40| 3a 22 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |:"......|........|
|00000a50| 00 00 00 01 00 00 00 0d | 4d 53 20 53 61 6e 73 20 |........|MS Sans |
|00000a60| 53 65 72 69 66 00 00 00 | 00 00 00 00 00 00 00 00 |Serif...|........|
|00000a70| 00 00 00 00 01 00 00 00 | 11 22 43 6f 6e 6e 65 63 |........|."Connec|
|00000a80| 74 20 53 74 72 69 6e 67 | 3a 22 00 00 00 00 00 00 |t String|:"......|
|00000a90| 00 00 00 00 00 01 00 00 | 00 0d 4d 53 20 53 61 6e |........|..MS San|
|00000aa0| 73 20 53 65 72 69 66 00 | 00 00 00 00 00 00 00 00 |s Serif.|........|
|00000ab0| 00 00 00 00 00 00 01 00 | 00 00 0a 44 61 74 61 53 |........|...DataS|
|00000ac0| 6f 75 72 63 65 00 00 00 | 00 00 00 00 00 00 00 00 |ource...|........|
|00000ad0| 00 00 00 00 00 00 00 01 | 00 00 00 0d 4d 53 20 53 |........|....MS S|
|00000ae0| 61 6e 73 20 53 65 72 69 | 66 00 00 00 00 00 00 00 |ans Seri|f.......|
|00000af0| 00 00 00 00 00 00 00 00 | 01 00 00 00 06 55 73 65 |........|.....Use|
|00000b00| 72 49 44 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |rID.....|........|
|00000b10| 00 00 00 00 00 00 00 00 | 00 01 00 00 00 0d 4d 53 |........|......MS|
|00000b20| 20 53 61 6e 73 20 53 65 | 72 69 66 00 00 00 00 00 | Sans Se|rif.....|
|00000b30| 00 00 00 00 00 00 00 00 | 00 00 01 00 00 00 08 50 |........|.......P|
|00000b40| 61 73 73 77 6f 72 64 00 | 00 00 00 00 00 00 00 00 |assword.|........|
|00000b50| 00 00 00 00 00 00 00 00 | 00 00 00 01 00 00 00 0d |........|........|
|00000b60| 4d 53 20 53 61 6e 73 20 | 53 65 72 69 66 00 00 00 |MS Sans |Serif...|
|00000b70| 00 00 00 00 00 00 00 00 | 00 00 00 00 01 00 00 00 |........|........|
|00000b80| 07 63 6f 6e 6e 73 74 72 | 00 00 00 00 00 00 00 00 |.connstr|........|
|00000b90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 01 00 00 |........|........|
|00000ba0| 00 0d 4d 53 20 53 61 6e | 73 20 53 65 72 69 66 00 |..MS San|s Serif.|
|00000bb0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 01 00 |........|........|
|00000bc0| 00 00 0a 45 78 69 74 41 | 63 74 69 6f 6e 00 00 00 |...ExitA|ction...|
|00000bd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 01 |........|........|
|00000be0| 00 00 00 14 22 40 2a 48 | 4e 20 5c 21 4f 4b 3b 5c |...."@*H|N \!OK;\|
|00000bf0| 3f 43 61 6e 63 65 6c 22 | 00 00 00 00 00 00 00 00 |?Cancel"|........|
|00000c00| 01 00 00 00 0d 4d 53 20 | 53 61 6e 73 20 53 65 72 |.....MS |Sans Ser|
|00000c10| 69 66 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |if......|........|
|00000c20| 00 01 00 00 04 a3 49 46 | 20 28 65 78 69 74 61 63 |......IF| (exitac|
|00000c30| 74 69 6f 6e 20 3d 3d 20 | 31 29 0d 0a 0d 0a 09 49 |tion == |1).....I|
|00000c40| 46 20 28 45 4d 50 54 59 | 28 64 61 74 61 73 6f 75 |F (EMPTY|(datasou|
|00000c50| 72 63 65 29 29 0d 0a 09 | 09 57 41 49 54 20 57 49 |rce))...|.WAIT WI|
|00000c60| 4e 44 4f 57 20 22 44 61 | 74 61 20 53 6f 75 72 63 |NDOW "Da|ta Sourc|
|00000c70| 65 20 69 73 20 72 65 71 | 75 69 72 65 64 21 22 20 |e is req|uired!" |
|00000c80| 4e 4f 57 41 49 54 0d 0a | 09 09 52 45 54 55 52 4e |NOWAIT..|..RETURN|
|00000c90| 20 32 20 20 26 26 20 61 | 64 76 61 6e 63 65 20 74 | 2  && a|dvance t|
|00000ca0| 6f 20 64 61 74 61 20 73 | 6f 75 72 63 65 20 66 69 |o data s|ource fi|
|00000cb0| 65 6c 64 0d 0a 09 45 4e | 44 49 46 0d 0a 09 49 46 |eld...EN|DIF...IF|
|00000cc0| 20 28 45 4d 50 54 59 28 | 75 73 65 72 69 64 29 29 | (EMPTY(|userid))|
|00000cd0| 0d 0a 09 09 57 41 49 54 | 20 57 49 4e 44 4f 57 20 |....WAIT| WINDOW |
|00000ce0| 22 55 73 65 72 20 49 64 | 20 69 73 20 72 65 71 75 |"User Id| is requ|
|00000cf0| 69 72 65 64 21 22 20 4e | 4f 57 41 49 54 0d 0a 09 |ired!" N|OWAIT...|
|00000d00| 09 52 45 54 55 52 4e 20 | 33 20 26 26 20 61 64 76 |.RETURN |3 && adv|
|00000d10| 61 6e 63 65 20 74 6f 20 | 75 73 65 72 20 69 64 20 |ance to |user id |
|00000d20| 66 69 65 6c 64 0d 0a 09 | 45 4e 44 49 46 0d 0a 0d |field...|ENDIF...|
|00000d30| 0a 09 64 61 74 61 73 6f | 75 72 63 65 09 3d 20 41 |..dataso|urce.= A|
|00000d40| 4c 4c 54 52 49 4d 28 64 | 61 74 61 73 6f 75 72 63 |LLTRIM(d|atasourc|
|00000d50| 65 29 0d 0a 09 75 73 65 | 72 69 64 09 09 3d 20 41 |e)...use|rid..= A|
|00000d60| 4c 4c 54 52 49 4d 28 75 | 73 65 72 69 64 29 0d 0a |LLTRIM(u|serid)..|
|00000d70| 09 70 61 73 73 77 6f 72 | 64 09 3d 20 41 4c 4c 54 |.passwor|d.= ALLT|
|00000d80| 52 49 4d 28 70 61 73 73 | 77 6f 72 64 29 0d 0a 09 |RIM(pass|word)...|
|00000d90| 63 6f 6e 6e 73 74 72 09 | 09 3d 20 41 4c 4c 54 52 |connstr.|.= ALLTR|
|00000da0| 49 4d 28 63 6f 6e 6e 73 | 74 72 29 0d 0a 0d 0a 09 |IM(conns|tr).....|
|00000db0| 72 65 74 63 6f 64 65 20 | 3d 20 64 62 73 65 74 6f |retcode |= dbseto|
|00000dc0| 70 74 28 30 2c 20 22 44 | 69 73 70 45 72 72 6f 72 |pt(0, "D|ispError|
|00000dd0| 22 2c 20 30 29 0d 0a 09 | 49 46 20 28 72 65 74 63 |", 0)...|IF (retc|
|00000de0| 6f 64 65 20 3c 20 30 29 | 0d 0a 09 09 44 4f 20 72 |ode < 0)|....DO r|
|00000df0| 65 70 6f 65 72 72 6f 2e | 73 70 72 20 57 49 54 48 |epoerro.|spr WITH|
|00000e00| 20 72 65 74 63 6f 64 65 | 0d 0a 09 45 4e 44 49 46 | retcode|...ENDIF|
|00000e10| 0d 0a 0d 0a 09 57 41 49 | 54 20 57 49 4e 44 4f 57 |.....WAI|T WINDOW|
|00000e20| 20 22 41 74 74 65 6d 70 | 74 69 6e 67 20 74 6f 20 | "Attemp|ting to |
|00000e30| 63 6f 6e 6e 65 63 74 2e | 2e 2e 22 20 4e 4f 57 41 |connect.|.." NOWA|
|00000e40| 49 54 0d 0a 09 63 6b 68 | 61 6e 64 6c 65 20 3d 20 |IT...ckh|andle = |
|00000e50| 64 62 63 6f 6e 6e 65 63 | 74 28 64 61 74 61 73 6f |dbconnec|t(dataso|
|00000e60| 75 72 63 65 2c 20 75 73 | 65 72 69 64 2c 20 70 61 |urce, us|erid, pa|
|00000e70| 73 73 77 6f 72 64 2c 20 | 63 6f 6e 6e 73 74 72 29 |ssword, |connstr)|
|00000e80| 0d 0a 0d 0a 09 49 46 20 | 28 63 6b 68 61 6e 64 6c |.....IF |(ckhandl|
|00000e90| 65 20 3c 20 30 29 0d 0a | 09 09 72 65 74 63 6f 64 |e < 0)..|..retcod|
|00000ea0| 65 20 3d 20 63 6b 68 61 | 6e 64 6c 65 0d 0a 09 09 |e = ckha|ndle....|
|00000eb0| 44 4f 20 72 65 70 6f 65 | 72 72 6f 2e 73 70 72 20 |DO repoe|rro.spr |
|00000ec0| 57 49 54 48 20 72 65 74 | 63 6f 64 65 0d 0a 09 09 |WITH ret|code....|
|00000ed0| 52 45 54 55 52 4e 20 32 | 0d 0a 09 45 4e 44 49 46 |RETURN 2|...ENDIF|
|00000ee0| 0d 0a 0d 0a 09 72 65 74 | 63 6f 64 65 20 3d 20 64 |.....ret|code = d|
|00000ef0| 62 73 65 74 6f 70 74 28 | 63 6b 68 61 6e 64 6c 65 |bsetopt(|ckhandle|
|00000f00| 2c 20 22 42 61 74 63 68 | 22 2c 20 31 29 0d 0a 09 |, "Batch|", 1)...|
|00000f10| 49 46 20 28 72 65 74 63 | 6f 64 65 20 3c 20 30 29 |IF (retc|ode < 0)|
|00000f20| 0d 0a 09 09 44 4f 20 72 | 65 70 6f 65 72 72 6f 2e |....DO r|epoerro.|
|00000f30| 73 70 72 20 57 49 54 48 | 20 72 65 74 63 6f 64 65 |spr WITH| retcode|
|00000f40| 0d 0a 09 45 4e 44 49 46 | 0d 0a 0d 0a 09 72 65 74 |...ENDIF|.....ret|
|00000f50| 63 6f 64 65 20 3d 20 64 | 62 73 65 74 6f 70 74 28 |code = d|bsetopt(|
|00000f60| 63 6b 68 61 6e 64 6c 65 | 2c 20 22 44 69 73 70 45 |ckhandle|, "DispE|
|00000f70| 72 72 6f 72 22 2c 20 30 | 29 0d 0a 09 49 46 20 28 |rror", 0|)...IF (|
|00000f80| 72 65 74 63 6f 64 65 20 | 3c 20 30 29 0d 0a 09 09 |retcode |< 0)....|
|00000f90| 44 4f 20 72 65 70 6f 65 | 72 72 6f 2e 73 70 72 20 |DO repoe|rro.spr |
|00000fa0| 57 49 54 48 20 72 65 74 | 63 6f 64 65 0d 0a 09 45 |WITH ret|code...E|
|00000fb0| 4e 44 49 46 0d 0a 0d 0a | 09 72 65 74 63 6f 64 65 |NDIF....|.retcode|
|00000fc0| 20 3d 20 64 62 73 65 74 | 6f 70 74 28 63 6b 68 61 | = dbset|opt(ckha|
|00000fd0| 6e 64 6c 65 2c 20 22 42 | 72 6f 77 73 65 22 2c 20 |ndle, "B|rowse", |
|00000fe0| 30 29 0d 0a 09 49 46 20 | 28 72 65 74 63 6f 64 65 |0)...IF |(retcode|
|00000ff0| 20 3c 20 30 29 0d 0a 09 | 09 44 4f 20 72 65 70 6f | < 0)...|.DO repo|
|00001000| 65 72 72 6f 2e 73 70 72 | 20 57 49 54 48 20 72 65 |erro.spr| WITH re|
|00001010| 74 63 6f 64 65 0d 0a 09 | 45 4e 44 49 46 0d 0a 0d |tcode...|ENDIF...|
|00001020| 0a 09 6d 65 73 73 5f 73 | 74 72 20 3d 20 22 44 61 |..mess_s|tr = "Da|
|00001030| 74 61 20 53 6f 75 72 63 | 65 3a 20 22 2b 64 61 74 |ta Sourc|e: "+dat|
|00001040| 61 73 6f 75 72 63 65 0d | 0a 09 53 45 54 20 4d 45 |asource.|..SET ME|
|00001050| 53 53 41 47 45 20 54 4f | 20 6d 65 73 73 5f 73 74 |SSAGE TO| mess_st|
|00001060| 72 0d 0a 09 57 41 49 54 | 20 57 49 4e 44 4f 57 20 |r...WAIT| WINDOW |
|00001070| 22 59 6f 75 20 61 72 65 | 20 6e 6f 77 20 63 6f 6e |"You are| now con|
|00001080| 6e 65 63 74 65 64 20 74 | 6f 20 44 61 74 61 20 53 |nected t|o Data S|
|00001090| 6f 75 72 63 65 3a 20 22 | 2b 64 61 74 61 73 6f 75 |ource: "|+datasou|
|000010a0| 72 63 65 20 4e 4f 57 41 | 49 54 0d 0a 45 4e 44 49 |rce NOWA|IT..ENDI|
|000010b0| 46 0d 0a 43 4c 45 41 52 | 20 52 45 41 44 0d 0a 52 |F..CLEAR| READ..R|
|000010c0| 45 54 55 52 4e 20 30 0d | 0a 00 00 00 00 00 00 00 |ETURN 0.|........|
|000010d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000010e0| 00 00 00 00 00 00 01 00 | 00 00 04 22 4f 4b 22 00 |........|..."OK".|
|000010f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001100| 00 00 00 00 00 00 00 01 | 00 00 00 0d 4d 53 20 53 |........|....MS S|
|00001110| 61 6e 73 20 53 65 72 69 | 66 00 00 00 00 00 00 00 |ans Seri|f.......|
|00001120| 00 00 00 00 00 00 00 00 | 01 00 00 00 0d 4d 53 20 |........|.....MS |
|00001130| 53 61 6e 73 20 53 65 72 | 69 66                   |Sans Ser|if      |
+--------+-------------------------+-------------------------+--------+--------+