博客
关于我
【第一次机房收费系统】—数据库中上下机信息不全问题
阅读量:356 次
发布时间:2019-03-04

本文共 1786 字,大约阅读时间需要 5 分钟。

在做上下机的时候,发现了一个很大的问题,那就是上机信息可以记录,下机的信息没有反应到数据库里面。

在这里插入图片描述
如何解决此问题?
1.想主键。
当你的主键只有卡号的时候,他能不能只通过卡号反应到你数据库中呢?
答案是不能,因为你数据库中下机的信息有很多,同一个卡号可能有多个上下机记录,怎么只能通过卡号来确定你的下机呢。
2.主键+上机时间+上机日期。
利用主键+上机时间+上机日期行不?

txtsqlline = "select * from line_info where cardno='" & txtCardNo.Text & "' and Ondate='" & Trim(txtondate.Text) & "' and ontime='" & Trim(txtontime.Text) & "'"     ' txtSQL = "select * from student_Info Where cardno='" & Trim(txtCardNo.Text) & "'and status='使用'"'and status='正在上机'"    Set mrcLine = ExecuteSQL(txtsqlline, MsgText)

答案:不一定,因为这个要看你的具体代码。

就我而言,这种方法不太好,因为VB执行语句过程中有时间问题,他不可能通过一个时间点把整个语句执行,他只会一条一条的执行。所以一定会有时间延误。
在这里插入图片描述
在这里插入图片描述
看见没,它会有一个2秒的延误。
3.我们把主键换成卡号+状态。
在这里插入图片描述
利用卡号加状态就可以了。

'txtSQL = "select * from Line_Info where status=' 正常上机' and cardno = '" & Trim(txtCID.Text) & "'" '卡号状态是正常上机的,且等于text框的卡号可以下机。    txtsqlline = "select * from Line_Info where status='正在上机' and cardno = '" & Trim(txtCardNo.Text) & "'" '卡号状态是正常上机的,且等于text框的卡号可以下机。   ' txtsqlline = "select * from line_info where cardno='" & txtCardNo.Text & "' and Ondate='" & Trim(txtondate.Text) & "' and ontime='" & Trim(txtontime.Text) & "'"     ' txtSQL = "select * from student_Info Where cardno='" & Trim(txtCardNo.Text) & "'and status='使用'"'and status='正在上机'"    Set mrcLine = ExecuteSQL(txtsqlline, MsgText)'    mrcLine.AddNew    txtclosedate.Text = Format(Date, "yyyy-mm-dd")    txtclosetime.Text = Format(Time, "hh:mm")    mrcLine.Fields(8) = Trim(txtclosedate.Text) 'txtclosedate    mrcLine.Fields(9) = Trim(txtclosetime.Text) 'txtclosetime    mrcLine.Fields(10) = Trim(txtconsumeTime.Text)    mrcLine.Fields(11) = Val(Trim(txtconsumeMoney.Text))    mrcLine.Fields(12) = Val(Trim(txtCardNo.Text))    mrcLine.Fields(13) = "正常下机"    mrcLine.Fields(14) = Trim(VBA.Environ("computername"))    mrcLine.Update    mrcLine.Close

所以,一定要想想主键的问题。

转载地址:http://kxhe.baihongyu.com/

你可能感兴趣的文章
mysql5.7 for windows_MySQL 5.7 for Windows 解压缩版配置安装
查看>>
Webpack 基本环境搭建
查看>>
mysql5.7 安装版 表不能输入汉字解决方案
查看>>
MySQL5.7.18主从复制搭建(一主一从)
查看>>
MySQL5.7.19-win64安装启动
查看>>
mysql5.7.19安装图解_mysql5.7.19 winx64解压缩版安装配置教程
查看>>
MySQL5.7.37windows解压版的安装使用
查看>>
mysql5.7免费下载地址
查看>>
mysql5.7命令总结
查看>>
mysql5.7安装
查看>>
mysql5.7性能调优my.ini
查看>>
MySQL5.7新增Performance Schema表
查看>>
Mysql5.7深入学习 1.MySQL 5.7 中的新增功能
查看>>
Webpack 之 basic chunk graph
查看>>
Mysql5.7版本单机版my.cnf配置文件
查看>>
mysql5.7的安装和Navicat的安装
查看>>
mysql5.7示例数据库_Linux MySQL5.7多实例数据库配置
查看>>
Mysql8 数据库安装及主从配置 | Spring Cloud 2
查看>>
mysql8 配置文件配置group 问题 sql语句group不能使用报错解决 mysql8.X版本的my.cnf配置文件 my.cnf文件 能够使用的my.cnf配置文件
查看>>
MySQL8.0.29启动报错Different lower_case_table_names settings for server (‘0‘) and data dictionary (‘1‘)
查看>>