版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
1、在WINCC中连接数据库可以使用ADO控件进行连接数据库,但是通常都不是用的ADO控件进行连接数据库,以下讲讲winccZ中使用ADO对象连接查询数据库。以下以报警记录为例。一、了解ADO对象 1.1ADO对象操作数据库是微软提供的一种接口。 1.2对ADO对象的访问使用CreateObject函数(详情请参看CreateObject函数资料) ADO组件的前缀是ADODB,所以访问的时候必须为ADODB.XX(X代表对象)
2、; eg: dim conn,oRs,oCom Set conn = CreateObject("ADODB.Connection") 'Connection对象
3、;Set oRs = CreateObject("ADODB.Recordset") 'ADODB.Recordset对象 Set oCom = CreateObject("ADODB.Command") 'ADODB.Command命令对象二、对象 2.1 Co
4、nnection 对象 2.1.1 open 方法 语法 connection.Open ConnectionString,UserID,Password,OpengOptions 说明 ConnectionString:可选参数,字符串,
5、包含连接信息 UserID:可选参数,字符串,包含建立连接时候用的用户名 Password:可选参数,字符串,包含建立连接时候用密码 OpenOptions:可选参数,连接打开方式 eg1:(连接数据库代码方法1,仅连接部分代码) Dim conn &
6、#160; Dim tagDSNName Set tagDSNName = HMIRuntime.Tags("DatasourceNameRT") Set conn = CreateObject("ADODB.Connection") conn.ConnectionString = "Provider=WinCCOL
7、EDBProvider.1;Catalog="&tagDSNName.Read&"Data Source=.WinCC" conn.CursorLocation = 3 conn.Open eg2:(连接数据代码方法2,连接部分代码) Dim conn
8、;Dim tagDSNName Set tagDSNName = HMIRuntime.Tags("DatasourceNameRT") Set conn = CreateObject("ADODB.Connection") conn.CursorLocation = 3 con
9、n.Open "Provider=WinCCOLEDBProvider.1;Catalog="&tagDSNName.Read&"Data Source=.WinCC" 2.1.2 close方法 connection.close eg: Dim conn
10、 Dim tagDSNName Set tagDSNName = HMIRuntime.Tags("DatasourceNameRT") Set conn = CreateObject("ADODB.Connection") conn.CursorLocation = 3
11、0; conn.Open "Provider=WinCCOLEDBProvider.1;Catalog="&tagDSNName.Read&"Data Source=.WinCC" '这里写上对数据库查询,修改等操作 conn.close 2.1.3 execute方法
12、 语法 Cn.Execute strCommand,IngRowsAffected,IngOptions 说明 strCommand:可以是查询语句、表名、存储过程名等 IngRowsAffected:可选参数,返回Insert、Update 、Delete查询语句后所影响的数目 Ing
13、Optiongs: 参数可以如下 adCmdUnkown:Command类型未定,由数据源提供者去判断Command语法 AdCmdFile:Command是和对象类型相应的文件名称 adCmdStoredProc:Command是存储过程名称 adCmdTable:Co
14、mmand是能产生内部SELECT*FROM TableName查询的表名称 adCmdTableDirect:Command是能直接从表中获取行内容的表名称 adCmdText:Command是一条SQL语句 eg: Dim conn,oCom,oRs Dim
15、 tagDSNName Set tagDSNName = HMIRuntime.Tags("DatasourceNameRT") Set conn = CreateObject("ADODB.Connection") conn.CursorLocation = 3 conn.Op
16、en "Provider=WinCCOLEDBProvider.1;Catalog="&tagDSNName.Read&"Data Source=.WinCC" Set oCom = CreateObject("ADODB.Command") Set oRs = CreateObject("ADODB.Recordset")
17、160; oCom.CommandType=1 Set oCom.ActiveConnection = conn oCom.CommandText ="ALARMVIEW:Select * FROM AlgViewCHT " Set oRs = oCom.Execute
18、60; '以上4句还可以写成 Set oRs=conn.Execute("ALARMVIEW:Select * FROM AlgViewCHT ") conn.close 2.2 Recordset对象 Recordset 常用属性 &
19、#160; RecordsetCount:返回当前记录的数目 BOF:表示当前记录位于该对象第一个记录之前 EOF:表示当前记录位于该对象最后一个记录之后。 movefirst:移动到第一条 movenext:移动
20、到下一条 movelast:移动到最后一条 eg: Dim conn,oCom,oRs Dim m Dim tagDSNName Set tagDSNName = HMIRunti
21、me.Tags("DatasourceNameRT") Set conn = CreateObject("ADODB.Connection") conn.CursorLocation = 3 conn.Open "Provider=WinCCOLEDBProvider.1;Catalog="&tag
22、DSNName.Read&"Data Source=.WinCC" Set oRs = CreateObject("ADODB.Recordset") Set oRs=conn.Execute("ALARMVIEW:Select * FROM AlgViewCHT ") m = oRs.RecordCount
23、 msgbox "报警行数"&m conn.close 2.2.1 Open方法 语法 recordset.Open Source,ActiveConnection,CursorType,LockType,Options &
24、#160; 说明 Source:可选参数,变体型,计算Command对象的变量名、SQL语句、表名、存储过程调用或持久的 Recordst文件名 ActiveConnection:可选参数,变体型,计算有效Connection对象变量
25、名或字符串,包含 ConnectionString参数 CursorType:可选参数,用于确定数据提供者打开Recordset时应该使用游标类型,类型如下 &
26、#160; adOpenForwardOnly:打开仅向前类型游标(默认类型) adOpenKeyset:打开键集类型游标 adOpenDynamic:打开动态类型游标
27、60; adOpenStatic:打开静态类型游标 注:具体解释请参考百度结果,这里我们主要讲解应用方面的东西。 LockType:可选参数,确定数据提供者打开Recordset时应该使用的锁定(并发)类型的LockTypeEnum
28、 值,类型如下 adLockReadOnly:只读,默认值 adLockPessinistic:保守式锁定,提供者完成确保成功
29、编辑记录所需的工作,通常通过在编辑时 候锁定数据源的记录来完成。 adLo
30、ckOptimistic:开放式锁定,提供者试用开放式锁定,只在调用Update方法时才锁定记录。 adLockBatchOptimistic:开放式批更新,用于批更新模式 Optiongs:可选参数,长整型,用于指示数据提供者如何计算Source参数,或从以前保存的Recordset
31、160; 中恢复Recordset(以下省略参数类型讲解) eg: Dim conn,oRs,oCom Dim m,i Dim tagDSNN
32、ame Set tagDSNName = HMIRuntime.Tags("DatasourceNameRT") Set conn = CreateObject("ADODB.Connection") conn.CursorLocation
33、= 3 conn.Open "Provider=WinCCOLEDBProvider.1;Catalog="&tagDSNName.Read&"Data Source=.WinCC" Set oRs = CreateObject("ADODB.Recordset")
34、; oRs.open "ALARMVIEW:Select * FROM AlgViewCHT ",conn m = oRs.RecordCount MsgBox "报警行数"&m oRs.Close conn.Close 2.3 Command对象 2.3.1 对象属性说明 ActiveC
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 加工车间年度个人工作总结(23篇)
- 装饰公司股份转让合同书(3篇)
- 广东省广外实验2024-2025学年高二上学期10月月考 数学试题含答案
- 幼儿园师德师风论坛活动方案策划
- 江苏省苏州市(2024年-2025年小学五年级语文)统编版期末考试((上下)学期)试卷及答案
- 2024年BOD自动在线监测仪项目投资申请报告代可行性研究报告
- 2024-2025学年重庆乌江新高考协作体高三上学期二调英语试题及答案
- 上海市市辖区(2024年-2025年小学五年级语文)人教版综合练习(下学期)试卷及答案
- 2024年甘肃公务员考试申论试题(县乡卷)
- 垃圾误时投放
- 湖南盐业公司招聘考试试题
- 妊娠期病毒性肝炎
- 知识产权法治宣传活动
- 《现代护士职业素养》课件
- 2024年度患者健康教育制度
- 聚氨酯保温板
- 小学生劳动技能培养与就业市场需求
- 导管相关性尿路感染学习课件
- 疑难信访培训课件
- 云南省昆明市五华区2023-2024学年九年级上学期期末英语试卷+
- 人教版七年级数学上册期中测试卷-附带有答案
评论
0/150
提交评论