在写数据中写入如下脚本? Dim sCon Dim sSql Dim oRs Dim conn Dim oCom Dim Con Dim Data1 Data1=HMIRuntime.tags("A1").read Con="Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=master;Data Source=ms-20180905leze\wincc" Set conn=CreateObject("ADODB.Connection")