Вниз
Скачать: CL | DM;

TNMHTTP.Body   Найти похожие ветки 

← →
mfender ©   (2004-09-27 08:51) [0]

Здравствуйте опять же.
Какая-то беда у меня происходит: скрипт PHP на удаленном сервере, имеющий примерно такую сущность (без остальной шелухи):
$l=mysql_query("SELECT <col> FROM <table> WHERE <условие>");
print (или return) mysql_num_rows($l);

возвращает число (количество рядов, возвращенных запросом).

Все замечательно. Но...

На другом конце стоит такая вот беда:

procedure TForm1.Button1Click(Sender: TObject);
begin
 ht.Post("адрес скрипта","");
 if ht.Body<>"" then
    begin
     if Form2.Showing=False then
      begin
        Form2.WindowState:=wsNormal;
    if StrToInt(ht.Body)>0 then Form2.ShowModal;
       end;
   end;
end;


Так вот она работает, когда возвращенное число, например 186. Когда возвращается "1" - видит пустоту. Т.е. - вообще ничего не видит. То же и с нулём. Когда "0" - тоже пустота.

В чем тут может быть шило?


← →
mfender ©   (2004-09-27 09:14) [1]

Вобщем-то, решил я эту проблему. Не самым, возможно, красивым метhодом, но решил. Мне просто не понятен механизм, почему NMHTTP воспринимает строку, состоящую более, чем из одного символа, но не воспринимает их поодиночке. Решил добавить символы. Выглядит это примерно так:
return "|".mysql_num_rows($l);
и, соответственно, на стороне клиента:
retnum:=StrToInt(StringReplace(ht.Body,"|","",[rfReplaceAll]));
Но, все же, хотелось бы подробностей и выяснения обстоятельств :)



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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.02 c
1-1096619466
Sash
2004-10-01 12:31
2004.10.17
главная форма ровно по центру монитора


1-1096627026
gid
2004-10-01 14:37
2004.10.17
Удаление повторений в TStringlist


1-1096720987
M-Alex
2004-10-02 16:43
2004.10.17
Edit.


14-1096163372
Soft
2004-09-26 05:49
2004.10.17
Неверие в Бога ведет к Дьяволу?


14-1096290021
1008
2004-09-27 17:00
2004.10.17
Как из процедуры в DataModul-е завершить работу приложения?




   Наверх