Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.03.05;
Скачать: CL | DM;

Вниз

Не считываются cookies (cgi)   Найти похожие ветки 

 
zorik ©   (2006-02-17 15:01) [0]

Проблема в следующем. Делаю что-то наподобе внутренней странички. Есть начальная веб-страница с полями ввода имени юзера, пароля и кнопкой. При нажатии на кнопку данные передаются на другую страницу (динамическую cgi). Там происходит следущее. Имя и пароль считываються, записываються в кукисы и происходить автоматическая переадресация (Location: main.cgi) на страницу в которой считывается имя и пароль, сравниваеться с тем что должно быть и в зависимости от результата формируется либо главная страница либо страница с сообщением об ошибке.
Ниже процедуры записи и чтения

function getcookie(name:string):string;
var
 cookie:string;
 p:integer;
begin
 cookie:=GetVar("HTTP_COOKIE");
 name:=name+"="; p:=pos(name,cookie);
 if p=0 then
  Result:=""
 else begin
  Delete(cookie,1,p+length(name)-1);
  p:=pos(";",cookie);
  if p=0 then p:=pos(" ",cookie);
  if p=0 then p:=length(cookie)+1;
  result:=copy(cookie,1,p-1);
 end;
end;

procedure setcookie(name,value:string);
begin
 WriteLn("Set-Cookie: ",Name,"=",Value);
end;

Вопрос. Когда происходить запись кукисов? Без переадресации все работает, а с переадресацией нет. Можете ссылки дать если знаете :-)


 
McSimm ©   (2006-02-17 15:05) [1]

Веб сервер IIS ?


 
McSimm ©   (2006-02-17 15:07) [2]

Если да, то посмотрите
http://support.microsoft.com/kb/q176113/


 
zorik ©   (2006-02-17 15:10) [3]

Да IIS


 
zorik ©   (2006-02-17 15:54) [4]


> McSimm ©   (17.02.06 15:07) [2]
>
> Если да, то посмотрите
> http://support.microsoft.com/kb/q176113/

Спасибо огромное. После долгих мучений получилось!



Страницы: 1 вся ветка

Текущий архив: 2006.03.05;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.041 c
3-1136465833
tytus
2006-01-05 15:57
2006.03.05
BDE Error Field(xxx) mast have value


2-1140011652
VanDet
2006-02-15 16:54
2006.03.05
Здравствуйте помогите пожалуйста


1-1138966198
Kostik
2006-02-03 14:29
2006.03.05
Как поместить TEdit в TStatusPanel компонента TStatusBar ?


15-1139506703
Volf_555
2006-02-09 20:38
2006.03.05
Где достать фотографию листа в клетку? СРОЧНО!


3-1136794846
s_nik05
2006-01-09 11:20
2006.03.05
Как обнулить поле?