西门子电子签名、InsertAuditEntry Dim hWinCCAuditLib Dim LocalDSNName Dim WinCCUser Dim WinCCUserName Dim DatasourceNameRT Set DatasourceNameRT = HMIRuntime.Tags("DatasourceNameRT") Dim CurrentUserName Set CurrentUserName = HMIRuntime.Tags("CurrentUserName")