大家好！
我想做一个出入库的数据归档及报表，
1：数据包括：静态数据（人工录入）入库开始时间、入库结束时间、入库质量、入库车辆牌号、入库罐号、入库批号、等；过程数据（入库完后由PLC程序计算出）：入库质量、平均流量、平均温度、平均密度、平均酒精度等；
我想用“用户归档”做，但是用户归档由容量限制，客服推荐用SQL将数据导出，但是我没有相关的基础，希望给予指点！
另外还得实现历史数据的查询和打印！
入库东西为浓度很高的酒精，每次都是用汽车拉来，接上管道后通过wincc画面操作打入相应的罐号，完毕后打印出报表来！
问题补充：
可以给个例子程序吗？
最佳答案
我做过类似的地磅系统，就是采用wincc自带的sqlserver
1、在sqlserver里面创建一个自己的数据库、表
2、在wincc的画面里面采用vbs读写数据库
3、打印单据我采用的是后台安装excel，wincc中调用后台的excel样张打印（操作员看不见excel）
你需要具备vbs、sqlserver和数据库的基本知识，这些网上都有，推荐《深入浅出wincc》这本官方出书
good luck
贴个连接数据库和断开数据库的脚本吧，其它查询、插入、删除、统计等的脚本跟项目具体情况有关系，但是万变不离其宗，都是利用ado对象来操作数据库内容。所以你需要具备vbs、ado和sqlserver的基本知识，这些其实都是微软的东西
-------------------------------------------------------------------------------
Sub ConnectDB(DbName,Byref adoCn,Byref Rs,rsConnection)
''***************************************************************
''Function : Connect DataBase
''***************************************************************
Dim strCnstring
Dim strID,strPwd,strDBName,strPCName
''--------Create Ado Object-----------
Set AdoCn = CreateObject("ADODB.Connection")
Set Rs=CreateObject("ADODB.Recordset")
''--------Connect Database-----------
strID="sa"''username
strPwd="123"''password
strDBName=DbName''database name
strPCName=HMIRuntime.tags("@LocalMachineName").read''computer name
''------------------------------
strCnstring="Provider=SQLOLEDB.1;Password=" & strPwd & ";"
strCnstring=strCnstring & "Persist Security Info=True;User ID=" & strID & ";"
strCnstring=strCnstring & "Initial Catalog=" & strDBName & ";"
strCnstring=strCnstring & "Data Source=" & strPCName & "\WINCC"
AdoCn.ConnectionString = strCnstring
AdoCn.open
''--------Recordset-----------
If rsConnection=True Then
Rs.ActiveConnection=adoCn
End If
Rs.CursorLocation=3''adUseClient
End Sub
断开数据库
Sub DisConnectDB(Byref adoCn,Byref Rs)
''***************************************************************
''Function : Disconnect Database
''***************************************************************
Set Rs=Nothing
AdoCn.close
Set AdoCn = Nothing
End Sub
提问者对于答案的评价：
继续学习SQL吧！
原创文章，作者：more0621，如若转载，请注明出处：https://www.zhaoplc.com/plc205828.html
微信扫一扫 
支付宝扫一扫