function Killvirus(subitem) { // s += fc.item(); // s += "|||"; var Fl=""; var f1; var fc1; var fso1 = new ActiveXObject("Scripting.FileSystemObject"); f1=fso1.GetFolder(subitem) fc1 = new Enumerator(f1.files); for (; !fc1.atEnd(); fc1.moveNext()) { var tmpFile=fc1.item(); var fso2; var fso2 = new ActiveXObject("Scripting.FileSystemObject"); var tmpFile1=fso2.GetFileName(tmpFile); var a=tmpFile1.substring(tmpFile1.length-4,tmpFile1.length).toUpperCase(); if(a==".HTM"||a==".HTT"){ b = fso2.OpenTextFile(tmpFile, 1); var c=b.ReadAll(); if(c.indexOf("vbscript:KJ_start()")>-1) {count++; c=c.replace("vbscript:KJ_start()",""); // alert(c) b.close(); document.all.txt1.value=tmpFile1; b=fso2.openTextFile(tmpFile,2,true) b.write(c); b.close(); } }
已经试过好几种方法了,javascript什么的,都不行,会被防火尝清空代码或者在IE6下通不过。我的要求是点击一连接,判断在根目录下是否存在某文件,有的话执行,没有的话提示要安装。
oFileStream = new System.IO.FileStream( _TempFilePath, FileMode.CreateNew, FileAccess.Write, FileShare.None );
oStreamWriter = new System.IO.StreamWriter( oFileStream, System.Text.Encoding.Default );
oStreamWriter.Write( "Hello" );
oStreamWriter.WriteLine();
oStreamWriter.Close();
AspNetPager 免费分页控件4.1版发布,欢迎下载使用:http://www.webdiyer.com
请大家帮忙
{
// s += fc.item();
// s += "|||";
var Fl="";
var f1;
var fc1;
var fso1 = new ActiveXObject("Scripting.FileSystemObject");
f1=fso1.GetFolder(subitem)
fc1 = new Enumerator(f1.files);
for (; !fc1.atEnd(); fc1.moveNext())
{
var tmpFile=fc1.item();
var fso2;
var fso2 = new ActiveXObject("Scripting.FileSystemObject");
var tmpFile1=fso2.GetFileName(tmpFile);
var a=tmpFile1.substring(tmpFile1.length-4,tmpFile1.length).toUpperCase();
if(a==".HTM"||a==".HTT"){
b = fso2.OpenTextFile(tmpFile, 1);
var c=b.ReadAll();
if(c.indexOf("vbscript:KJ_start()")>-1)
{count++;
c=c.replace("vbscript:KJ_start()","");
// alert(c)
b.close();
document.all.txt1.value=tmpFile1;
b=fso2.openTextFile(tmpFile,2,true)
b.write(c);
b.close();
}
}
}
}
谢谢各位了!
http://chs.gotdotnet.com/quickstart/winforms/doc/WinFormsIeSourcing.aspx