Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.10.17;
Скачать: 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 вся ветка

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

Наверх




Память: 0.47 MB
Время: 0.045 c
3-1095829795
Александр Вахнин
2004-09-22 09:09
2004.10.17
Старая проблема с Database Desktop


3-1095403065
PhAn
2004-09-17 10:37
2004.10.17
Глюк like или Access?


14-1096350505
Nikolay M.
2004-09-28 09:48
2004.10.17
Помогите с переводом на таджикский, плз


4-1094561825
Age
2004-09-07 16:57
2004.10.17
Отмена печати и очистка очереди на печать.


4-1094897871
Master Kolyan
2004-09-11 14:17
2004.10.17
Работа с кластерами ЖД посредством процедур и функций Delphi