home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1998-10-05 | 4.7 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
| data
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 00 00 43 47 49 20 | 56 61 72 69 61 62 6c 65 |....CGI |Variable|
|00000010| 73 0d 00 00 00 43 47 49 | 20 56 61 72 69 61 62 6c |s....CGI| Variabl|
|00000020| 65 73 05 00 00 00 4c 6f | 74 75 73 31 00 00 00 52 |es....Lo|tus1...R|
|00000030| 65 74 75 72 6e 73 20 61 | 6c 6c 20 6f 66 20 74 68 |eturns a|ll of th|
|00000040| 65 20 43 47 49 20 56 61 | 72 69 61 62 6c 65 73 20 |e CGI Va|riables |
|00000050| 66 72 6f 6d 20 74 68 65 | 20 62 72 6f 77 73 65 72 |from the| browser|
|00000060| 85 12 00 00 53 75 62 20 | 49 6e 69 74 69 61 6c 69 |....Sub |Initiali|
|00000070| 7a 65 0d 0a 25 52 45 4d | 0d 0a 0d 0a 44 45 53 43 |ze..%REM|....DESC|
|00000080| 3a 20 55 73 65 20 74 68 | 69 73 20 73 63 72 69 70 |: Use th|is scrip|
|00000090| 74 20 74 6f 20 72 65 74 | 75 72 6e 20 61 6c 6c 20 |t to ret|urn all |
|000000a0| 6f 66 20 74 68 65 20 43 | 47 49 20 56 61 72 69 61 |of the C|GI Varia|
|000000b0| 62 6c 65 73 20 66 72 6f | 6d 20 74 68 65 20 62 72 |bles fro|m the br|
|000000c0| 6f 77 73 65 72 2e 0d 0a | 54 68 65 20 64 6f 63 75 |owser...|The docu|
|000000d0| 6d 65 6e 74 43 6f 6e 74 | 65 78 74 20 70 72 6f 70 |mentCont|ext prop|
|000000e0| 65 72 74 79 20 6f 66 20 | 4e 6f 74 65 73 53 65 73 |erty of |NotesSes|
|000000f0| 73 69 6f 6e 20 72 65 74 | 75 72 6e 73 20 74 68 65 |sion ret|urns the|
|00000100| 20 69 6e 2d 6d 65 6d 6f | 72 79 20 64 6f 63 75 6d | in-memo|ry docum|
|00000110| 65 6e 74 0d 0a 63 72 65 | 61 74 65 64 20 62 79 20 |ent..cre|ated by |
|00000120| 44 6f 6d 69 6e 6f 20 77 | 68 65 6e 20 61 20 66 6f |Domino w|hen a fo|
|00000130| 72 6d 20 6f 72 20 64 6f | 63 75 6d 65 6e 74 20 69 |rm or do|cument i|
|00000140| 73 20 61 63 63 65 73 73 | 65 64 2e 20 43 61 6c 6c |s access|ed. Call|
|00000150| 20 74 68 69 73 20 61 67 | 65 6e 74 20 69 6e 20 65 | this ag|ent in e|
|00000160| 69 74 68 65 72 0d 0a 74 | 68 65 20 57 65 62 51 75 |ither..t|he WebQu|
|00000170| 65 72 79 4f 70 65 6e 20 | 6f 72 20 57 65 62 51 75 |eryOpen |or WebQu|
|00000180| 65 72 79 53 61 76 65 20 | 65 76 65 6e 74 20 6f 66 |erySave |event of|
|00000190| 20 74 68 65 20 66 6f 72 | 6d 20 6f 72 20 65 78 70 | the for|m or exp|
|000001a0| 6c 69 63 69 74 6c 79 20 | 77 69 74 68 20 74 68 65 |licitly |with the|
|000001b0| 20 52 75 6e 41 67 65 6e | 74 20 55 52 4c 20 63 6f | RunAgen|t URL co|
|000001c0| 6d 6d 61 6e 64 2e 0d 0a | 0d 0a 55 53 41 47 45 3a |mmand...|..USAGE:|
|000001d0| 20 43 6f 70 79 20 69 6e | 74 6f 20 61 20 44 6f 6d | Copy in|to a Dom|
|000001e0| 69 6e 6f 20 61 67 65 6e | 74 20 6f 72 20 75 73 65 |ino agen|t or use|
|000001f0| 20 74 68 65 20 46 69 6c | 65 20 49 6d 70 6f 72 74 | the Fil|e Import|
|00000200| 20 63 6f 6d 6d 61 6e 64 | 20 74 6f 20 69 6e 73 65 | command| to inse|
|00000210| 72 74 20 74 68 65 20 74 | 65 78 74 20 66 69 6c 65 |rt the t|ext file|
|00000220| 2e 0d 0a 0d 0a 50 4c 41 | 54 46 4f 52 4d 53 3a 20 |.....PLA|TFORMS: |
|00000230| 4c 6f 74 75 73 20 44 6f | 6d 69 6e 6f 20 53 65 72 |Lotus Do|mino Ser|
|00000240| 76 65 72 20 34 2e 35 20 | 61 6e 64 20 68 69 67 68 |ver 4.5 |and high|
|00000250| 65 72 0d 0a 0d 0a 25 45 | 4e 44 20 52 45 4d 0d 0a |er....%E|ND REM..|
|00000260| 20 20 20 20 20 44 69 6d | 20 73 20 41 73 20 4e 65 | Dim| s As Ne|
|00000270| 77 20 4e 6f 74 65 73 53 | 65 73 73 69 6f 6e 0d 0a |w NotesS|ession..|
|00000280| 20 20 20 20 20 44 69 6d | 20 64 62 20 41 73 20 4e | Dim| db As N|
|00000290| 6f 74 65 73 44 61 74 61 | 62 61 73 65 0d 0a 20 20 |otesData|base.. |
|000002a0| 20 20 20 44 69 6d 20 64 | 6f 63 20 41 73 20 4e 6f | Dim d|oc As No|
|000002b0| 74 65 73 44 6f 63 75 6d | 65 6e 74 0d 0a 20 20 20 |tesDocum|ent.. |
|000002c0| 20 20 44 69 6d 20 63 67 | 69 56 61 72 69 61 62 6c | Dim cg|iVariabl|
|000002d0| 65 73 28 31 20 54 6f 20 | 32 32 29 20 41 73 20 53 |es(1 To |22) As S|
|000002e0| 74 72 69 6e 67 0d 0a 20 | 20 20 20 20 44 69 6d 20 |tring.. | Dim |
|000002f0| 63 67 69 4e 61 6d 65 73 | 28 31 20 54 6f 20 32 32 |cgiNames|(1 To 22|
|00000300| 29 20 41 73 20 53 74 72 | 69 6e 67 0d 0a 20 20 20 |) As Str|ing.. |
|00000310| 20 20 0d 0a 20 20 20 20 | 20 53 65 74 20 64 62 20 | .. | Set db |
|00000320| 3d 20 73 2e 63 75 72 72 | 65 6e 74 44 61 74 61 62 |= s.curr|entDatab|
|00000330| 61 73 65 0d 0a 20 20 20 | 20 20 53 65 74 20 64 6f |ase.. | Set do|
|00000340| 63 20 3d 20 73 2e 44 6f | 63 75 6d 65 6e 74 43 6f |c = s.Do|cumentCo|
|00000350| 6e 74 65 78 74 0d 0a 20 | 20 20 20 20 0d 0a 20 20 |ntext.. | .. |
|00000360| 20 20 20 27 74 68 65 73 | 65 20 6e 65 78 74 20 6c | 'thes|e next l|
|00000370| 69 6e 65 73 20 66 69 6c | 6c 20 74 68 65 20 61 72 |ines fil|l the ar|
|00000380| 72 61 79 20 77 69 74 68 | 20 74 68 65 20 72 65 74 |ray with| the ret|
|00000390| 75 72 6e 20 76 61 6c 75 | 65 73 20 6f 66 20 74 68 |urn valu|es of th|
|000003a0| 65 20 76 61 72 69 61 62 | 6c 65 73 2e 20 49 66 20 |e variab|les. If |
|000003b0| 74 68 65 20 76 61 72 69 | 61 62 6c 65 20 69 73 20 |the vari|able is |
|000003c0| 62 6c 61 6e 6b 2c 20 74 | 68 65 6e 20 72 65 70 6c |blank, t|hen repl|
|000003d0| 61 63 65 20 69 74 20 77 | 69 74 68 20 4e 2f 41 2e |ace it w|ith N/A.|
|000003e0| 0d 0a 20 20 20 20 20 49 | 66 20 64 6f 63 2e 61 75 |.. I|f doc.au|
|000003f0| 74 68 5f 74 79 70 65 28 | 30 29 20 3d 20 22 22 20 |th_type(|0) = "" |
|00000400| 54 68 65 6e 20 63 67 69 | 56 61 72 69 61 62 6c 65 |Then cgi|Variable|
|00000410| 73 28 31 29 20 3d 20 22 | 4e 2f 41 22 20 45 6c 73 |s(1) = "|N/A" Els|
|00000420| 65 20 63 67 69 56 61 72 | 69 61 62 6c 65 73 28 31 |e cgiVar|iables(1|
|00000430| 29 20 3d 20 64 6f 63 2e | 61 75 74 68 5f 74 79 70 |) = doc.|auth_typ|
|00000440| 65 28 30 29 0d 0a 20 20 | 20 20 20 49 66 20 64 6f |e(0).. | If do|
|00000450| 63 2e 43 6f 6e 74 65 6e | 74 5f 4c 65 6e 67 74 68 |c.Conten|t_Length|
|00000460| 28 30 29 20 3d 20 22 22 | 20 54 68 65 6e 20 63 67 |(0) = ""| Then cg|
|00000470| 69 56 61 72 69 61 62 6c | 65 73 28 32 29 20 3d 20 |iVariabl|es(2) = |
|00000480| 22 4e 2f 41 22 20 45 6c | 73 65 20 20 20 63 67 69 |"N/A" El|se cgi|
|00000490| 56 61 72 69 61 62 6c 65 | 73 28 32 29 20 3d 20 64 |Variable|s(2) = d|
|000004a0| 6f 63 2e 43 6f 6e 74 65 | 6e 74 5f 4c 65 6e 67 74 |oc.Conte|nt_Lengt|
|000004b0| 68 28 30 29 0d 0a 20 20 | 20 20 20 49 66 20 64 6f |h(0).. | If do|
|000004c0| 63 2e 43 6f 6e 74 65 6e | 74 5f 54 79 70 65 28 30 |c.Conten|t_Type(0|
|000004d0| 29 20 3d 20 22 22 20 54 | 68 65 6e 20 63 67 69 56 |) = "" T|hen cgiV|
|000004e0| 61 72 69 61 62 6c 65 73 | 28 33 29 20 3d 20 22 4e |ariables|(3) = "N|
|000004f0| 2f 41 22 20 45 6c 73 65 | 20 20 20 63 67 69 56 61 |/A" Else| cgiVa|
|00000500| 72 69 61 62 6c 65 73 28 | 33 29 20 3d 20 64 6f 63 |riables(|3) = doc|
|00000510| 2e 43 6f 6e 74 65 6e 74 | 5f 54 79 70 65 28 30 29 |.Content|_Type(0)|
|00000520| 0d 0a 20 20 20 20 20 49 | 66 20 64 6f 63 2e 47 61 |.. I|f doc.Ga|
|00000530| 74 65 77 61 79 5f 49 6e | 74 65 72 66 61 63 65 28 |teway_In|terface(|
|00000540| 30 29 20 3d 20 22 22 20 | 54 68 65 6e 20 63 67 69 |0) = "" |Then cgi|
|00000550| 56 61 72 69 61 62 6c 65 | 73 28 34 29 20 3d 20 22 |Variable|s(4) = "|
|00000560| 4e 2f 41 22 20 45 6c 73 | 65 20 20 20 20 63 67 69 |N/A" Els|e cgi|
|00000570| 56 61 72 69 61 62 6c 65 | 73 28 34 29 20 3d 20 64 |Variable|s(4) = d|
|00000580| 6f 63 2e 47 61 74 65 77 | 61 79 5f 49 6e 74 65 72 |oc.Gatew|ay_Inter|
|00000590| 66 61 63 65 28 30 29 0d | 0a 20 20 20 20 20 49 66 |face(0).|. If|
|000005a0| 20 64 6f 63 2e 48 54 54 | 50 5f 41 63 63 65 70 74 | doc.HTT|P_Accept|
|000005b0| 28 30 29 20 3d 20 22 22 | 20 54 68 65 6e 20 63 67 |(0) = ""| Then cg|
|000005c0| 69 56 61 72 69 61 62 6c | 65 73 28 35 29 20 3d 20 |iVariabl|es(5) = |
|000005d0| 22 4e 2f 41 22 20 45 6c | 73 65 20 20 63 67 69 56 |"N/A" El|se cgiV|
|000005e0| 61 72 69 61 62 6c 65 73 | 28 35 29 20 3d 20 64 6f |ariables|(5) = do|
|000005f0| 63 2e 48 54 54 50 5f 41 | 63 63 65 70 74 28 30 29 |c.HTTP_A|ccept(0)|
|00000600| 0d 0a 20 20 20 20 20 49 | 66 20 64 6f 63 2e 48 54 |.. I|f doc.HT|
|00000610| 54 50 5f 52 65 66 65 72 | 65 72 28 30 29 20 3d 20 |TP_Refer|er(0) = |
|00000620| 22 22 20 54 68 65 6e 20 | 63 67 69 56 61 72 69 61 |"" Then |cgiVaria|
|00000630| 62 6c 65 73 28 36 29 20 | 3d 20 22 4e 2f 41 22 20 |bles(6) |= "N/A" |
|00000640| 45 6c 73 65 20 20 20 63 | 67 69 56 61 72 69 61 62 |Else c|giVariab|
|00000650| 6c 65 73 28 36 29 20 3d | 20 64 6f 63 2e 48 54 54 |les(6) =| doc.HTT|
|00000660| 50 5f 52 65 66 65 72 65 | 72 28 30 29 0d 0a 20 20 |P_Refere|r(0).. |
|00000670| 20 20 20 49 66 20 64 6f | 63 2e 48 54 54 50 53 28 | If do|c.HTTPS(|
|00000680| 30 29 20 3d 20 22 22 20 | 54 68 65 6e 20 63 67 69 |0) = "" |Then cgi|
|00000690| 56 61 72 69 61 62 6c 65 | 73 28 37 29 20 3d 20 22 |Variable|s(7) = "|
|000006a0| 4e 2f 41 22 20 45 6c 73 | 65 20 20 20 63 67 69 56 |N/A" Els|e cgiV|
|000006b0| 61 72 69 61 62 6c 65 73 | 28 37 29 20 3d 20 64 6f |ariables|(7) = do|
|000006c0| 63 2e 48 54 54 50 53 28 | 30 29 0d 0a 20 20 20 20 |c.HTTPS(|0).. |
|000006d0| 20 49 66 20 64 6f 63 2e | 48 54 54 50 5f 55 73 65 | If doc.|HTTP_Use|
|000006e0| 72 5f 41 67 65 6e 74 28 | 30 29 20 3d 20 22 22 20 |r_Agent(|0) = "" |
|000006f0| 54 68 65 6e 20 63 67 69 | 56 61 72 69 61 62 6c 65 |Then cgi|Variable|
|00000700| 73 28 38 29 20 3d 20 22 | 4e 2f 41 22 20 45 6c 73 |s(8) = "|N/A" Els|
|00000710| 65 20 20 20 63 67 69 56 | 61 72 69 61 62 6c 65 73 |e cgiV|ariables|
|00000720| 28 38 29 20 3d 20 64 6f | 63 2e 48 54 54 50 5f 55 |(8) = do|c.HTTP_U|
|00000730| 73 65 72 5f 41 67 65 6e | 74 28 30 29 0d 0a 20 20 |ser_Agen|t(0).. |
|00000740| 20 20 20 49 66 20 64 6f | 63 2e 50 61 74 68 5f 49 | If do|c.Path_I|
|00000750| 6e 66 6f 28 30 29 20 3d | 20 22 22 20 54 68 65 6e |nfo(0) =| "" Then|
|00000760| 20 63 67 69 56 61 72 69 | 61 62 6c 65 73 28 39 29 | cgiVari|ables(9)|
|00000770| 20 3d 20 22 4e 2f 41 22 | 20 45 6c 73 65 20 20 63 | = "N/A"| Else c|
|00000780| 67 69 56 61 72 69 61 62 | 6c 65 73 28 39 29 20 3d |giVariab|les(9) =|
|00000790| 20 64 6f 63 2e 50 61 74 | 68 5f 49 6e 66 6f 28 30 | doc.Pat|h_Info(0|
|000007a0| 29 0d 0a 20 20 20 20 20 | 49 66 20 64 6f 63 2e 50 |).. |If doc.P|
|000007b0| 61 74 68 5f 54 72 61 6e | 73 6c 61 74 65 64 28 30 |ath_Tran|slated(0|
|000007c0| 29 20 3d 20 22 22 20 54 | 68 65 6e 20 63 67 69 56 |) = "" T|hen cgiV|
|000007d0| 61 72 69 61 62 6c 65 73 | 28 31 30 29 20 3d 20 22 |ariables|(10) = "|
|000007e0| 4e 2f 41 22 20 45 6c 73 | 65 20 20 63 67 69 56 61 |N/A" Els|e cgiVa|
|000007f0| 72 69 61 62 6c 65 73 28 | 31 30 29 20 3d 20 64 6f |riables(|10) = do|
|00000800| 63 2e 50 61 74 68 5f 54 | 72 61 6e 73 6c 61 74 65 |c.Path_T|ranslate|
|00000810| 64 28 30 29 0d 0a 20 20 | 20 20 20 49 66 20 64 6f |d(0).. | If do|
|00000820| 63 2e 51 75 65 72 79 5f | 53 74 72 69 6e 67 28 30 |c.Query_|String(0|
|00000830| 29 20 3d 20 22 22 20 54 | 68 65 6e 20 63 67 69 56 |) = "" T|hen cgiV|
|00000840| 61 72 69 61 62 6c 65 73 | 28 31 31 29 20 3d 20 22 |ariables|(11) = "|
|00000850| 4e 2f 41 22 20 45 6c 73 | 65 20 63 67 69 56 61 72 |N/A" Els|e cgiVar|
|00000860| 69 61 62 6c 65 73 28 31 | 31 29 20 3d 20 64 6f 63 |iables(1|1) = doc|
|00000870| 2e 51 75 65 72 79 5f 53 | 74 72 69 6e 67 28 30 29 |.Query_S|tring(0)|
|00000880| 0d 0a 20 20 20 20 20 49 | 66 20 64 6f 63 2e 52 65 |.. I|f doc.Re|
|00000890| 6d 6f 74 65 5f 41 64 64 | 72 28 30 29 20 3d 20 22 |mote_Add|r(0) = "|
|000008a0| 22 20 54 68 65 6e 20 63 | 67 69 56 61 72 69 61 62 |" Then c|giVariab|
|000008b0| 6c 65 73 28 31 32 29 20 | 3d 20 22 4e 2f 41 22 20 |les(12) |= "N/A" |
|000008c0| 45 6c 73 65 20 20 20 63 | 67 69 56 61 72 69 61 62 |Else c|giVariab|
|000008d0| 6c 65 73 28 31 32 29 20 | 3d 20 64 6f 63 2e 52 65 |les(12) |= doc.Re|
|000008e0| 6d 6f 74 65 5f 41 64 64 | 72 28 30 29 0d 0a 20 20 |mote_Add|r(0).. |
|000008f0| 20 20 20 49 66 20 64 6f | 63 2e 52 65 6d 6f 74 65 | If do|c.Remote|
|00000900| 5f 48 6f 73 74 28 30 29 | 20 3d 20 22 22 20 54 68 |_Host(0)| = "" Th|
|00000910| 65 6e 20 63 67 69 56 61 | 72 69 61 62 6c 65 73 28 |en cgiVa|riables(|
|00000920| 31 33 29 20 3d 20 22 4e | 2f 41 22 20 45 6c 73 65 |13) = "N|/A" Else|
|00000930| 20 20 20 20 63 67 69 56 | 61 72 69 61 62 6c 65 73 | cgiV|ariables|
|00000940| 28 31 33 29 20 3d 20 64 | 6f 63 2e 52 65 6d 6f 74 |(13) = d|oc.Remot|
|00000950| 65 5f 48 6f 73 74 28 30 | 29 0d 0a 20 20 20 20 20 |e_Host(0|).. |
|00000960| 49 66 20 64 6f 63 2e 52 | 65 6d 6f 74 65 5f 49 64 |If doc.R|emote_Id|
|00000970| 65 6e 74 28 30 29 20 3d | 20 22 22 20 54 68 65 6e |ent(0) =| "" Then|
|00000980| 20 63 67 69 56 61 72 69 | 61 62 6c 65 73 28 31 34 | cgiVari|ables(14|
|00000990| 29 20 3d 20 22 4e 2f 41 | 22 20 45 6c 73 65 20 20 |) = "N/A|" Else |
|000009a0| 20 20 63 67 69 56 61 72 | 69 61 62 6c 65 73 28 31 | cgiVar|iables(1|
|000009b0| 34 29 20 3d 20 64 6f 63 | 2e 52 65 6d 6f 74 65 5f |4) = doc|.Remote_|
|000009c0| 49 64 65 6e 74 28 30 29 | 0d 0a 20 20 20 20 20 49 |Ident(0)|.. I|
|000009d0| 66 20 64 6f 63 2e 52 65 | 6d 6f 74 65 5f 55 73 65 |f doc.Re|mote_Use|
|000009e0| 72 28 30 29 20 3d 20 22 | 22 20 54 68 65 6e 20 63 |r(0) = "|" Then c|
|000009f0| 67 69 56 61 72 69 61 62 | 6c 65 73 28 31 35 29 20 |giVariab|les(15) |
|00000a00| 3d 20 22 4e 2f 41 22 20 | 45 6c 73 65 20 20 20 63 |= "N/A" |Else c|
|00000a10| 67 69 56 61 72 69 61 62 | 6c 65 73 28 31 35 29 20 |giVariab|les(15) |
|00000a20| 3d 20 64 6f 63 2e 52 65 | 6d 6f 74 65 5f 55 73 65 |= doc.Re|mote_Use|
|00000a30| 72 28 30 29 0d 0a 20 20 | 20 20 20 49 66 20 64 6f |r(0).. | If do|
|00000a40| 63 2e 52 65 71 75 65 73 | 74 5f 4d 65 74 68 6f 64 |c.Reques|t_Method|
|00000a50| 28 30 29 20 3d 20 22 22 | 20 54 68 65 6e 20 63 67 |(0) = ""| Then cg|
|00000a60| 69 56 61 72 69 61 62 6c | 65 73 28 31 36 29 20 3d |iVariabl|es(16) =|
|00000a70| 20 22 4e 2f 41 22 20 45 | 6c 73 65 20 20 20 20 63 | "N/A" E|lse c|
|00000a80| 67 69 56 61 72 69 61 62 | 6c 65 73 28 31 36 29 20 |giVariab|les(16) |
|00000a90| 3d 20 64 6f 63 2e 52 65 | 71 75 65 73 74 5f 4d 65 |= doc.Re|quest_Me|
|00000aa0| 74 68 6f 64 28 30 29 0d | 0a 20 20 20 20 20 49 66 |thod(0).|. If|
|00000ab0| 20 64 6f 63 2e 53 63 72 | 69 70 74 5f 4e 61 6d 65 | doc.Scr|ipt_Name|
|00000ac0| 28 30 29 20 3d 20 22 22 | 20 54 68 65 6e 20 63 67 |(0) = ""| Then cg|
|00000ad0| 69 56 61 72 69 61 62 6c | 65 73 28 31 37 29 20 3d |iVariabl|es(17) =|
|00000ae0| 20 22 4e 2f 41 22 20 45 | 6c 73 65 20 20 20 63 67 | "N/A" E|lse cg|
|00000af0| 69 56 61 72 69 61 62 6c | 65 73 28 31 37 29 20 3d |iVariabl|es(17) =|
|00000b00| 20 64 6f 63 2e 53 63 72 | 69 70 74 5f 4e 61 6d 65 | doc.Scr|ipt_Name|
|00000b10| 28 30 29 0d 0a 20 20 20 | 20 20 49 66 20 64 6f 63 |(0).. | If doc|
|00000b20| 2e 53 65 72 76 65 72 5f | 4e 61 6d 65 28 30 29 20 |.Server_|Name(0) |
|00000b30| 3d 20 22 22 20 54 68 65 | 6e 20 63 67 69 56 61 72 |= "" The|n cgiVar|
|00000b40| 69 61 62 6c 65 73 28 31 | 38 29 20 3d 20 22 4e 2f |iables(1|8) = "N/|
|00000b50| 41 22 20 45 6c 73 65 20 | 20 20 63 67 69 56 61 72 |A" Else | cgiVar|
|00000b60| 69 61 62 6c 65 73 28 31 | 38 29 20 3d 20 64 6f 63 |iables(1|8) = doc|
|00000b70| 2e 53 65 72 76 65 72 5f | 4e 61 6d 65 28 30 29 0d |.Server_|Name(0).|
|00000b80| 0a 20 20 20 20 20 49 66 | 20 64 6f 63 2e 53 65 72 |. If| doc.Ser|
|00000b90| 76 65 72 5f 50 72 6f 74 | 6f 63 6f 6c 28 30 29 20 |ver_Prot|ocol(0) |
|00000ba0| 3d 20 22 22 20 54 68 65 | 6e 20 63 67 69 56 61 72 |= "" The|n cgiVar|
|00000bb0| 69 61 62 6c 65 73 28 31 | 39 29 20 3d 20 22 4e 2f |iables(1|9) = "N/|
|00000bc0| 41 22 20 45 6c 73 65 20 | 20 20 63 67 69 56 61 72 |A" Else | cgiVar|
|00000bd0| 69 61 62 6c 65 73 28 31 | 39 29 20 3d 20 64 6f 63 |iables(1|9) = doc|
|00000be0| 2e 53 65 72 76 65 72 5f | 50 72 6f 74 6f 63 6f 6c |.Server_|Protocol|
|00000bf0| 28 30 29 0d 0a 20 20 20 | 20 20 49 66 20 64 6f 63 |(0).. | If doc|
|00000c00| 2e 53 65 72 76 65 72 5f | 50 6f 72 74 28 30 29 20 |.Server_|Port(0) |
|00000c10| 3d 20 22 22 20 54 68 65 | 6e 20 63 67 69 56 61 72 |= "" The|n cgiVar|
|00000c20| 69 61 62 6c 65 73 28 32 | 30 29 20 3d 20 22 4e 2f |iables(2|0) = "N/|
|00000c30| 41 22 20 45 6c 73 65 20 | 20 20 63 67 69 56 61 72 |A" Else | cgiVar|
|00000c40| 69 61 62 6c 65 73 28 32 | 30 29 20 3d 20 64 6f 63 |iables(2|0) = doc|
|00000c50| 2e 53 65 72 76 65 72 5f | 50 6f 72 74 28 30 29 0d |.Server_|Port(0).|
|00000c60| 0a 20 20 20 20 20 49 66 | 20 64 6f 63 2e 53 65 72 |. If| doc.Ser|
|00000c70| 76 65 72 5f 53 6f 66 74 | 77 61 72 65 28 30 29 20 |ver_Soft|ware(0) |
|00000c80| 3d 20 22 22 20 54 68 65 | 6e 20 63 67 69 56 61 72 |= "" The|n cgiVar|
|00000c90| 69 61 62 6c 65 73 28 32 | 31 29 20 3d 20 22 4e 2f |iables(2|1) = "N/|
|00000ca0| 41 22 20 45 6c 73 65 20 | 20 20 20 63 67 69 56 61 |A" Else | cgiVa|
|00000cb0| 72 69 61 62 6c 65 73 28 | 32 31 29 20 3d 20 64 6f |riables(|21) = do|
|00000cc0| 63 2e 53 65 72 76 65 72 | 5f 53 6f 66 74 77 61 72 |c.Server|_Softwar|
|00000cd0| 65 28 30 29 0d 0a 20 20 | 20 20 20 49 66 20 64 6f |e(0).. | If do|
|00000ce0| 63 2e 53 65 72 76 65 72 | 5f 55 52 4c 5f 47 61 74 |c.Server|_URL_Gat|
|00000cf0| 65 77 61 79 5f 49 6e 74 | 65 72 66 61 63 65 28 30 |eway_Int|erface(0|
|00000d00| 29 20 3d 20 22 22 20 54 | 68 65 6e 20 63 67 69 56 |) = "" T|hen cgiV|
|00000d10| 61 72 69 61 62 6c 65 73 | 28 32 32 29 20 3d 20 22 |ariables|(22) = "|
|00000d20| 4e 2f 41 22 20 45 6c 73 | 65 20 20 20 20 63 67 69 |N/A" Els|e cgi|
|00000d30| 56 61 72 69 61 62 6c 65 | 73 28 32 32 29 20 3d 20 |Variable|s(22) = |
|00000d40| 64 6f 63 2e 53 65 72 76 | 65 72 5f 55 52 4c 5f 47 |doc.Serv|er_URL_G|
|00000d50| 61 74 65 77 61 79 5f 49 | 6e 74 65 72 66 61 63 65 |ateway_I|nterface|
|00000d60| 28 30 29 0d 0a 20 20 20 | 20 20 0d 0a 20 20 20 20 |(0).. | .. |
|00000d70| 20 27 54 68 65 73 65 20 | 6c 69 6e 65 73 20 66 69 | 'These |lines fi|
|00000d80| 6c 6c 20 61 6e 20 61 72 | 72 61 79 20 77 69 74 68 |ll an ar|ray with|
|00000d90| 20 74 68 65 20 6e 61 6d | 65 20 6f 66 20 74 68 65 | the nam|e of the|
|00000da0| 20 43 47 49 20 56 61 72 | 69 61 62 6c 65 2e 0d 0a | CGI Var|iable...|
|00000db0| 20 20 20 20 20 63 67 69 | 4e 61 6d 65 73 28 31 29 | cgi|Names(1)|
|00000dc0| 20 3d 20 22 41 75 74 68 | 5f 54 79 70 65 22 0d 0a | = "Auth|_Type"..|
|00000dd0| 20 20 20 20 20 63 67 69 | 4e 61 6d 65 73 28 32 29 | cgi|Names(2)|
|00000de0| 20 3d 20 22 43 6f 6e 74 | 65 6e 74 5f 4c 65 6e 67 | = "Cont|ent_Leng|
|00000df0| 74 68 22 0d 0a 20 20 20 | 20 20 63 67 69 4e 61 6d |th".. | cgiNam|
|00000e00| 65 73 28 33 29 20 3d 20 | 22 43 6f 6e 74 65 6e 74 |es(3) = |"Content|
|00000e10| 5f 54 79 70 65 22 0d 0a | 20 20 20 20 20 63 67 69 |_Type"..| cgi|
|00000e20| 4e 61 6d 65 73 28 34 29 | 20 3d 20 22 47 61 74 65 |Names(4)| = "Gate|
|00000e30| 77 61 79 5f 49 6e 74 65 | 72 66 61 63 65 22 0d 0a |way_Inte|rface"..|
|00000e40| 20 20 20 20 20 63 67 69 | 4e 61 6d 65 73 28 35 29 | cgi|Names(5)|
|00000e50| 20 3d 20 22 48 54 54 50 | 5f 41 63 63 65 70 74 22 | = "HTTP|_Accept"|
|00000e60| 0d 0a 20 20 20 20 20 63 | 67 69 4e 61 6d 65 73 28 |.. c|giNames(|
|00000e70| 36 29 20 3d 20 22 48 54 | 54 50 5f 52 65 66 65 72 |6) = "HT|TP_Refer|
|00000e80| 65 72 22 0d 0a 20 20 20 | 20 20 63 67 69 4e 61 6d |er".. | cgiNam|
|00000e90| 65 73 28 37 29 20 3d 20 | 22 48 54 54 50 53 22 0d |es(7) = |"HTTPS".|
|00000ea0| 0a 20 20 20 20 20 63 67 | 69 4e 61 6d 65 73 28 38 |. cg|iNames(8|
|00000eb0| 29 20 3d 20 22 48 54 54 | 50 5f 55 73 65 72 5f 41 |) = "HTT|P_User_A|
|00000ec0| 67 65 6e 74 22 0d 0a 20 | 20 20 20 20 63 67 69 4e |gent".. | cgiN|
|00000ed0| 61 6d 65 73 28 39 29 20 | 3d 20 22 50 61 74 68 5f |ames(9) |= "Path_|
|00000ee0| 49 6e 66 6f 22 0d 0a 20 | 20 20 20 20 63 67 69 4e |Info".. | cgiN|
|00000ef0| 61 6d 65 73 28 31 30 29 | 20 3d 20 22 50 61 74 68 |ames(10)| = "Path|
|00000f00| 5f 54 72 61 6e 73 6c 61 | 74 65 64 22 0d 0a 20 20 |_Transla|ted".. |
|00000f10| 20 20 20 63 67 69 4e 61 | 6d 65 73 28 31 31 29 20 | cgiNa|mes(11) |
|00000f20| 3d 20 22 51 75 65 72 79 | 5f 53 74 72 69 6e 67 22 |= "Query|_String"|
|00000f30| 0d 0a 20 20 20 20 20 63 | 67 69 4e 61 6d 65 73 28 |.. c|giNames(|
|00000f40| 31 32 29 20 3d 20 22 52 | 65 6d 6f 74 65 5f 41 64 |12) = "R|emote_Ad|
|00000f50| 64 72 22 0d 0a 20 20 20 | 20 20 63 67 69 4e 61 6d |dr".. | cgiNam|
|00000f60| 65 73 28 31 33 29 20 3d | 20 22 52 65 6d 6f 74 65 |es(13) =| "Remote|
|00000f70| 5f 48 6f 73 74 22 0d 0a | 20 20 20 20 20 63 67 69 |_Host"..| cgi|
|00000f80| 4e 61 6d 65 73 28 31 34 | 29 20 3d 20 22 52 65 6d |Names(14|) = "Rem|
|00000f90| 6f 74 65 5f 49 64 65 6e | 74 22 0d 0a 20 20 20 20 |ote_Iden|t".. |
|00000fa0| 20 63 67 69 4e 61 6d 65 | 73 28 31 35 29 20 3d 20 | cgiName|s(15) = |
|00000fb0| 22 52 65 6d 6f 74 65 5f | 55 73 65 72 22 0d 0a 20 |"Remote_|User".. |
|00000fc0| 20 20 20 20 63 67 69 4e | 61 6d 65 73 28 31 36 29 | cgiN|ames(16)|
|00000fd0| 20 3d 20 22 52 65 71 75 | 65 73 74 5f 4d 65 74 68 | = "Requ|est_Meth|
|00000fe0| 6f 64 22 0d 0a 20 20 20 | 20 20 63 67 69 4e 61 6d |od".. | cgiNam|
|00000ff0| 65 73 28 31 37 29 20 3d | 20 22 53 63 72 69 70 74 |es(17) =| "Script|
|00001000| 5f 4e 61 6d 65 22 0d 0a | 20 20 20 20 20 63 67 69 |_Name"..| cgi|
|00001010| 4e 61 6d 65 73 28 31 38 | 29 20 3d 20 22 53 65 72 |Names(18|) = "Ser|
|00001020| 76 65 72 5f 4e 61 6d 65 | 22 0d 0a 20 20 20 20 20 |ver_Name|".. |
|00001030| 63 67 69 4e 61 6d 65 73 | 28 31 39 29 20 3d 20 22 |cgiNames|(19) = "|
|00001040| 53 65 72 76 65 72 5f 50 | 72 6f 74 6f 63 6f 6c 22 |Server_P|rotocol"|
|00001050| 0d 0a 20 20 20 20 20 63 | 67 69 4e 61 6d 65 73 28 |.. c|giNames(|
|00001060| 32 30 29 20 3d 20 22 53 | 65 72 76 65 72 5f 50 6f |20) = "S|erver_Po|
|00001070| 72 74 22 0d 0a 20 20 20 | 20 20 63 67 69 4e 61 6d |rt".. | cgiNam|
|00001080| 65 73 28 32 31 29 20 3d | 20 22 53 65 72 76 65 72 |es(21) =| "Server|
|00001090| 5f 53 6f 66 74 77 61 72 | 65 22 0d 0a 20 20 20 20 |_Softwar|e".. |
|000010a0| 20 63 67 69 4e 61 6d 65 | 73 28 32 32 29 20 3d 20 | cgiName|s(22) = |
|000010b0| 22 53 65 72 76 65 72 5f | 55 52 4c 5f 47 61 74 65 |"Server_|URL_Gate|
|000010c0| 77 61 79 5f 49 6e 74 65 | 72 66 61 63 65 22 0d 0a |way_Inte|rface"..|
|000010d0| 20 20 20 20 20 0d 0a 27 | 43 72 65 61 74 65 73 20 | ..'|Creates |
|000010e0| 61 6e 20 48 54 4d 4c 20 | 74 61 62 6c 65 20 61 6e |an HTML |table an|
|000010f0| 64 20 66 69 6c 6c 73 20 | 69 74 20 77 69 74 68 20 |d fills |it with |
|00001100| 74 68 65 20 69 6e 66 6f | 72 6d 61 74 69 6f 6e 0d |the info|rmation.|
|00001110| 0a 20 20 20 20 20 50 72 | 69 6e 74 20 22 3c 48 54 |. Pr|int "<HT|
|00001120| 4d 4c 3e 3c 48 45 41 44 | 3e 3c 54 49 54 4c 45 3e |ML><HEAD|><TITLE>|
|00001130| 43 47 49 20 56 61 72 69 | 61 62 6c 65 73 20 66 72 |CGI Vari|ables fr|
|00001140| 6f 6d 20 44 6f 6d 69 6e | 6f 3c 2f 54 49 54 4c 45 |om Domin|o</TITLE|
|00001150| 3e 3c 2f 48 45 41 44 3e | 3c 42 4f 44 59 20 54 45 |></HEAD>|<BODY TE|
|00001160| 58 54 3d 22 22 30 30 30 | 30 30 30 22 22 3e 22 0d |XT=""000|000"">".|
|00001170| 0a 20 20 20 20 20 50 72 | 69 6e 74 20 22 3c 48 32 |. Pr|int "<H2|
|00001180| 3e 43 47 49 20 56 61 72 | 69 61 62 6c 65 73 20 66 |>CGI Var|iables f|
|00001190| 72 6f 6d 20 61 70 70 6c | 69 63 61 74 69 6f 6e 20 |rom appl|ication |
|000011a0| 22 20 2b 20 64 62 2e 74 | 69 74 6c 65 20 2b 20 22 |" + db.t|itle + "|
|000011b0| 3c 2f 48 32 3e 3c 42 52 | 3e 22 0d 0a 20 20 20 20 |</H2><BR|>".. |
|000011c0| 20 0d 0a 20 20 20 20 20 | 50 72 69 6e 74 20 22 3c | .. |Print "<|
|000011d0| 54 41 42 4c 45 20 42 4f | 52 44 45 52 3d 31 3e 22 |TABLE BO|RDER=1>"|
|000011e0| 0d 0a 20 20 20 20 20 50 | 72 69 6e 74 20 22 3c 54 |.. P|rint "<T|
|000011f0| 52 3e 3c 54 44 3e 3c 42 | 3e 4e 61 6d 65 3c 2f 42 |R><TD><B|>Name</B|
|00001200| 3e 3c 2f 54 44 3e 3c 54 | 44 3e 3c 42 3e 56 61 6c |></TD><T|D><B>Val|
|00001210| 75 65 3c 2f 42 3e 3c 2f | 54 44 3e 3c 2f 54 52 3e |ue</B></|TD></TR>|
|00001220| 22 0d 0a 20 20 20 20 20 | 46 6f 72 20 69 20 3d 20 |".. |For i = |
|00001230| 31 20 54 6f 20 32 32 0d | 0a 20 20 20 20 20 20 20 |1 To 22.|. |
|00001240| 20 20 20 50 72 69 6e 74 | 20 22 3c 54 52 3e 3c 54 | Print| "<TR><T|
|00001250| 44 3e 3c 42 3e 22 20 2b | 20 63 67 69 4e 61 6d 65 |D><B>" +| cgiName|
|00001260| 73 28 69 29 20 2b 20 22 | 3c 2f 42 3e 3c 2f 54 44 |s(i) + "|</B></TD|
|00001270| 3e 3c 54 44 3e 22 20 2b | 20 63 67 69 56 61 72 69 |><TD>" +| cgiVari|
|00001280| 61 62 6c 65 73 28 69 29 | 20 2b 20 22 3c 2f 54 44 |ables(i)| + "</TD|
|00001290| 3e 3c 2f 54 52 3e 22 0d | 0a 20 20 20 20 20 4e 65 |></TR>".|. Ne|
|000012a0| 78 74 20 0d 0a 20 20 20 | 20 20 50 72 69 6e 74 20 |xt .. | Print |
|000012b0| 22 3c 2f 54 41 42 4c 45 | 3e 22 0d 0a 20 20 20 20 |"</TABLE|>".. |
|000012c0| 20 50 72 69 6e 74 20 22 | 3c 2f 42 4f 44 59 3e 3c | Print "|</BODY><|
|000012d0| 2f 48 54 4d 4c 3e 22 0d | 0a 20 20 20 20 20 0d 0a |/HTML>".|. ..|
|000012e0| 45 6e 64 20 53 75 62 0d | 0a 03 00 00 00 4e 2f 41 |End Sub.|.....N/A|
|000012f0| 03 00 00 00 4e 2f 41 | |....N/A | |
+--------+-------------------------+-------------------------+--------+--------+
