InterBase and Internet Explorer [D6, IB6.x]
Vladimir V.N © (2002-04-30 08:52:00)
Уважаемые мастера, подскажите пожалуйста,быть может кто-то
занимался такой проблемой,как реализация взаимоотношений InterBase
и Internet Explorera"a. Проблема заключается в том, что
нада выполнить добавление информации, введенную пользователем
в зарание созданной форме,и занести ее в базу. Для выполнения
запроса в PageProducer написал c помощю HTML внешний вид формы и
метод <form action="
http://localhost/cgi-bin/lib2.exe/check" method ="Get"> ,что
позвлило выполнить следующее действие:
procedure TWMod.WModCheckActionAction(Sender: TObject;
Request: TWebRequest; Response: TWebResponse; var Handled:
Boolean);
begin
with Request.QueryFields do
begin
Response.Content:="<html><head><title>Извищение
o занисении информации</title></head><body>
<body bgcolor="silver"> Cпасибо за "
+ Values[Names[0]] + "и за "+ Values[Names1]]
+ "</body></html>";
end;
// Values[Names[0]], Values[Names[1]] - содержат занисенную
пользователем информацию.
IBQuery.ParamByName("Addres").AsString:=
Request.QueryFields.Values[Names[0]]
IBQuery.ParamByName("Name").AsString:=
Request.QueryFields.Values[Names[1]]
IBQuery.Open;
IBquery.close;
// Cодержание IBQuery следующее: insert into list
(cust_no,addres,name) values (:cust_no,:readno,:name)
end;
Но в результате получаю ошибку в браузере или страница
отображается но инфа не заносится в бд.
Скажите пожалуйста, как выйти из cложившейся ситуации или как
по другому можна реализовать
процес добавления информации другим способом?
Заранее благодарен.
Desdechado (2002-04-30 10:14:00) [1]
IBQuery.Open; // только для запросов, возвращающих набор
данных
замени на
IBQuery.ExecSQL; // для любых запросов
Наверх 
ЧАТ |
Орешник |
|
