项目未发布时,执行JS代码正常,发布后窗口不执行JS代码
Dim message As String = "dds|" & _UserName & "|" & "调度所已发布变配电所停电命令" & "999" & "号" & ",请你收到停电命令后立即回复,以告知调度员收令成功!"
Dim web = Forms("停电命令").Controls("WebBrowser1").BaseControl
web.Document.InvokeScript("eval", new String() {"var ws = new io.Socket('" & ipwebServer & "',{port:9035,});socket=io.connect(ws);socket.on('connect',function(){});socket.emit('dds','" & message & "');"})
这段代码写在窗口中的button,发布后不执行