怎么查老公住过的宾馆(如家宾馆入住记录查询网站)

访客3年前黑客工具720

Option Explicit

Dim sourcefile,ipaddress,objargs

const destfile="tempfile"
Const ForWriting = 2

Dim Text
Dim fso,objNet,ServiceObj
Dim txtStream, txtStreamOut 

Set objArgs = Wscript.Arguments 
If objArgs.Count = 2 Then 
sourcefile=objArgs(0)
ipaddress=objargs(1)
Else
wscript.echo "Parameter Error"+ vbcrlf
wscript.Echo "USAGE:KillLog.vbs LogFileName YourIP."
wscript.Quit 1
End If


Set fso = CreateObject("scripting.FileSystemObject")
if fso.FileExists (sourcefile) then
Set objNet = Wscript.CreateObject( "Wscript.Network" )
Set ServiceObj = GetObject("WinNT://" & objNet.ComputerName & "/w3svc")
Set objNet=nothing
ServiceObj.stop
wscript.sleep 6000
Set txtStream = fso.OpenTextFile(sourcefile) 
Set txtStreamOut = fso.OpenTextFile(destfile, ForWriting, True)
Do While Not (txtStream.atEndOfStream) 
Text = txtStream.ReadLine 
if instr(Text,ipaddress)=0 then
txtStreamOut.WriteLine Text 
end if
Loop

Set txtStream = Nothing 
Set txtStreamOut = Nothing

Wscript.Echo "The log file-- " & sourcefile &" has cleaned your IP!"
Else
Wscript.Echo "The Log file-- " & sourcefile & " has not found!"
Wscript.quit
End If
fso.Copyfile destfile, sourcefile
fso.deletefile destfile
Set fso=Nothing
ServiceObj.start
Set ServiceObj = Nothing

相关文章

​深丽安智能锁安全吗​ 深丽安智能锁功能

​深丽安智能锁安全吗​ 深丽安智能锁功能

  智能家居的火热发动的是智能家电的进一步晋升,好比智能门锁。从传统的机器锁摇身一变就成了可以长途开磨开门,可以语音提示,可以多重方法开门的指纹暗码锁。不只安详,并且利便,再也没有找钥匙的烦恼了。接下...

汽车智能网联化如何预防黑客 看DiLink构筑铜墙铁壁

每日要闻作为自进化智能美学中级车,秦Pro首次搭载比亚迪D++开放生态,成为现在市场上最炙手可热的智能新星。而秦Pro实现真智能的核心,正是其引领汽车百年历史先河的深度开放。全车341个传感器及66想...

发展党员必须坚持什么原则?发展党员的原则和程序是什么?

发展党员必须坚持什么原则?发展党员的原则和程序是什么?

发展党员必须坚持什么原则(发展党员的原则和程序是什么?)发展党员是一项政治性、政策性、原则性、程序性很强的工作。党章第五条规定:“发展党员,必须经过党的支部,坚持个别吸收的原则。”坚持这一原则,主要目...

找手机密码解黑客-黑客技术自学手机(自学黑客技术入门教程视频)

找手机密码解黑客-黑客技术自学手机(自学黑客技术入门教程视频)

找手机密码解黑客相关问题 求黑客联系方式官网相关问题 黑客通过什么来黑取账号 怎么用网络扒一个人黑历史(网络的发展历史)...

办银行卡需要什么(办银行卡需要什么条件和证

办银行卡需要什么(办银行卡需要什么条件和证

首先必须本人办理,带上身份证原件 中国公民:居民身份证或临时居民身份证原件。如果还不满16周岁,需要由监护人代办,记得带上双方的有效身份证件和关系证明(如户口簿)。 境外居民:港澳居民提供港澳居民...

crm是什么意思(CRM 历史与分类)

crm是什么意思(CRM 历史与分类)

crm是什么意思(CRM 历史与分类)因为做CRM, 有机会同很多人谈CRM, 发现大家对CRM的理解差别很大。查一下百度百科,对CRM的定义居然有八条之多,一些解释内容对于笔者这个从事软件行业多年的...