和平精英脚本定制175cs微自瞄

发布时间:2019-11-05 来源:脚本之家 点击:

  然后技能就用初始给的碎冰冰和落雷

实战篇

  进行“实战”前我们先来理解什么是Shell对象和WSH

linux shell脚本实例
数据结构知识:

二叉树中序便历可以用来做排序

而VBS里面恰恰就没有现成的排序方法,因此我写了一个用VBS的二叉树,来解决排序问题,中序便历就是排序


<%
' 定义变量
Dim objXmlHttp
Dim strHTML

'这是Msxml3.0中的一个稳定版本.
'使用Msxml2.ServerXMLHTTP,不使用Msxml2.XMLHTTP
Set objXmlHttp=Server.CreateObject("Msxml2.ServerXMLHTTP")

' 如果你发现以下错误
' msxml3.dll error '80070005'
' 存取被拒绝.
' 可能是上网时使用了代理产生了错误
' 使用 proxycfg.exe 工具. :
'
' proxycfg -d
' 检查是否采用了代理上网
' 同时可以参看这个帖子:
'

' 这个版本太旧且不稳定
'Set objXmlHttp=Server.CreateObject("Msxml2.XMLHTTP")

' 现在我们开始发送请求.
' 套用微软的话来讲: 初始化一个请求,并且指定该请求的方法(get,post等等),
' URL, 和权限验证信息(用户名,密码,等等)

蓝魔魂石碎片#15:

今天写了一个类似于下面的程序:

但是却发现返回的中文都是乱码,看了一下发现新浪的编码竟然是gb2312的,汗,现在都是utf-8编码的时代了真爱

源址:


'FSO文件操作相关
'FSO参数详解:
'Fso.IsRootFolder=True|False'是否为根目录
'Fso.GetFolder'读取文件夹用法:Setfldr=fso.GetFolder("C:\\目录2")
'Fso.FolderExists=True|False'查找此文件夹是否存在
'Fso.CreateFolder'创建文件夹用法:fso.CreateFolder("C:\\目录1")
'Fso.GetBaseName'返回文件夹的名字用法:fso.GetBaseName("C:\\目录1")
'Fso.DeleteFolder'删除指定的文件夹用法:fso.DeleteFolder("C:\\目录1")
'Fso.MoveFolder'移动指定的文件夹用法:fso.MoveFolder("C:\\目录1","C:\\目录2")将C:\\目录1移动到C:\\目录2下
'Fso.CopyFolder'复制指定的文件夹用法:fso.CopyFolder("C:\\目录2\\cnbruce","c:\")将C:\\目录2\\cnbruce复制到C:\\下
'
'Fso.Drive'返回驱动器的名字返回“D:”
'Fso.GetDriveName'提取驱动器名返回“d:”
'Fso.GetDrive'提取驱动器名返回“D:”常用写法:fso.GetDrive(fso.GetDriveName(drvPath))
'磁盘驱动器信息
'Drv.DriveLetter'返回盘符
'Drv.VolumeName'取得驱动器的卷标
'Drv.TotalSize'取得空间总大小返回字节数,用FormatNumber(Drive.TotalSize/1024,0)格式化,返回多少G
'Drv.FreeSpace'剩余空间大小返回同上
'Drv.DriveType'文件类型0“设备无法识别”1“软盘驱动器”2“硬盘驱动器”3“网络硬盘驱动器”4“光盘驱动器”5“RAM虚拟磁盘”
'Drv.FileSystem'磁盘格式
'Drv.SerialNumber'磁盘系列号
'Drv.IsReady'是否可用
'Drv.Path'磁盘路径
'
'FSO文件操作
'Txt.OpenTextFile'打开指定的文件用法:fso.OpenTextFile(whichfile,1)参数1:表示“ForReading:只读,禁写端录制


foreachobjinstanceincolinstances

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