excel VBA进行模具管理数据库编程

Excel作为模具管理系统，数据是存储在数据库中，Excel只是作为输入输出的展现数据。表单格式按excel设计，填写后点击保存，则数据就存储至excel。生成报表也是利用数据库SQL进行汇总导出。

一、Excel 连接数据库的方式：

1、在工具中引用：Microsoft ActiveX Data Objects 2.1 Library

2、定义

Dim dbcnn As New ADODB.Connection

3、指定服务器地址（本机可用“.”或者127.0.0.1），数据库名，用户名与登录密码

dbcnn.Open "Provider=SQLOLEDB.1;Data Source=192.168.0.1;Persist Security Info=True;User ID=sa;Password=123456;Initial Catalog=MoldSys;Timeout=720;"

4、窗口关闭时进行释放连接

dbcnn.Close

Set dbcnn = Nothing

5、读取数据

SQL = "select * from 加工表 where 加工日期='2019-01-01' and 员工编号='001' "

rs1.Open Source:=SQL, ActiveConnection:=dbcnn, CursorType:=adOpenStatic, LockType:=adLockOptimistic

Do While Not rs1.EOF

ListView1.ListItems.Add , , rs1.Fields!班制 & "_" & rs1.Fields!班次 '工序名称

sk = sk + 1

ListView1.ListItems(sk).SubItems(1) = Format(rs1.Fields!加工日期, "M-d")

rs1.MoveNext

Loop

6、添加数据

SQL = "select * from A_ProdDiscardTmp where 1=2"

rs1.Open SQL, dbcnn, adOpenStatic, adLockOptimistic

rs1.AddNew

rs1.Fields!发生日期 = “2019-01-01”

rs1.Fields!模号 = “190101”

rs1.Update

作者介绍：云易云公司

原创文章来源：云易云官网https://www.yuniyun.com/news/detail/1512

excel VBA进行模具管理数据库编程相关推荐

Excel VBA 链接 Oracle数据库
标题前言准备第一步远程数据库的准备第二步本地免安装客户端下载 1.下载基本包 1.1 包下载地址 1.2 网盘下载地址 2.配置oracle 网络文件 2.1tnsnames.ora 文件 ...
Excel VBA连接ORACLE数据库
'装好oracle客户端,不需引用直接粘贴下列格式运行 Sub connect() Dim strconnt As String Set connt = New ADODB.Connection Di ...
Excel +VBA +ADO+Access数据库分页显示
新建类模块PageHelper Option ExplicitDim rs As ADODB.Recordset Dim rsds As ADODB.Recordset Dim rsPage As L ...
VBA 连接Oracle 数据库
Sub?linkOracle()?? ?? ????Dim?strConn?As?String??'连接字符串?? ?????? ????Dim?dbConn?As?Object??'连接对象?? ? ...
Python代替Excel VBA，原来真的可以
点击上方"Python爬虫与数据挖掘",进行关注回复"书籍"即可获赠Python从入门到进阶共10本电子书今日鸡汤春潮带雨晚来急,野渡无人舟自横. ...
编程隐藏child指定列_简单的Excel VBA编程问题解答——完美Excel第183周小结
学习Excel技术,关注微信公众号: excelperfect 下面是2020年11月12日发布的一些简单的ExcelVBA问题的答案,是不是和你想的一样. 1.表达式11mod 3的计算结果是什么? ...
Excel VBA 编程的常用代码
强制声明变量 Option Explicit 说明:该语句必在任何过程之前出现在模块中. 声明常数用来代替文字值. Const ' 常数的默认状态就是 Private. Const My = 456 ...
Excel VBA编程常用语句300句
Excel VBA编程常用语句300句 ************** * VBA 语句集 * * (第 1 辑) * ************** **************** * 定制模块行为 ...
小福利，用Excel VBA编程制作一个变色小游戏
小福利,用Excel VBA编程制作一个变色小游戏设计思想:在正方形的四条边上都是设置循环函数,不断改变颜色和单元格里面的数值. Option ExplicitSub 按钮1_Click() Dim ...

excel VBA进行模具管理数据库编程

excel VBA进行模具管理数据库编程相关推荐

最新文章

热门文章