Главная страница
    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.011 c
3-1136903860
Silver...
2006-01-10 17:37
2006.03.05
Чтоб TADODataSet не записивал в БД но не режим ReadOnly


2-1139737431
psa247
2006-02-12 12:43
2006.03.05
Убрать SmallImages у ListView


2-1139733653
Galiaf
2006-02-12 11:40
2006.03.05
Как грамотно округлить вещественное число до, например, тысячной?


15-1139405730
Kerk
2006-02-08 16:35
2006.03.05
to seek a buyer for... the award-winning Borland Developer Studio


2-1140177446
zx__
2006-02-17 14:57
2006.03.05
работа с модемом





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский