|
马上加入TC
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
功能 添加物品_点击()
是否添加数据=辅助.对话框("你确定要将此条数据添加吗?","添加数据",2,真)
如果(是否添加数据==7)
购买日期=编辑框.获得文本("购买日期")
物品名称=编辑框.获得文本("物品名称")
物品规格=编辑框.获得文本("物品规格")
购买数量=编辑框.获得文本("购买数量")
购买金额=编辑框.获得文本("购买金额")
联系电话=编辑框.获得文本("联系电话")
购买地址=编辑框.获得文本("购买地址")
//数据库添加操作语句
Sql语句="insert into kucun(riqi,mingcheng,guige,shuliang,jine,dianhua,dizhi) values ('"&购买日期&"','"&物品名称&"','"&物品规格&"','"&购买数量&"','"&购买金额&"','"&联系电话&"','"&购买地址&"' )"
会员.数据库(数据库连接,Sql语句,返回影响行数,返回的表,返回错误信息)
数组空间.大小(返回的表,c1,c2)
如果(c1>0)
辅助.消息框("添加成功!")
百润集团进销存管理软件.查询()
否则
辅助.消息框("添加失败!")
如果结束
如果结束
返回 真
功能结束
每次添加的时候都 添加失败 求解 必采纳!
|
|