Автологон - помогите

[Yuran]

поправочка
postD.add('sn=4850973');

[Квэнди]

Счего вы взяли что тут надо использовать Post?
Форма не использует методом post и get по нажатию на кнопку вызывается JSfunction sendRequest(){
req=initXMLHTTPRequest();
var s = document.getElementById("sn");
if (req){
req.onreadystatechange=onReadyState ;
req.open("GET","http://accentservice.kiev.ua/mod_perl/spare/article.pl",true);
req.setRequestHeader("Content-Type","application/x-www-form-urlencoded");
req.send("sn="+s.value);
}
}
методом post вы не получите нужного результата.
Ищите методы выполнения JS на странице. Это возможно в компоненте Twebbrowser , но вы сталкнетесь с некоторыми трудностями. и Не рекомендую оного впринцпе, ибо Twebbrowser использует IE, реакция которого на XMLHTTPRequest-ы зачатую далеко не однозначена.

[Yuran]

Уважаемый КВЕНДИ, перелопатил очень много киловайт интернета, но по теме "выполнить js из делфи" нашел только вот :

uses MSHTML_TLB, SHDocVw, ShellAPI;
// function to execute a script function
function ExecuteScript(doc: IHTMLDocument2; script: string; language: string): Boolean;
var win: IHTMLWindow2;
Olelanguage: Olevariant;
begin
if doc <> nil then begin
try
win := doc.parentWindow;
if win <> nil then
begin
try
Olelanguage := language;
win.ExecScript(script, Olelanguage);
finally
win := nil;
end;
end;
finally
doc := nil;
end;
end;
end;

больше ничего подходящего. Как мне это прикрутить к моей задаче понятия не имею. Вероятно нужно во первых обновить мой indy до 10.
Подскажите пожалуйста. Или может вы знаете ссылку на темуили ресурс в нете где можно почитать.

А может для этого новую тему создать? а эту закрыть?

[Квэнди]

Это к Indy никакого отношения не имеет. Это можно связать с Twebbrowser , но как я писал, не рекомендую я вам пытаться сэмулировать AJAX запросы.