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

Вниз

Знатокам asp   Найти похожие ветки 

 
alles ©   (2006-05-24 11:20) [0]

Здраствуйте ребята.

Есть такая ситуация:
клиент отправляет нам на сервер запрос в таком виде
http://199.199.199.199/getPayments.asp?bkid=1000&result=ААА
программа на asp (нр.1) выбирает эти 2 параметра (bkid,result) и прописывает их в текстовом файле (это уже работает). Другая (нр.2) программа должна прочитать значения из этого файла и делать какие-то операций. После завершения работ программа 2 создает тоже файлик в котором содержится ответ для клиента.
Вопрос как из программы 1 ждать пока не появится этот файл чтобы потом его прочитать и отпарвить клиенту в ответ?
Как в asp прочитать файл по строкам?
Спасибо


 
wal ©   (2006-05-24 11:31) [1]

1. FileSystemObject.FileExists
2. FileSystemObject.OpenTextFile

А зачем все так сложно?


 
alles ©   (2006-05-24 11:42) [2]

2 wal ©   (24.05.06 11:31) [1]
Понимаете, мы сечяс можем делать связку между этих 2 программ (пока что) только через файлы (шеф так сказал, хотя я тоже не согласен с этим).
как писАть цикл
while  true do
if not FileSystemObject.FileExists("c:\rezult.txt") then
Sleep(1000); "< -- тут не знаю что писАть
end if
end while


 
McSimm ©   (2006-05-24 11:47) [3]


> c:\rezult.txt

это просто для упрощения ?
иначе  - что будет, когда прийдет несколько запросов ?


 
alles ©   (2006-05-24 11:55) [4]

это просто для упрощения ?
ДА.


 
umbra ©   (2006-05-24 12:03) [5]

существование файла не означает, что запись внего закончена, так что FileSystemObject.FileExists в данном случае не лучший выбор.


 
alles ©   (2006-05-24 12:06) [6]

2 umbra ©   (24.05.06 12:03) [5]
и это тоже првильно, но для начяло хоть с [2] разбиратся


 
umbra ©   (2006-05-24 12:18) [7]

если это VBS, то  должно работать так

Do while not FileSystemObject.FileExists("c:\rezult.txt")
WScript.Sleep(1000)
loop


 
saxon   (2006-05-24 12:27) [8]

Программа 2 - тоже asp?


 
Algol   (2006-05-24 12:30) [9]


> while  true do
> if not FileSystemObject.FileExists("c:\rezult.txt") then
>
> Sleep(1000); "< -- тут не знаю что писАть
> end if
> end while

Ну и ну )))
Такие проблемы так не решаются.
Если уж оба приложения на АСП, может легче обмен между ними по HTTP сделать? Оно так правильнее будет...


 
alles ©   (2006-05-24 12:55) [10]

2- я программа в Delphi :)

2 umbra ©   (24.05.06 12:18) [7]
Object required: "WScript"
что надо в uses или где то прописать чтобы компилятор знал о WScript


 
wal ©   (2006-05-24 12:56) [11]


> [2] alles ©   (24.05.06 11:42)
1. Шефа можно (и нужно) в этом случае переубедить, к разумным доводам все шефы, обычно, прислушиваются.
2. Если п.1 выполнить не удалось, то предлагаю сделать программу №3, в виде COM-объекта, который все эти манипуляции делает и отдает результат программе №1, которая, при этом, и знать не знает ни о каких файлах.


 
wal ©   (2006-05-24 12:57) [12]


> WScript.Sleep(1000)
Бедные юзеры.



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

Форум: "Прочее";
Текущий архив: 2006.06.18;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.47 MB
Время: 0.01 c
3-1145546774
s_t_d
2006-04-20 19:26
2006.06.18
IBExpert. Экспорт данных в Excel


1-1147253284
Dimich1978
2006-05-10 13:28
2006.06.18
Можно ли перезаписать "работающий" файл?


3-1145713031
Alpine
2006-04-22 17:37
2006.06.18
IB 7.01 проблемма с кодировкой.


3-1145442602
jiny
2006-04-19 14:30
2006.06.18
Как подключиться к VFP (*.dbf) через ADO


15-1148560432
ArtemESC
2006-05-25 16:33
2006.06.18
BAT - файл...





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