Вверх ↑
Ответов: 171
Рейтинг: 19
#1: 2009-03-17 19:16:05 ЛС | профиль | цитата
Вот и мне понадобился пакет WEB, сижу вникаю Для начала такая задача стоит:
Нужен скрипт который выодит данные из таблицы, ну это не проблема... а вся соль в том что надо вывести их в таком виде, чтобы потом скормить их Таблице(Delphi), здесь я завис..
Может подскажет кто изящное решение?

В голове такой алгоритм крутиться: скрипт делает выборку, сохраняет в файл, даллее приложение по Http_Get получает этот файл и загружает его в таблицу. Только вот как сделать чтобы файл уже был вида

строка1; строка2;
строка1;строка2;

------------ Дoбавленo:

Почемуто в файл записываеться Resource id #3Resource id #3Resource id #3


Add(EntryPoint,15520849,63,154)
{
link(onStart,8169028:doConnect,[])
}
Add(mysql_connect,8169028,126,154)
{
Host="localhost"
Login="root"
DBName="test"
link(onConnect,9341752:doQuery,[])
}
Add(mysql_query,9341752,182,154)
{
SQL="select * from mod"
link(onQuery,16213138:doFetchArray,[])
}
Add(mysql_fetch_array,16213138,231,154)
{
link(onFetchArray,10378805:doOpen,[])
}
Add(FileWrite,7415398,420,154)
{
link(Text,9341752:Result,[(433,142)(311,142)(311,198)(188,198)])
}
Add(File,10378805,364,154)
{
FileName="base.txt"
Mode="a"
AutoClose=1
link(onOpen,7415398:doWrite,[])
}


карма: 0

0