急!急!数据存入资料库中变了. to : hzlan(^只有你能帮到我^) 如果象你所说的那样的话,也只可能是赋值时截取了部分字符。你把代码贴上来看看。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 adoquery2.SQL:Insert Into HRKQGZ_Security User_ID,User_Name,User_Password,Join_Date,Dept_ID,User_Level,User_fa)Values(:User_ID,:User_Name,:User_Password,:Join_Date,:Dept_ID,:User_Level,:User_fa)代码: ADOQuery2.Parameters[0].Value:=Trim(HNEdit1.Text); ADOQuery2.Parameters[1].Value:=Trim(HNEdit2.Text); ADOQuery2.Parameters[2].Value:=Trim(HNEdit3.Text); ADOQuery2.Parameters[3].Value:=Date; ADOQuery2.Parameters[4].Value:=DBLookupComboBox1.KeyValue; ADOQuery2.Parameters[5].Value:=SpinEdit1.value; ADOQuery2.Parameters[6].Value:=UserID; ADOQuery2.ExecSQL; showmessage('新增用户'+HNEdit1.Text+'完成,请记得设置用户权限.'); 变量的数据类型设为ftstring,应该不是这个问题,因为英文传入没问题,而只是将中文字一下当成单字节,一下又当成是双字节. 我发现用select ... where a=:a这时传入中文又不会出错.为什么?是因为begin tran ... commit tran 的问题吗? 你写的句子有问题:: ADOQuery2.Parameters[0].asstring:=Trim(HNEdit1.Text); ADOQuery2.Parameters[1].asstring:=Trim(HNEdit2.Text); ADOQuery2.Parameters[2].asstring:=Trim(HNEdit3.Text); ADOQuery2.Parameters[3].asdate:=Date; ADOQuery2.Parameters[4].Value:=DBLookupComboBox1.KeyValue;(不知字段值为什么) ADOQuery2.Parameters[5].asstring:=SpinEdit1.text; ADOQuery2.Parameters[6].Value:=UserID; ADOQuery2.ExecSQL;还有就是你的Oracle的语言是否选择正确了? fastreport超简单问题!马上给分! RxRichEdit的问题。关注也加分! 跟贴有分,关于image控件的使用,简单问题,如何能把比image控件高度和宽度都大的图片显示出来? 最新大片:绿茶 [Fatal Error] fDemo.pas(33): File not found: 'uDll.dcu',为什么?(简单:20分) 一个关于数据库连接的问题 为什么端口号会自动改变 常识问题,送分 用人做过VS.net为后台,Delphi为客户端的程序吗? 如何向指定程序发送消息 delphi编的程序右上脚控制按钮的问题 TQuickRep打印问题
Values(:User_ID,:User_Name,:User_Password,:Join_Date,:Dept_ID,:User_Level,:User_fa)
代码:
ADOQuery2.Parameters[0].Value:=Trim(HNEdit1.Text);
ADOQuery2.Parameters[1].Value:=Trim(HNEdit2.Text);
ADOQuery2.Parameters[2].Value:=Trim(HNEdit3.Text);
ADOQuery2.Parameters[3].Value:=Date;
ADOQuery2.Parameters[4].Value:=DBLookupComboBox1.KeyValue;
ADOQuery2.Parameters[5].Value:=SpinEdit1.value;
ADOQuery2.Parameters[6].Value:=UserID;
ADOQuery2.ExecSQL;
showmessage('新增用户'+HNEdit1.Text+'完成,请记得设置用户权限.');
这时传入中文又不会出错.为什么?
是因为begin tran ... commit tran 的问题吗?
:
ADOQuery2.Parameters[0].asstring:=Trim(HNEdit1.Text);
ADOQuery2.Parameters[1].asstring:=Trim(HNEdit2.Text);
ADOQuery2.Parameters[2].asstring:=Trim(HNEdit3.Text);
ADOQuery2.Parameters[3].asdate:=Date;
ADOQuery2.Parameters[4].Value:=DBLookupComboBox1.KeyValue;(不知字段值为什么)
ADOQuery2.Parameters[5].asstring:=SpinEdit1.text;
ADOQuery2.Parameters[6].Value:=UserID;
ADOQuery2.ExecSQL;
还有就是你的Oracle的语言是否选择正确了?