wincc中读写数据库例程

以下是在 WinCC 中读写数据库的例程：

1. 建立一个数据库连接：

Dim conn
Set conn = CreateObject("ADODB.Connection")
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Temp\myDatabase.mdb"

2. 执行 SQL 查询：

Dim rs
Set rs = CreateObject("ADODB.Recordset")
rs.Open "SELECT * FROM myTable", conn, 3, 3

3. 读取查询结果：

Do Until rs.EOF
    MsgBox rs("myField")
    rs.MoveNext
Loop

4. 插入数据：

conn.Execute "INSERT INTO myTable (myField) VALUES ('myValue')"

5. 更新数据：

conn.Execute "UPDATE myTable SET myField = 'myNewValue' WHERE ID = 1"

6. 删除数据：

conn.Execute "DELETE FROM myTable WHERE ID = 1"

注意：在使用此例程之前，您需要将数据库文件路径（Data Source）更改为您实际使用的路径，并且确保已正确安装数据库驱动程序。