数据库累加

f15007937680

我这个只能保存不能相同的物品累加，我想相同的物品和时间就累加数量，不相同就直接保存，
   保存这一步好啦，这是累加这一步怎么弄都是错的

u871

试试这个吧，不知道是不是你要的。

  

数据类型名	公开	备 注
自_数据
成员名	类 型	传址	数组	备 注
药品	文本型
规格	文本型
厂家	文本型
数量	整数型
单位	文本型
价格	双精度小数型
保存时间	文本型

.版本 2<br /> <br /> .数据类型 自_数据<br />     .成员 药品, 文本型<br />     .成员 规格, 文本型<br />     .成员 厂家, 文本型<br />     .成员 数量, 整数型<br />     .成员 单位, 文本型<br />     .成员 价格, 双精度小数型<br />     .成员 保存时间, 文本型

  

子程序名	返回值类型	公开	备 注
子程序_数据库操作

变量名	类 型	静态	数组	备 注
局_SQL语句	文本型
局_记录集句柄	整数型
局_数据	自_数据

局_数据.药品 ＝ 超级列表框1.取标题 (0, 0)
局_数据.规格 ＝ 超级列表框1.取标题 (0, 1)
局_数据.厂家 ＝ 超级列表框1.取标题 (0, 2)
局_数据.数量 ＝ 到整数 (超级列表框1.取标题 (0, 3))
局_数据.单位 ＝ 超级列表框1.取标题 (0, 4)
局_数据.价格 ＝ 到数值 (超级列表框1.取标题 (0, 5))
局_数据.保存时间 ＝ 超级列表框1.取标题 (0, 6)
局_SQL语句 ＝ “select * from 借条 where 药品='” ＋ 局_数据.药品 ＋ “' and 保存时间='” ＋ 局_数据.保存时间 ＋ “'”
局_记录集句柄 ＝ 外部数据库1.cha询 (局_SQL语句)
判断 (外部数据库1.读 (局_记录集句柄, “药品”) ＝ 局_数据.药品 且 外部数据库1.读 (局_记录集句柄, “保存时间”) ＝ 局_数据.保存时间)
局_SQL语句 ＝ 格式化文本 (“update 借条 set 药品='%s',规格='%s',厂家='%s',数量='%d',单位='%s',价格=%f,保存时间='%s' where 药品='%s'”, 局_数据.药品, 局_数据.规格, 局_数据.厂家, 局_数据.数量, 局_数据.单位, 局_数据.价格, 局_数据.保存时间, 局_数据.药品)
外部数据库1.执行 (局_SQL语句, )
局_SQL语句 ＝ 格式化文本 (“insert into 借条(药品,规格,厂家,数量,单位,价格,保存时间) values ('%s','%s','%s','%d','%s',%f,'%s')”, 局_数据.药品, 局_数据.规格, 局_数据.厂家, 局_数据.数量, 局_数据.单位, 局_数据.价格, 局_数据.保存时间)
外部数据库1.执行 (局_SQL语句, )
外部数据库1.关闭记录集 (局_记录集句柄)

i支持库列表	支持库注释
iext	扩展界面支持库一
eAPI	应用接口支持库
spec	特殊功能支持库

.版本 2<br /> .支持库 iext<br /> .支持库 eAPI<br /> .支持库 spec<br /> <br /> .子程序 子程序_数据库操作<br /> .局部变量 局_SQL语句, 文本型<br /> .局部变量 局_记录集句柄, 整数型<br /> .局部变量 局_数据, 自_数据<br /> <br /> 局_数据.药品 ＝ 超级列表框1.取标题 (0, 0)<br /> 局_数据.规格 ＝ 超级列表框1.取标题 (0, 1)<br /> 局_数据.厂家 ＝ 超级列表框1.取标题 (0, 2)<br /> 局_数据.数量 ＝ 到整数 (超级列表框1.取标题 (0, 3))<br /> 局_数据.单位 ＝ 超级列表框1.取标题 (0, 4)<br /> 局_数据.价格 ＝ 到数值 (超级列表框1.取标题 (0, 5))<br /> 局_数据.保存时间 ＝ 超级列表框1.取标题 (0, 6)<br /> 局_SQL语句 ＝ “select * from 借条 where 药品='” ＋ 局_数据.药品 ＋ “' and 保存时间='” ＋ 局_数据.保存时间 ＋ “'”<br /> 局_记录集句柄 ＝ 外部数据库1.cha询 (局_SQL语句)<br /> .判断开始 (外部数据库1.读 (局_记录集句柄, “药品”) ＝ 局_数据.药品 且 外部数据库1.读 (局_记录集句柄, “保存时间”) ＝ 局_数据.保存时间)<br />     局_SQL语句 ＝ 格式化文本 (“update 借条 set 药品='%s',规格='%s',厂家='%s',数量='%d',单位='%s',价格=%f,保存时间='%s' where 药品='%s'”, 局_数据.药品, 局_数据.规格, 局_数据.厂家, 局_数据.数量, 局_数据.单位, 局_数据.价格, 局_数据.保存时间, 局_数据.药品)<br />     外部数据库1.执行 (局_SQL语句, )<br /> .默认<br />     局_SQL语句 ＝ 格式化文本 (“insert into 借条(药品,规格,厂家,数量,单位,价格,保存时间) values ('%s','%s','%s','%d','%s',%f,'%s')”, 局_数据.药品, 局_数据.规格, 局_数据.厂家, 局_数据.数量, 局_数据.单位, 局_数据.价格, 局_数据.保存时间)<br />     外部数据库1.执行 (局_SQL语句, )<br /> .判断结束<br /> 外部数据库1.关闭记录集 (局_记录集句柄)

补充内容 (2023-3-27 22:06):
我是个小白，不知道这样写对不对，你可以试一下。

mxsoft

update 借条 set 药品='维生素C',规格='100片',厂家='中国',数量='200',单位='平',价格1',保存时间='2023-03-27'where 保存时间='2023-03-27'
你这语句有问题
SQL命令 ＝ “update 借条 set 药品='” ＋ 药品 ＋ “',规格='” ＋ 规格 ＋ “',厂家='” ＋ 厂家 ＋ “',数量=” ＋ 到文本 (数量) ＋ “,单位='” ＋ 单位 ＋ “',价格=” ＋ 到文本 (价格) ＋ “',保存时间='” ＋ 到文本 (保存时间) ＋ “'where 保存时间='” ＋ 保存时间 ＋ “'”

f15007937680

shanxiren 发表于 2023-3-27 20:22
update 借条 set 药品='维生素C',规格='100片',厂家='中国',数量='200',单位='平',价格1',保存时间='2023-0 ...

请问问题出在哪里

u871

SQL命令 ＝ “update 借条 set 药品='” ＋ 药品 ＋ “',规格='” ＋ 规格 ＋ “',厂家='” ＋ 厂家 ＋ “',数量='” ＋ 到文本 (数量) ＋ “',单位='” ＋ 单位 ＋ “',价格=” ＋ 到文本 (价格) ＋ “,保存时间='” ＋ 到文本 (保存时间) ＋ “'where 保存时间='” ＋ 保存时间 ＋ “'”
你好，是价格写错了，这样写就可以了，日期最好用时间戳。

f15007937680

u871 发表于 2023-3-27 21:02
SQL命令 ＝ “update 借条 set 药品='” ＋ 药品 ＋ “',规格='” ＋ 规格 ＋ “',厂家='” ＋ 厂家 ＋ “' ...

但是不同的时间他不保存呢

f15007937680

u871 发表于 2023-3-27 21:02
SQL命令 ＝ “update 借条 set 药品='” ＋ 药品 ＋ “',规格='” ＋ 规格 ＋ “',厂家='” ＋ 厂家 ＋ “' ...

“'where 保存时间='” ＋ 保存时间 ＋ “'”

我一直没有明白这句是什么意思

f15007937680

u871 发表于 2023-3-27 21:02
SQL命令 ＝ “update 借条 set 药品='” ＋ 药品 ＋ “',规格='” ＋ 规格 ＋ “',厂家='” ＋ 厂家 ＋ “' ...

其实我要的效果就是，相同的时间和物品就更新，不同的时间和物品就保存，

f15007937680

u871 发表于 2023-3-27 21:57
试试这个吧，不知道是不是你要的。
[e=1].版本 2

你这个好像不行，我写的现在就是只有更新相同的物品和时间，不同的物品和时间就不保存也不更新