中国DOS联盟论坛

中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --
联盟域名：www.cn-dos.net　论坛域名：www.cn-dos.net/forum
游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟
中国DOS联盟论坛
现在时间是 2026-09-24 00:19 		共 47,812 主题排行 / 349,917 发帖 / 今日 0 篇 / 48,274 会员排行
DOS批处理 & 脚本技术（批处理室） » js脚本是否能改为批处理清除logo_1.exe
可打印版本 　2,885 / 20
第1楼　chainliq 发表于 2006-10-17 10:01
高级用户　发帖 244　积分 635　来自 广西贵港
js脚本是否能改为批处理清除logo_1.exe
常经有位兄弟在这里发表过一个js脚本，它确实能把被感染的应用程序中的logo_1.exe病毒分离也来，但是需要手工册除，而且在清理之前要知道哪个被感染。但是我们都知道logo_1.exe这个病毒感染力很强，我们不可能一个一个的去试试看有没有病毒，这样好麻烦。我想如果批处理能自动查找被感染的exe文件并把它分离出来，再通过安静模式册除它，我想效果并不比瑞星差噢！
现在 我也是copy那位兄弟的原码来的噢如下真希望那位高手能把它改成批处理呀！

TaskKill("logo1_.exe");
TaskKill("rundl132.exe");
var form1 = new Form;
form1.Run();
function Form()
{
var IE = WSH.GetObject("", "InternetExplorer.Application");
IE.ToolBar = 0;
IE.StatusBar = 0;
IE.Width = 350;
IE.Height = 90;
IE.Navigate("about:blank");
var document = IE.document;
document.body.scroll = "no";
var window = document.parentWindow;
document.body.charset = "gb2312";
document.bgColor = "menu";
document.body.style.border = 0;
document.title = "Logo1_.exe 病毒清除工具";
function AddControl(obj)
{
document.body.appendChild(obj);
}
function FileBox()
{
var obj = document.createElement("input");
obj.type = "file";
return obj;
}
function Button(text)
{
var obj = document.createElement("input");
obj.type = "button";
obj.value = text;
return obj;
}
this.Run = function()
{
var btnKill = new Button("清除病毒");
var filebox = new FileBox;
AddControl(filebox);
AddControl(btnKill);
btnKill.onclick = btnKill_Clicked;
IE.Visible = true;
try
{
while(!window.closed) WSH.Sleep(1000);
}
catch(err)
{}
function btnKill_Clicked()
{
if(filebox.value && Check(filebox.value))
{
if(window.confirm("发现病毒，是否清除？"))
{
try
{
Backup(filebox.value);
}
catch(Err){}
Clear(filebox.value);
window.alert("清除了一个病毒。");
}
}
else
{
window.alert("未发现病毒。");
}
}
}
}
function TaskKill(Process)
{
var WinMgmts = GetObject("WinMgmts://127.0.0.1");
var ProcList = WinMgmts.ExecQuery("select * from win32_process");
var ProcList = new Enumerator(ProcList);
while(!ProcList.atEnd())
{
if(ProcList.item().Name.toLowerCase() == Process.toLowerCase())
ProcList.item().terminate();
ProcList.moveNext();
}
}
function Check(SourcePath)
{
var Code = "MZKERNEL32.DLL\x00\x00LoadLibraryA\x00\x00\x00\x00GetProcAddress";
var Stream = new ActiveXObject("Adodb.Stream");
Stream.Open();
Stream.Charset = "gb2312";
Stream.LoadFromFile(SourcePath);
var Body = Stream.ReadText(46);
Stream.Close();
return Body==Code;
}
function Clear(SourcePath)
{
var Stream = new ActiveXObject("Adodb.Stream");
Stream.Open();
Stream.LoadFromFile(SourcePath);
var Body = Stream.ReadText(500 * 1024);
Stream.Close();
var Match = "";
while(Match.length < 21) Match += "\x00";
Match += "MZ";
var C = 0, Temp = "";
while(C< Body.length && Temp.indexOf(Match) <0)
{
var Uni = Body.substr(C, 1000);
C += 1000;
Temp += Decode(Uni);
}
var Position = Temp.indexOf(Match) + 21;
Stream.Type = 1;
Stream.Open();
Stream.LoadFromFile(SourcePath);
Stream.Position = Position;
Body = Stream.Read();
Stream.Position = 0;
Stream.SetEOS();
Stream.Write(Body);
Stream.SaveToFile(SourcePath, 2);
Stream.Close();
while(Check(SourcePath)) Clear(SourcePath);
}
function Backup(SourcePath)
{
var FSO = new ActiveXObject("Scripting.FileSystemObject");
var File = FSO.GetFile(SourcePath);
File.Copy(SourcePath + ".logo1_vir", false);
}
function Decode(text)
{
return text.replace(/([\u0000-\uffff])/g, function($1)
{
var uni = $1.charCodeAt(0).toString(16);
while(uni.length < 4) uni = "0" + uni;
uni = uni.replace(/(\w{2})(\w{2})/g, "%$2%$1");
return unescape(uni);
});
}
第2楼　lxmxn 发表于 2006-10-17 11:24
版主　发帖 4,938　积分 11,386


　　我只能改到这里，没有测试，如果不行的话，望论坛其它的高手可以帮你解决一下。

[ Last edited by lxmxn on 2006-10-17 at 11:26 ]
第3楼　utem999 发表于 2006-10-17 12:30
初级用户　发帖 54　积分 135
Originally posted by lxmxn at 2006-10-17 11:24:
第4楼　lxmxn 发表于 2006-10-17 12:38
版主　发帖 4,938　积分 11,386
　　那就只有等高手来解决了。

　　我还不会js脚本啊。也可能是在转换为.bat文件的过程中出现错误了。

　　你原先那个代码可以成功的么？
第5楼　pengfei 发表于 2006-10-17 22:49
银牌会员　发帖 485　积分 1,218　来自 湖南.娄底
2楼只是把js脚本用BAT来生成, 我想楼主的意思是不用一个文件一个文件地检查, 让BAT自动执行清除病毒. 这好像要改js脚本代码了.

而重定向出错, 可能是一些特殊字符的原故吧, 用^转义一下就可以了...
第6楼　electronixtar 发表于 2006-10-17 23:47
铂金会员　发帖 2,672　积分 7,493
用 more +n 生成吧，又快又不会出错
第7楼　9527 发表于 2006-10-18 00:18
银牌会员　发帖 438　积分 1,185　来自 北京
对于楼主中了威金病毒深感无能为力.........
对于杀掉LOGO_1.EXE和rundl132.exe进程，本人推荐ntsd命令
ntsd -c q -p 程序ID

[ Last edited by pip on 2006-10-18 at 00:21 ]
第8楼　lxmxn 发表于 2006-10-18 00:24
版主　发帖 4,938　积分 11,386
Originally posted by electronixtar at 2006-10-17 23:47:
用 more +n 生成吧，又快又不会出错


　　具体怎么实现？可以给出详细的代码吗？学习学习……
第9楼　electronixtar 发表于 2006-10-18 04:36
铂金会员　发帖 2,672　积分 7,493
more /?

<%~f0 more +n >xxxx.js
第10楼　chainliq 发表于 2006-10-18 08:42
高级用户　发帖 244　积分 635　来自 广西贵港
哎，没办法呀，服务器一中，还没来得及时处理，下面的客户机就以经中啦，现在还同办法彻底清除呀，现在只能在开机的时候调用批处理暂时删除啊，！！
没办法，这个东西连冰点也击穿！！太可怕啦呀，可以说是网吧第一杀手呀！
如下：
del D:\_desktop.ini /f/s/q/a
del D:\logo_1.exe /f/s/q/
第11楼　pengfei 发表于 2006-10-18 08:51
银牌会员　发帖 485　积分 1,218　来自 湖南.娄底
写这个病毒的是哪位, 我拜他为师, 哈哈~
第12楼　chainliq 发表于 2006-10-18 08:53
高级用户　发帖 244　积分 635　来自 广西贵港
Originally posted by electronixtar at 2006-10-17 23:47:
用 more +n 生成吧，又快又不会出错




不知道兄弟说的 more+n 是怎么样生成呢，能不能弄出来给大家参考一下呢！
第13楼　chainliq 发表于 2006-10-18 09:11
高级用户　发帖 244　积分 635　来自 广西贵港
如果有个批处理能把全部logo_1.exe都分离出来的话，再用：
del E:\**.logo1_vir /f/s/q/a
这样就事半工倍啦哦！
第14楼　3742668 发表于 2006-10-18 11:49
荣誉版主　发帖 718　积分 2,013
不会ＪＳ，不过能看个大概，就后面的那个函数不大明白，和vbs大不一样。否则可以改写成vbs版的，搞全盘扫描．
不过论坛里面会js的可以修改一下啊，应该很简单的，只要修改function Form()下的this.run就行了，把filebox.value替换为argument之类的东东，把function Form()中this.run以上全部删除．
或者不调用参数，直接用wmi里的datafile全盘搜索exe文件然后直接调用下面那几个函数就行了．
第15楼　chainliq 发表于 2006-10-18 12:14
高级用户　发帖 244　积分 635　来自 广西贵港
嗯，还是版主有点儿思路，不过还得请求各位英雄各露一手呀，这样的话，我想它的杀毒效果并不比瑞星差呀！
1 2 　下一页
[ 联系联盟系统管理团队 - 中国DOS联盟 - 标准版 ]
Sponsored by ifanr Inc | © 2001–2023