home *** CD-ROM | disk | FTP | other *** search
Unknown | 1998-10-05 | 1.4 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
|
---|
100%
| file
| SIMH tape data
| default (weak)
| |
99%
| file
| data
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0e 00 00 00 44 65 6c 65 | 74 65 44 62 52 65 63 6f |....Dele|teDbReco|
|00000010| 72 64 0e 00 00 00 44 65 | 6c 65 74 65 44 62 52 65 |rd....De|leteDbRe|
|00000020| 63 6f 72 64 03 00 00 00 | 41 53 50 24 00 00 00 44 |cord....|ASP$...D|
|00000030| 65 6c 65 74 65 73 20 72 | 65 63 6f 72 64 20 66 72 |eletes r|ecord fr|
|00000040| 6f 6d 20 61 20 64 61 74 | 61 62 61 73 65 20 74 61 |om a dat|abase ta|
|00000050| 62 6c 65 47 05 00 00 27 | 3d 3d 3d 3d 3d 3d 3d 3d |bleG...'|========|
|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| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000000a0| 3d 3d 3d 0d 0a 27 20 50 | 52 4f 43 45 44 55 52 45 |===..' P|ROCEDURE|
|000000b0| 3a 09 44 65 6c 65 74 65 | 44 62 52 65 63 6f 72 64 |:.Delete|DbRecord|
|000000c0| 0d 0a 0d 0a 27 20 49 4e | 50 55 54 3a 09 09 09 64 |....' IN|PUT:...d|
|000000d0| 62 20 28 6f 62 6a 65 63 | 74 29 09 09 09 09 2d 20 |b (objec|t)....- |
|000000e0| 61 6e 20 6f 70 65 6e 65 | 64 20 64 61 74 61 62 61 |an opene|d databa|
|000000f0| 73 65 20 63 6f 6e 6e 65 | 63 74 69 6f 6e 20 6f 62 |se conne|ction ob|
|00000100| 6a 65 63 74 0d 0a 27 09 | 09 09 09 09 74 61 62 6c |ject..'.|....tabl|
|00000110| 65 6e 61 6d 65 20 28 73 | 74 72 69 6e 67 29 09 2d |ename (s|tring).-|
|00000120| 20 74 68 65 20 6e 61 6d | 65 20 6f 66 20 74 68 65 | the nam|e of the|
|00000130| 20 74 61 62 6c 65 20 63 | 6f 6e 74 61 69 6e 69 6e | table c|ontainin|
|00000140| 67 20 74 68 65 20 72 65 | 63 6f 72 64 0d 0a 27 09 |g the re|cord..'.|
|00000150| 09 09 09 09 09 09 09 09 | 09 09 09 20 20 74 6f 20 |........|... to |
|00000160| 62 65 20 64 65 6c 65 74 | 65 64 0d 0a 27 09 09 09 |be delet|ed..'...|
|00000170| 09 09 6b 65 79 6e 61 6d | 65 20 28 73 74 72 69 6e |..keynam|e (strin|
|00000180| 67 29 09 09 2d 20 74 68 | 65 20 6e 61 6d 65 20 6f |g)..- th|e name o|
|00000190| 66 20 74 68 65 20 6b 65 | 79 20 66 69 65 6c 64 20 |f the ke|y field |
|000001a0| 75 73 65 64 20 74 6f 20 | 66 69 6c 74 65 72 0d 0a |used to |filter..|
|000001b0| 27 09 09 09 09 09 09 09 | 09 09 09 09 09 20 20 74 |'.......|..... t|
|000001c0| 68 65 20 72 65 63 6f 72 | 64 20 73 65 74 0d 0a 27 |he recor|d set..'|
|000001d0| 09 09 09 09 09 6b 65 79 | 76 61 6c 20 28 73 74 72 |.....key|val (str|
|000001e0| 69 6e 67 29 09 09 2d 20 | 74 68 65 20 76 61 6c 75 |ing)..- |the valu|
|000001f0| 65 20 6f 66 20 74 68 65 | 20 6b 65 79 20 66 69 65 |e of the| key fie|
|00000200| 6c 64 20 28 64 61 74 65 | 20 76 61 6c 75 65 73 0d |ld (date| values.|
|00000210| 0a 27 09 09 09 09 09 09 | 09 09 09 09 09 09 20 20 |.'......|...... |
|00000220| 6d 75 73 74 20 62 65 20 | 69 6e 20 74 68 65 20 66 |must be |in the f|
|00000230| 6f 72 6d 61 74 20 79 79 | 79 79 2d 6d 6d 2d 64 64 |ormat yy|yy-mm-dd|
|00000240| 29 0d 0a 27 09 09 09 09 | 09 6b 65 79 74 79 70 65 |)..'....|.keytype|
|00000250| 20 28 73 74 72 69 6e 67 | 29 09 09 2d 20 74 68 65 | (string|)..- the|
|00000260| 20 64 61 74 61 20 74 79 | 70 65 20 6f 66 20 74 68 | data ty|pe of th|
|00000270| 65 20 6b 65 79 20 66 69 | 65 6c 64 0d 0a 0d 0a 27 |e key fi|eld....'|
|00000280| 20 44 45 53 43 3a 09 09 | 09 54 68 69 73 20 70 72 | DESC:..|.This pr|
|00000290| 6f 63 65 64 75 72 65 20 | 64 65 6c 65 74 65 73 20 |ocedure |deletes |
|000002a0| 61 20 72 65 63 6f 72 64 | 20 66 72 6f 6d 20 74 68 |a record| from th|
|000002b0| 65 20 73 70 65 63 69 66 | 69 65 64 20 74 61 62 6c |e specif|ied tabl|
|000002c0| 65 0d 0a 27 09 09 09 09 | 09 77 68 69 63 68 20 6d |e..'....|.which m|
|000002d0| 61 74 63 68 65 73 20 74 | 68 65 20 6b 65 79 20 70 |atches t|he key p|
|000002e0| 61 73 73 65 64 20 69 6e | 2e 20 41 20 70 61 73 73 |assed in|. A pass|
|000002f0| 74 68 72 6f 75 67 68 20 | 53 51 4c 20 73 74 61 74 |through |SQL stat|
|00000300| 65 6d 65 6e 74 0d 0a 27 | 09 09 09 09 09 69 73 20 |ement..'|.....is |
|00000310| 75 73 65 64 20 74 6f 20 | 64 65 6c 65 74 65 20 74 |used to |delete t|
|00000320| 68 65 20 72 65 63 6f 72 | 64 2e 20 0d 0a 27 3d 3d |he recor|d. ..'==|
|00000330| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000340| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000350| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000360| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000370| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 0d 0a 53 75 62 20 44 |========|=..Sub D|
|00000380| 65 6c 65 74 65 44 62 52 | 65 63 6f 72 64 28 64 62 |eleteDbR|ecord(db|
|00000390| 2c 20 74 61 62 6c 65 6e | 61 6d 65 2c 20 6b 65 79 |, tablen|ame, key|
|000003a0| 6e 61 6d 65 2c 20 6b 65 | 79 76 61 6c 2c 20 6b 65 |name, ke|yval, ke|
|000003b0| 79 74 79 70 65 29 0d 0a | 09 44 69 6d 20 73 71 6c |ytype)..|.Dim sql|
|000003c0| 0d 0a 09 09 27 20 2a 2a | 2a 20 59 6f 75 20 6d 69 |....' **|* You mi|
|000003d0| 67 68 74 20 68 61 76 65 | 20 74 6f 20 63 68 61 6e |ght have| to chan|
|000003e0| 67 65 20 74 68 65 20 64 | 65 6c 69 6d 69 74 65 72 |ge the d|elimiter|
|000003f0| 73 20 75 73 65 64 20 62 | 65 6c 6f 77 20 74 6f 20 |s used b|elow to |
|00000400| 66 69 74 20 79 6f 75 72 | 20 64 61 74 61 62 61 73 |fit your| databas|
|00000410| 65 20 72 65 71 75 69 72 | 65 6d 65 6e 74 73 0d 0a |e requir|ements..|
|00000420| 09 53 65 6c 65 63 74 20 | 43 61 73 65 20 6b 65 79 |.Select |Case key|
|00000430| 74 79 70 65 0d 0a 09 09 | 43 61 73 65 20 22 4e 75 |type....|Case "Nu|
|00000440| 6d 65 72 69 63 22 0d 0a | 09 09 09 73 71 6c 20 3d |meric"..|...sql =|
|00000450| 20 22 44 45 4c 45 54 45 | 20 46 52 4f 4d 20 22 20 | "DELETE| FROM " |
|00000460| 26 20 74 61 62 6c 65 6e | 61 6d 65 20 26 20 22 20 |& tablen|ame & " |
|00000470| 57 48 45 52 45 20 22 20 | 26 20 6b 65 79 6e 61 6d |WHERE " |& keynam|
|00000480| 65 20 26 20 22 20 3d 20 | 22 20 26 20 6b 65 79 76 |e & " = |" & keyv|
|00000490| 61 6c 0d 0a 09 09 43 61 | 73 65 20 22 53 74 72 69 |al....Ca|se "Stri|
|000004a0| 6e 67 22 0d 0a 09 09 09 | 73 71 6c 20 3d 20 22 44 |ng".....|sql = "D|
|000004b0| 45 4c 45 54 45 20 46 52 | 4f 4d 20 22 20 26 20 74 |ELETE FR|OM " & t|
|000004c0| 61 62 6c 65 6e 61 6d 65 | 20 26 20 22 20 57 48 45 |ablename| & " WHE|
|000004d0| 52 45 20 22 20 26 20 6b | 65 79 6e 61 6d 65 20 26 |RE " & k|eyname &|
|000004e0| 20 22 20 3d 20 27 22 20 | 26 20 6b 65 79 76 61 6c | " = '" |& keyval|
|000004f0| 20 26 20 22 27 22 0d 0a | 09 09 43 61 73 65 20 22 | & "'"..|..Case "|
|00000500| 44 61 74 65 22 0d 0a 09 | 09 09 73 71 6c 20 3d 20 |Date"...|..sql = |
|00000510| 22 44 45 4c 45 54 45 20 | 46 52 4f 4d 20 22 20 26 |"DELETE |FROM " &|
|00000520| 20 74 61 62 6c 65 6e 61 | 6d 65 20 26 20 22 20 57 | tablena|me & " W|
|00000530| 48 45 52 45 20 22 20 26 | 20 6b 65 79 6e 61 6d 65 |HERE " &| keyname|
|00000540| 20 26 20 22 20 3d 20 23 | 22 20 20 26 20 6b 65 79 | & " = #|" & key|
|00000550| 76 61 6c 20 26 20 22 23 | 22 0d 0a 09 45 6e 64 20 |val & "#|"...End |
|00000560| 53 65 6c 65 63 74 0d 0a | 09 0d 0a 09 64 62 2e 45 |Select..|....db.E|
|00000570| 78 65 63 75 74 65 28 73 | 71 6c 29 0d 0a 45 6e 64 |xecute(s|ql)..End|
|00000580| 20 53 75 62 20 27 20 45 | 6e 64 20 6f 66 20 64 65 | Sub ' E|nd of de|
|00000590| 6c 65 74 65 44 62 52 65 | 63 6f 72 64 0d 0a 0e 00 |leteDbRe|cord....|
|000005a0| 00 00 32 2e 30 20 61 6e | 64 20 68 69 67 68 65 72 |..2.0 an|d higher|
|000005b0| 0e 00 00 00 33 2e 30 20 | 61 6e 64 20 68 69 67 68 |....3.0 |and high|
|000005c0| 65 72 | |er | |
+--------+-------------------------+-------------------------+--------+--------+