Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2006.03.05;
Скачать: [xml.tar.bz2];

Вниз

Не считываются 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;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.012 c
2-1140254580
yurc
2006-02-18 12:23
2006.03.05
конкретный пример


2-1140099642
Andrey235
2006-02-16 17:20
2006.03.05
Как установить DelphiX?


1-1138275877
Silver...
2006-01-26 14:44
2006.03.05
TFrame и событие "OnPaint"


15-1139573538
Ega23
2006-02-10 15:12
2006.03.05
Глюк QA?


15-1139675986
vidiv
2006-02-11 19:39
2006.03.05
Parser Лебедева





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский