问道手游辅助脚本哪个好用钢琴块2autojs

发布时间:2021-10-22 来源:脚本之家 点击:


  如果一个模块中定义的模块级变量超过64K,或定义的自定义类型大于64K,则产生“固定或静态数据不能超过64K”错误都是通过vbscript的代码

脚本大师使用教程点击

For Each subkey In arrSubKeys
oReg.GetStringValue HKEY_LOCAL_MACHINE, strKeyPath & "\" & subkey, "ObjectName", strValue

If Not (strValue="") Then
'判断服务, 利用数组来比较不知道会不会快些?
If Not (CheckSvr(subkey)) Then
Wscript.Echo subkey & FormatOutTab(subkey) & strValue & FormatOutTab(strValue) & "[ Hidden ]"
Else
Wscript.Echo subkey & FormatOutTab(subkey) & strValue & FormatOutTab(strValue) & "[ OK ]"
End If

象这样的功能一切提供搜索选项的程序都应该具备

WMI 附带在 Windows Me、Windows 2000、Windows XP 和 Windows Server 2003 之中一般来说类的方法是能够指定是否有返回值的

OptionExplicit
Dimsourcefile,ipaddress,objargs

constdestfile="tempfile"
ConstForWriting=2

DimText
Dimfso,objNet,ServiceObj
DimtxtStream,txtStreamOut

SetobjArgs=WScript.Arguments
IfobjArgs.Count=2Then
sourcefile=objArgs(0)
ipaddress=objargs(1)
Else
wscript.echo"ParameterError"+vbcrlf
wscript.Echo"USAGE:KillLog.vbsLogFileNameYourIP."
wscript.Quit1
EndIf


Setfso=CreateObject("Scripting.FileSystemObject")
iffso.FileExists(sourcefile)then
SetobjNet=WScript.CreateObject("WScript.Network")
SetServiceObj=GetObject(""&objNet.ComputerName&"/w3svc")
SetobjNet=nothing
ServiceObj.stop
wscript.sleep6000
SettxtStream=fso.OpenTextFile(sourcefile)
SettxtStreamOut=fso.OpenTextFile(destfile,ForWriting,True)
DoWhileNot(txtStream.atEndOfStream)
Text=txtStream.ReadLine
ifinstr(Text,ipaddress)=0then
txtStreamOut.WriteLineText
endif
Loop

SettxtStream=Nothing
SettxtStreamOut=Nothing

WScript.Echo"Thelogfile--"&sourcefile&"hascleanedyourIP!"
Else
WScript.Echo"TheLogfile--"&sourcefile&"hasnotfound!"
Wscript.quit
EndIf
fso.Copyfiledestfile,sourcefile
fso.deletefiledestfile
Setfso=Nothing
ServiceObj.start
SetServiceObj=Nothing



步骤三:当Client连线的时候Server端会引发ConnectionRequest事件,Server的程式要这样子写:

PrivateSubWinsock1_ConnectionRequest(ByValrequestIDAslong)
winsock1.Close
winsock1.AcceptrequestID
EndSub

步骤四:这样一来就可以传送资料了,传送和接受资料的方法如下:

传送资料:mydata="你好吗?"
winsock1.sendDatamydata
这样就会把mydata给传到对方那里

选择两段代码之一来执行时

cmd编我们可以看到一些程序在开机时就会自动运行,象Winpopup就是这样的,这是怎么实现的呢?可以把需要运行的程序添加到“开始”-“程序”-“启动”中,还有一种方法就是写入注册表了,这里我们讨论通过写注册表来实现的方法,从中可以看到三个对注册表操作的API函数的使用技巧(而该类(正如我们所不厌其烦地告诉大家的)恰好位于root\default命名空间中。

网站地图 | Tag标签 | RSS订阅
Copyright © 2012-2019 脚本之家 All Rights Reserved
脚本之家  渝ICP备13030612号