新
新手101010
Unregistered / Unconfirmed
GUEST, unregistred user!
我已经快没有分了,可我还有很多的问题,不知道哪位大虾能雷锋式的帮我一下,多谢了
我做了一个Web服务应用程序,实现在页面中输入用户信息,然后保存到指定的数据库中。但却发现了这样的问题。
我做了一个Access2000 的数据库,内有4个字段,姓名,电话,单位,地址,都是字符型,然后在ODBC中的system SDN中添加一个数据源,指定刚刚做的数据库上,在WebModule上创建一个动作,在这个动作项的OnAction事件写入
procedure TWebModule1.WebModule1WebActionItem1Action(Sender: TObject;
Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
begin
try
with Table1 do
begin
Active:=True;
AppendRecord([Request.QueryFields.Values['name'],Request.QueryFields.Values['Tel'],Request.QueryFields.Values['com'],Request.QueryFields.Values['Addr']]);
Active:=False;
Response.Content:='保存信息成功<br>您输入的信息是:<br>'+
'姓名:'+Request.QueryFields.Values['name']+'<br>'+
'电话:'+Request.QueryFields.Values['Tel']+'<br>'+
'单位:'+Request.QueryFields.Values['com']+'<br>'+
'地址:'+Request.QueryFields.Values['Addr']+'<br>';
end;
except
On E:Exception do
Response.Content:='保存信息失败!<br>错误原因:'+E.Message;
end;
end;
运行后,输入信息,出现错误,停在AppendRecord上,提示:姓名字段的长度不能为空,于是我也这句话标为注释,运行成功,能显示出输入的信息,很显然是这句话的原因,于是我把Table换成 ADOTable,却出现“From子句错误”的错误,我又把表做成Delpphi的表格形式,调试却成功了,我不明白为什么Delphi的表行,而Access 却不行?为什么?????
我做了一个Web服务应用程序,实现在页面中输入用户信息,然后保存到指定的数据库中。但却发现了这样的问题。
我做了一个Access2000 的数据库,内有4个字段,姓名,电话,单位,地址,都是字符型,然后在ODBC中的system SDN中添加一个数据源,指定刚刚做的数据库上,在WebModule上创建一个动作,在这个动作项的OnAction事件写入
procedure TWebModule1.WebModule1WebActionItem1Action(Sender: TObject;
Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
begin
try
with Table1 do
begin
Active:=True;
AppendRecord([Request.QueryFields.Values['name'],Request.QueryFields.Values['Tel'],Request.QueryFields.Values['com'],Request.QueryFields.Values['Addr']]);
Active:=False;
Response.Content:='保存信息成功<br>您输入的信息是:<br>'+
'姓名:'+Request.QueryFields.Values['name']+'<br>'+
'电话:'+Request.QueryFields.Values['Tel']+'<br>'+
'单位:'+Request.QueryFields.Values['com']+'<br>'+
'地址:'+Request.QueryFields.Values['Addr']+'<br>';
end;
except
On E:Exception do
Response.Content:='保存信息失败!<br>错误原因:'+E.Message;
end;
end;
运行后,输入信息,出现错误,停在AppendRecord上,提示:姓名字段的长度不能为空,于是我也这句话标为注释,运行成功,能显示出输入的信息,很显然是这句话的原因,于是我把Table换成 ADOTable,却出现“From子句错误”的错误,我又把表做成Delpphi的表格形式,调试却成功了,我不明白为什么Delphi的表行,而Access 却不行?为什么?????