ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 Excel Home精品图文教程库
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
300集Office 2010微视频教程 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
12
返回列表 发新帖
楼主: 魂断蓝桥

[原创] vb6.0+mysql

[复制链接]

TA的精华主题

TA的得分主题

发表于 2016-6-30 01:08 | 显示全部楼层
算了,又去csdn分别下载了1、mysql-5.5.37-win32.msi
2、mysql驱动程序_mysql-connector-odbc-5.1.6-win32.msi
精确的版本,准备卸载mysql,重装5.5.37版本
好像数据库里面少个表啊,是不是,源文件中药select * from 用户,好像没有这个表,是不是初始化时会生成这个表?

TA的精华主题

TA的得分主题

 楼主| 发表于 2016-6-30 16:29 | 显示全部楼层
本帖最后由 魂断蓝桥 于 2016-6-30 16:33 编辑
sannige 发表于 2016-6-29 23:28
追寻大神的脚步,我安装了xp的虚拟机,并且安装了
1、mysql-5.5.37-win32.msi
2、mysql驱动程序_mysql-co ...

真是不好意思啊。

时间太久远了,都都忘记了,我也不是什么大神,仅仅是爱好而已。

Public Const driv As String = "{MySQL ODBC 5.1 Driver}"  ‘这个字符串怎么获得?

这个网上应该能找到吧,实在不行,我把手里的驱动给你传一个。

Public Const 人员 As String = "admin"

这个就应该是,当时图简单,没有添加别的用户名,你可以自己添加,并用md5函数加密就行了。

mysql驱动程序_mysql-connector-odbc-5.1.6-win32.part1.rar (1.39 MB, 下载次数: 11)

mysql驱动程序_mysql-connector-odbc-5.1.6-win32.part2.rar (1.39 MB, 下载次数: 12)

mysql驱动程序_mysql-connector-odbc-5.1.6-win32.part3.rar (1.37 MB, 下载次数: 11)




TA的精华主题

TA的得分主题

发表于 2016-7-1 23:57 | 显示全部楼层
这几天有空了就一直在看这个工程,
源文件中应该是少了一个船名1的frm,负责修改船名。
其次,navivat 模型中的“人员”表名称应该是“用户”,
另外还少了一个叫“查询”的视图,具体结构不详
总表中航次id数据类型和航次表中的航次id不一致。
托运人frm中飞adodc1中的 username和password写死了,和连接字符串中的不一致
还原备份frm中的功能应该会存在一些路径的问题,c:\bf.bat,d:\DataBack\等路径写死了
还有一点我不太理解的就是数据库中各个表的外键关系如何,
最好能把jjd数据库的结构发一下。总之我把所有外键删除,程序能运行,我还不太理解模型中外键的箭头形状分别表达什么意思,究竟是哪张表中有指向另一张表的外键,并且外键的约束类型是什么?

虽然有这些问题,已有的东西也够我看一阵子了,哈哈

TA的精华主题

TA的得分主题

 楼主| 发表于 2016-7-4 09:02 | 显示全部楼层
sannige 发表于 2016-7-1 23:57
这几天有空了就一直在看这个工程,
源文件中应该是少了一个船名1的frm,负责修改船名。
其次,navivat 模 ...

/*
Navicat MySQL Data Transfer

Source Server         : root
Source Server Version : 50537
Source Host           : localhost:3306
Source Database       : jjd

Target Server Type    : MYSQL
Target Server Version : 50537
File Encoding         : 65001

Date: 2016-07-04 09:02:08
*/

SET FOREIGN_KEY_CHECKS=0;

-- ----------------------------
-- Table structure for `总表`
-- ----------------------------
DROP TABLE IF EXISTS `总表`;
CREATE TABLE `总表` (
  `计费日期` date NOT NULL,
  `锁定` enum('N','Y') NOT NULL DEFAULT 'N',
  `托运人id` smallint(6) NOT NULL,
  `航次id` int(11) NOT NULL,
  `总表id` int(11) NOT NULL AUTO_INCREMENT,
  PRIMARY KEY (`总表id`),
  KEY `航次id` (`航次id`),
  KEY `ads` (`托运人id`),
  CONSTRAINT `总表_ibfk_1` FOREIGN KEY (`托运人id`) REFERENCES `托运人` (`托运人id`),
  CONSTRAINT `总表_ibfk_2` FOREIGN KEY (`航次id`) REFERENCES `航次` (`航次id`)
) ENGINE=InnoDB AUTO_INCREMENT=16 DEFAULT CHARSET=gbk;

-- ----------------------------
-- Records of 总表
-- ----------------------------
INSERT INTO `总表` VALUES ('2014-06-02', 'N', '3', '3', '12');
INSERT INTO `总表` VALUES ('2014-06-23', 'N', '1', '1', '13');
INSERT INTO `总表` VALUES ('2014-07-01', 'N', '2', '6', '15');

-- ----------------------------
-- Table structure for `托运人`
-- ----------------------------
DROP TABLE IF EXISTS `托运人`;
CREATE TABLE `托运人` (
  `托运人id` smallint(6) NOT NULL AUTO_INCREMENT,
  `托运人全称` varchar(20) NOT NULL,
  `托运人简称` varchar(15) NOT NULL,
  `联系人` varchar(10) DEFAULT NULL,
  `电话` varchar(20) DEFAULT NULL,
  `地址` varchar(50) DEFAULT NULL,
  `税号` varchar(20) DEFAULT NULL,
  PRIMARY KEY (`托运人id`)
) ENGINE=InnoDB AUTO_INCREMENT=4 DEFAULT CHARSET=gbk;

-- ----------------------------
-- Records of 托运人
-- ----------------------------
INSERT INTO `托运人` VALUES ('1', '天津君宝物流贸易有限公司', '天津君宝', '李军', '13508451254', '天津市大平区53号', '451 125 459 112');
INSERT INTO `托运人` VALUES ('2', '广州明天物流国际贸易有限公司', '广州明天物流', null, null, null, null);
INSERT INTO `托运人` VALUES ('3', '广州麒麟物资贸易有限公司', '广州麒麟', '王军', '123456789', null, null);

-- ----------------------------
-- Table structure for `明细表`
-- ----------------------------
DROP TABLE IF EXISTS `明细表`;
CREATE TABLE `明细表` (
  `货名` varchar(10) NOT NULL,
  `货运量` double NOT NULL,
  `单价` double DEFAULT NULL,
  `收入` decimal(10,2) DEFAULT NULL,
  `总表id` int(11) NOT NULL,
  `明细表id` int(11) NOT NULL AUTO_INCREMENT,
  PRIMARY KEY (`明细表id`),
  KEY `总表id` (`总表id`),
  CONSTRAINT `明细表_ibfk_1` FOREIGN KEY (`总表id`) REFERENCES `总表` (`总表id`)
) ENGINE=InnoDB AUTO_INCREMENT=18 DEFAULT CHARSET=gbk;

-- ----------------------------
-- Records of 明细表
-- ----------------------------
INSERT INTO `明细表` VALUES ('陶瓷', '151', '1515', '228765.00', '12', '13');
INSERT INTO `明细表` VALUES ('钢材', '546', '52', '28392.00', '12', '14');
INSERT INTO `明细表` VALUES ('冷卷', '514.457', '80', '41156.56', '15', '15');
INSERT INTO `明细表` VALUES ('酸洗卷', '100.478', '90', '9043.02', '13', '16');
INSERT INTO `明细表` VALUES ('中板', '4578.478', '72.5', '331939.66', '13', '17');

-- ----------------------------
-- Table structure for `用户`
-- ----------------------------
DROP TABLE IF EXISTS `用户`;
CREATE TABLE `用户` (
  `用户` varchar(10) NOT NULL,
  `密码` varchar(10) NOT NULL,
  `权限` enum('查询','商务','操作','admin') NOT NULL,
  PRIMARY KEY (`用户`)
) ENGINE=InnoDB DEFAULT CHARSET=gbk;

-- ----------------------------
-- Records of 用户
-- ----------------------------
INSERT INTO `用户` VALUES ('admin', 'a', 'admin');
INSERT INTO `用户` VALUES ('b', 'b', '查询');
INSERT INTO `用户` VALUES ('c', 'c', '商务');
INSERT INTO `用户` VALUES ('d', 'd', '操作');

-- ----------------------------
-- Table structure for `航次`
-- ----------------------------
DROP TABLE IF EXISTS `航次`;
CREATE TABLE `航次` (
  `船名` varchar(10) NOT NULL,
  `航次` varchar(10) NOT NULL,
  `起运港` varchar(10) NOT NULL,
  `到达港` varchar(10) NOT NULL,
  `航次id` int(11) NOT NULL AUTO_INCREMENT,
  PRIMARY KEY (`航次id`),
  UNIQUE KEY `船名航次起运港到达港不能重复` (`船名`,`航次`,`起运港`,`到达港`) USING BTREE,
  CONSTRAINT `航次_ibfk_1` FOREIGN KEY (`船名`) REFERENCES `船名` (`船名`)
) ENGINE=InnoDB AUTO_INCREMENT=8 DEFAULT CHARSET=gbk;

-- ----------------------------
-- Records of 航次
-- ----------------------------
INSERT INTO `航次` VALUES ('碧海宝珠', '1401', '京唐', '广州', '6');
INSERT INTO `航次` VALUES ('碧海宝珠', '1401', '京唐', '新沙', '7');
INSERT INTO `航次` VALUES ('碧海宝珠', '1401', '天津', '广州', '3');
INSERT INTO `航次` VALUES ('碧海金珠', '1401', '大连', '青岛', '1');
INSERT INTO `航次` VALUES ('碧海金珠', '新增', '新增', '新增', '4');
INSERT INTO `航次` VALUES ('碧海金珠', '新增1', '新增1', '新增1', '5');
INSERT INTO `航次` VALUES ('碧海银珠', '1401', '天津', '汕头', '2');

-- ----------------------------
-- Table structure for `船名`
-- ----------------------------
DROP TABLE IF EXISTS `船名`;
CREATE TABLE `船名` (
  `船名` varchar(10) NOT NULL,
  PRIMARY KEY (`船名`)
) ENGINE=InnoDB DEFAULT CHARSET=gbk;

-- ----------------------------
-- Records of 船名
-- ----------------------------
INSERT INTO `船名` VALUES (' 7-11');
INSERT INTO `船名` VALUES ('a');
INSERT INTO `船名` VALUES ('a1');
INSERT INTO `船名` VALUES ('a2');
INSERT INTO `船名` VALUES ('aaa');
INSERT INTO `船名` VALUES ('b2');
INSERT INTO `船名` VALUES ('碧海宝珠');
INSERT INTO `船名` VALUES ('碧海金珠');
INSERT INTO `船名` VALUES ('碧海银珠');

TA的精华主题

TA的得分主题

发表于 2016-10-15 07:16 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
新生学习一下

TA的精华主题

TA的得分主题

发表于 2017-2-27 22:25 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
标记一下,谢谢分享。

TA的精华主题

TA的得分主题

发表于 2018-6-14 21:42 | 显示全部楼层

TA的精华主题

TA的得分主题

发表于 2018-6-15 01:28 | 显示全部楼层
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

关闭

最新热点上一条 /1 下一条

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-4-19 22:50 , Processed in 0.046134 second(s), 9 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

快速回复 返回顶部 返回列表