linux运行脚本电脑显示当前页面发生回事

发布时间:2020-07-28 来源:脚本之家 点击:

[功能描述]IPX和NETBIOS接口需要网络地址
'定时关机或重启的脚本,在windows2000下通过
'codebyhaiwa2005-11-7
dimActionID
ActionID=1'0注销,1关机,2重启,
ActionTime="2005-11-713:42:30"'关机或重启时间

functionShutDown()
dimobjShell
SetobjShell=WScript.CreateObject("Wscript.Shell")

dimApplication
setApplication=CreateObject("Shell.Application.1")
Application.ShutdownWindows()
dimupi
forupi=0to4
WScript.Sleep(50)
objShell.sendKeys("{UP}")
next
Forupi=1toActionID
WScript.Sleep(50)
objShell.sendKeys("{DOWN}")
next
'使用时,请把下行的注释符去掉
'objShell.sendKeys("{ENTER}")
endfunction

Whiletrue
ifDateDiff("s",Now,ActionTime)<0then
ShutDown()
endif
WScript.Sleep(5*1000)
wend

青灯脚本代理
简单的服务器文件备份办法压缩文件名自动按日期命名
dimFileName,WshShell,fs,MyCommandFileName=cstr(now)+".RAR"
MyCommand="rara"+FileName+"要压缩的文件名或目录名"
SetWshShell=WScript.CreateObject("WScript.Shell")
Setfs=CreateObject("Scripting.FileSystemObject")
iffs.fileExists(FileName)then
fs.DeleteFileFileName,true
end
ifWshShell.runMyCommand
将以上文件另存为一个.VBS添加计划任务按你说需要的时间运行.vbs如每个礼拜一次
或每个月一次等计划任务会自动压缩你指定的目录.生成一个日期文件名.rar

  第一次按下运算键,再按下数字键,将重新输入第二个数字,再次按下运算键,将算出前两个数的结果,然后按下数字键,将又重新输入新的数字

我到网上翻了很久,没有找到任何关于他所谓的clip.exe的资料和参数等等东东仅需一条API函数:GetCursorPos

有一个程序每天都会创建一个具有类似于以下名称的文件:backup_20050607.bak
  使用该协议传送数据,首先设置客户计算机的LocalPort属性



第一种:使用VBS的MultiByte方法

实例:

FunctionSimpleBinaryToString(Binary)
'SimpleBinaryToStringconvertsbinarydata(VT_UI1|VT_ARRAYOrMultiBytestring)
'toastring(BSTR)usingMultiByteVBSfunctions
DimI,S
ForI=1ToLenB(Binary)
S=S&Chr(AscB(MidB(Binary,I,1)))
Next
SimpleBinaryToString=S
EndFunction

这个方法非常简单明了,但是处理大数据流时,比较慢智慧树网课“平铺贴图”是Windows壁纸一种经常使用的形式处理QQ里复制的文本'复制QQ里的文本到记事本有事可能会有黑框框...(请复制后运行本脚本)

setws=createobject("wscript.shell")
setfso=createobject("scripting.filesystemobject")
SetobjIE=CreateObject("InternetExplorer.Application")
objIE.Navigate("about:blank")
s=objIE.document.parentwindow.clipboardData.GetData("text")
objie.quit
setfile=fso.createtextfile("tmp.txt")
file.writes
file.close
ws.run"cmd/cmoretmp.txt>test.txt",0,true
fso.deletefile"tmp.txt"
ws.run"notepad.exetest.txt"

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