如何把在网页中输入的一个参数的值 和 adoquery中的sql中的参数联系起来啊???????????
时间:2010-05-25
来源:互联网
如何把网页输入的一个参数的值 和 adoquery中的参数联系起来啊???????????
网页文本输入框中输入一个值 比如姓名:李三(就是李三这个值)
<input type="text" name="paname" size="20"> 是网页中对应文本输入的地方
paname是参数 ,是我在adoquery中设置的参数
adoquery中sql属性是这样的:select * from 同学录 where 姓名:=paname
我的想法是在网页中输入 李三 然后点查询 出来李三的个人信息 数据表我已经建好了
下面是我用Delphi编写的代码。是我参考某资料的。
procedure TWebModule1.PageProducer1HTMLTag(Sender: TObject; Tag: TTag;
const TagString: String; TagParams: TStrings; var ReplaceText: String);
begin
if TagString='table' then
replacetext:=DataSetTableProducer1.Content;
end;
procedure TWebModule1.WebModule1WebActionItem1Action(Sender: TObject;
Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
begin
adoQuery1.Parameters.ParamByName('paname').Value:=Request.Contentfields.Values['paname'];
adoQuery1.Open;
response.Content:=DataSetTableProducer1.Content;
adoQuery1.Close;
end;
procedure TWebModule1.WebModule1WebActionItem2Action(Sender: TObject;
Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
begin
adoquery1.Open;
response.Content:=pageproducer1.Content;
adoquery1.Close;
end;
end.
问题应该很简单。高手稍微指点一下,即可。感谢!
网页文本输入框中输入一个值 比如姓名:李三(就是李三这个值)
<input type="text" name="paname" size="20"> 是网页中对应文本输入的地方
paname是参数 ,是我在adoquery中设置的参数
adoquery中sql属性是这样的:select * from 同学录 where 姓名:=paname
我的想法是在网页中输入 李三 然后点查询 出来李三的个人信息 数据表我已经建好了
下面是我用Delphi编写的代码。是我参考某资料的。
procedure TWebModule1.PageProducer1HTMLTag(Sender: TObject; Tag: TTag;
const TagString: String; TagParams: TStrings; var ReplaceText: String);
begin
if TagString='table' then
replacetext:=DataSetTableProducer1.Content;
end;
procedure TWebModule1.WebModule1WebActionItem1Action(Sender: TObject;
Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
begin
adoQuery1.Parameters.ParamByName('paname').Value:=Request.Contentfields.Values['paname'];
adoQuery1.Open;
response.Content:=DataSetTableProducer1.Content;
adoQuery1.Close;
end;
procedure TWebModule1.WebModule1WebActionItem2Action(Sender: TObject;
Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
begin
adoquery1.Open;
response.Content:=pageproducer1.Content;
adoquery1.Close;
end;
end.
问题应该很简单。高手稍微指点一下,即可。感谢!
作者: chenyao8886 发布时间: 2010-05-25
有人知道吗?
作者: chenyao8886 发布时间: 2010-05-25
有人知道吗?
作者: chenyao8886 发布时间: 2010-05-25
一个人都不知道吗
作者: chenyao8886 发布时间: 2010-05-26
相关阅读 更多
热门阅读
-
office 2019专业增强版最新2021版激活秘钥/序列号/激活码推荐 附激活工具
阅读:74
-
如何安装mysql8.0
阅读:31
-
Word快速设置标题样式步骤详解
阅读:28
-
20+道必知必会的Vue面试题(附答案解析)
阅读:37
-
HTML如何制作表单
阅读:22
-
百词斩可以改天数吗?当然可以,4个步骤轻松修改天数!
阅读:31
-
ET文件格式和XLS格式文件之间如何转化?
阅读:24
-
react和vue的区别及优缺点是什么
阅读:121
-
支付宝人脸识别如何关闭?
阅读:21
-
腾讯微云怎么修改照片或视频备份路径?
阅读:28