6.6 Документ Test.htm, расположенный на сервере в каталоге HTML.

html

head

(meta http-equiv="Content-Type"

content="text/html; charset=windows-1251")

title

test.htm

/title

/head

HR

body bgcolor="#FFFFFF"

(p align="center") ASNI Net CGI

/p

(form action="http://kftt.petrsu.ru/cgi-bin/asni_n.exe" method="GET")

p align="center"

(input type="submit" name="c")

(input type="text" size="10" name="q" value="1")

BR

HR

/form

/body

/html

Вид документа Test.htm в броузере

test.htm

ASNI Net CGI


Программа CGI -шлюза, запускаемая на сервере из каталога CGI-BIN. 

program asni_n;
uses Dos, NVL_03w;
const nn = #10#13;
var
  St: string;
 procedure init; begin  InitNVL_03;  write('Init Nvl-03.
'); end; 
procedure volt; var  Voltage: Real;  chan: integer; begin  
 writeln(Voltage:2:2,'volts. 
');
end;
begin
  write('Content-type: text/html',nn,nn);
  write('');
  write('');
  St:=GetEnv('QUERY_STRING');
  writeln('QUERY_STRING = ',st,'
');
  write('');
  write('ASNI Net CGI.
');
  write('');
end.