home *** CD-ROM | disk | FTP | other *** search
Unknown | 1998-10-05 | 696 b |
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
|
---|
100%
| file
| SIMH tape data
| default (weak)
| |
99%
| file
| data
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0e 00 00 00 46 65 74 63 | 68 44 62 52 65 63 6f 72 |....Fetc|hDbRecor|
|00000010| 64 73 0e 00 00 00 46 65 | 74 63 68 44 62 52 65 63 |ds....Fe|tchDbRec|
|00000020| 6f 72 64 73 03 00 00 00 | 41 53 50 11 00 00 00 4f |ords....|ASP....O|
|00000030| 70 65 6e 73 20 61 20 72 | 65 63 6f 72 64 73 65 74 |pens a r|ecordset|
|00000040| 50 02 00 00 27 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |P...'===|========|
|00000050| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000060| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000070| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000080| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000090| 0d 0a 27 20 50 52 4f 43 | 45 44 55 52 45 3a 09 46 |..' PROC|EDURE:.F|
|000000a0| 65 74 63 68 44 62 52 65 | 63 6f 72 64 73 20 0d 0a |etchDbRe|cords ..|
|000000b0| 0d 0a 27 20 49 4e 50 55 | 54 3a 09 09 09 64 62 20 |..' INPU|T:...db |
|000000c0| 28 6f 62 6a 65 63 74 29 | 09 09 2d 20 61 6e 20 6f |(object)|..- an o|
|000000d0| 70 65 6e 65 64 20 64 61 | 74 61 62 61 73 65 20 63 |pened da|tabase c|
|000000e0| 6f 6e 6e 65 63 74 69 6f | 6e 20 6f 62 6a 65 63 74 |onnectio|n object|
|000000f0| 0d 0a 27 09 09 09 09 09 | 73 71 6c 20 28 73 74 72 |..'.....|sql (str|
|00000100| 69 6e 67 29 09 2d 20 74 | 68 65 20 53 51 4c 20 71 |ing).- t|he SQL q|
|00000110| 75 65 72 79 20 73 74 72 | 69 6e 67 20 75 73 65 64 |uery str|ing used|
|00000120| 20 74 6f 20 6f 70 65 6e | 20 74 68 65 20 72 65 63 | to open| the rec|
|00000130| 6f 72 64 20 73 65 74 0d | 0a 0d 0a 27 20 44 45 53 |ord set.|...' DES|
|00000140| 43 3a 09 09 09 54 68 69 | 73 20 70 72 6f 63 65 64 |C:...Thi|s proced|
|00000150| 75 72 65 20 6f 70 65 6e | 73 20 61 20 72 65 63 6f |ure open|s a reco|
|00000160| 72 64 73 65 74 20 0d 0a | 27 3d 3d 3d 3d 3d 3d 3d |rdset ..|'=======|
|00000170| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000180| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000190| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000001a0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000001b0| 3d 3d 3d 3d 0d 0a 53 75 | 62 20 46 65 74 63 68 44 |====..Su|b FetchD|
|000001c0| 62 52 65 63 6f 72 64 73 | 28 64 62 2c 20 73 71 6c |bRecords|(db, sql|
|000001d0| 29 0d 0a 09 44 69 6d 20 | 72 73 0d 0a 09 0d 0a 09 |)...Dim |rs......|
|000001e0| 53 65 74 20 72 73 20 3d | 20 64 62 2e 45 78 65 63 |Set rs =| db.Exec|
|000001f0| 75 74 65 28 73 71 6c 29 | 0d 0a 09 0d 0a 09 44 6f |ute(sql)|......Do|
|00000200| 20 55 6e 74 69 6c 20 72 | 73 2e 45 4f 46 0d 0a 09 | Until r|s.EOF...|
|00000210| 09 27 20 2a 2a 2a 20 41 | 64 64 20 63 6f 64 65 20 |.' *** A|dd code |
|00000220| 74 6f 20 77 6f 72 6b 20 | 77 69 74 68 20 72 65 73 |to work |with res|
|00000230| 75 6c 74 20 73 65 74 20 | 2a 2a 2a 0d 0a 09 09 72 |ult set |***....r|
|00000240| 73 2e 4d 6f 76 65 4e 65 | 78 74 0d 0a 09 4c 6f 6f |s.MoveNe|xt...Loo|
|00000250| 70 20 0d 0a 0d 0a 09 72 | 73 2e 43 6c 6f 73 65 0d |p .....r|s.Close.|
|00000260| 0a 09 53 65 74 20 72 73 | 20 3d 20 4e 6f 74 68 69 |..Set rs| = Nothi|
|00000270| 6e 67 20 0d 0a 45 6e 64 | 20 53 75 62 20 27 20 45 |ng ..End| Sub ' E|
|00000280| 6e 64 20 6f 66 20 66 65 | 74 63 68 44 62 52 65 63 |nd of fe|tchDbRec|
|00000290| 6f 72 64 73 0e 00 00 00 | 32 2e 30 20 61 6e 64 20 |ords....|2.0 and |
|000002a0| 68 69 67 68 65 72 0e 00 | 00 00 33 2e 30 20 61 6e |higher..|..3.0 an|
|000002b0| 64 20 68 69 67 68 65 72 | |d higher| |
+--------+-------------------------+-------------------------+--------+--------+