Delphi7 测试中弹出提示：应用程序在使用中使用了错误类型的值。如图!求高手解答！
-------以上是数据库------------------以下是代码部分--------WithDataModule2.ADOQuery5_TianJiadobegi...
-------以上是数据库-----------
-------以下是代码部分--------
With DataModule2.ADOQuery5_TianJia do
begin Close; SQL.Clear; SQL.Add('Insert DDRS_YuanGong values ( :a,:b,:c,...............)'); Parameters.ParamByName('a').Value := Trim(Edit9.Text); //员工编号 Parameters.ParamByName('b').Value := Trim(Edit1.Text); //员工姓名(<----------是这一行弹出错误提示---------) Parameters.ParamByName('c').Value := Trim(ComboBox12.Text); //部门
......... 展开
-------以下是代码部分--------
With DataModule2.ADOQuery5_TianJia do
begin Close; SQL.Clear; SQL.Add('Insert DDRS_YuanGong values ( :a,:b,:c,...............)'); Parameters.ParamByName('a').Value := Trim(Edit9.Text); //员工编号 Parameters.ParamByName('b').Value := Trim(Edit1.Text); //员工姓名(<----------是这一行弹出错误提示---------) Parameters.ParamByName('c').Value := Trim(ComboBox12.Text); //部门
......... 展开
1个回答
展开全部
告诉我，你当时执行时这些edit各是什么内容？
如果可以的话，建议用
Parameters.ParamByName('a').AsInteger:= StrToInt(Trim(Edit9.Text));
Parameters.ParamByName('b').AsString:= Trim(Edit1.Text);
如果可以的话，建议用
Parameters.ParamByName('a').AsInteger:= StrToInt(Trim(Edit9.Text));
Parameters.ParamByName('b').AsString:= Trim(Edit1.Text);
更多追问追答
追问
我也知道是数据类型错了。你能教我把数据插入数据库有几种方法吗？列出几个例子，我把分给你！谢谢 ！
追答
1，像你上面这种传sql语句，设定参数。
2，传拼凑sql语句跟上面的类似。
3，使用append ，先查出一个空表比方select * from tablename where 1=0 ，然后append，再对应把对应字段给赋值，最后提交post
。。。
这些你百度delphi ado
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
