vbScript中如何取得本机名？

zhangying7725 2005-09-22 01:36:32

vbScript中如何取得本机名？

...全文

113 4 打赏收藏转发到动态举报

写回复

4 条回复

切换为时间正序

请发表友善的回复…

发表回复

zhangying7725 2005-09-22

打赏
举报

回复

不好意思问错了，是第二种方式
我已经知道了解决方法，用strResult = objExec.StdOut.ReadLine
马上给分

zhangying7725 2005-09-22

打赏
举报

回复

方法一中取得的名字怎么还带一个回车？要如何去掉？

conrad_wan 2005-09-22

打赏
举报

回复

淆习～～～

道素 2005-09-22

打赏
举报

回复

1.用本地环境变量
set shell = WScript.CreateObject( "WScript.Shell" )
computername = shell.ExpandEnvironmentStrings("%COMPUTERNAME%")
wscript.echo computername

2。用Hostname
SET objShell=CreateObject("Wscript.Shell")
DIM objExec, strResult
SET objExec = objShell.Exec("hostname")
strResult = objExec.StdOut.ReadAll
WScript.Echo strResult

3.用WMI
Set wmiColl = GetObject("WinMgmts:root/cimv2")_
.ExecQuery("Select * FROM Win32_ComputerSystem")
For Each wmiObj in wmiColl
WScript.Echo wmiObj.Name
Next

VB6编写,Win10,Win7,Server2003运行通过。最新版本1.0.54 ============================================================== 1、编写目的是巨大大文件上传，适合编写网盘等asp程序。asp支持VBScript和JScript两种脚本语言。 2、本软件对上传文件个数、单个文件大小都没限制，理论上只取决于服务器和客户端的限制。 3、本软件解压到任何目录都可运行，首先编辑配置文件config.ini以适应本机，配置文件里面的注释有详细说明。 4、不足之处：（1）不能运行很大的asp网站程序，耗时太长。（2）还没实现以指定用户运行本软件，所以asp脚本权限很大。不过个人使用没问题。 5、即将实现WebSocket功能。特别之处: 1、Http请求头包含“ZdcFile: file”即意味着开启不限量大文件上传模式，否则即为普通上传模式。 2、普通上传模式下，用response.binaryRead读取二进制数据，response.getFile不起作用；反之，response.binaryRead 不起作用，只能用response.getFile读取文件。 3、不限量大文件上传模式下，主程序目录最好和上传保存文件的目录在一个硬盘分区，这样能提高速度。 4、如果只需要上传小文件，请使用普通模式，这样速度会更快。附：配置文件config.ini '所有路径最后必须为斜杠\，请特别注意 '所有字符串不区分大小写 '连续5个'后的内容被当作注释,直到再次遇到5个'. [Base] '基本设置 Port = 80 '默认80 Path = D:\xxx\ '如果为空，那么每个域名就作为一个虚拟目录存在 FileMaxSize = 200000000 '下载文件的最大字节 IPMaxLink = 20 '每个IP允许的并发连接数 PostCache = 820000 '上传缓存字节,请调教该数值,以取得最大速度 '每个域名的根目录即为Path下的一个名子为域名的目录 '该目录一定要存在，否则报错该主机不存在 '如果以IP地址为主机名（域名），根目录对应Path下的"LocalIP"目录 [Allow ASP] '运行运行ASP的域名列表，0(或列表无)不允许,1允许安全模式,2允许全权模式 localhost = 2 LocalIP = 2 '当不允许运行asp时，asp文件就和普通htm文件一样了，当然VBScripe代码被去掉,#include file还起作用。 [Default Document] '如果某域名不指定默认文档，默认为index.asp LocalIP = index.asp localhost = index.asp [Virtual Directory] '虚拟目录,必须是绝对路径。虚拟目录的父目录可以不存在 localhost\zdc\ = E:\yyy\zzz\ '为一个目录指定帐号密码。访问该目录及其子目录时，必须输入帐号密码 [Safe Directory] LocalIP\xxx\ = xxx:123456 '帐号:密码 'URL转向。当访问指定域名下的该目录时，跳转到指定url [URL Forwarding] localhost\Article\ = http://www.sina.com/ '为某个域名指定禁止访问的IP。 '通配符规则：? 任何单一字符；* 零个或多个字符；# 任何一个数字；[charlist] 某单一字符；[!charlist] 不存在某单一字符。 [Forbidden IP] xxx.xxx.xxx.xxx = www.xxx.cn yyy.yyy.yyy.yyy = *.yyy.com zzz.zzz.zzz.zzz = * [Error page]'暂时不起作用 400 = /info/404.htm 404 = /info/404.htm 403 = /info/404.htm 500 = /info/404.htm

VBScript脚本语言基础 2.1 vbs脚本语言简介 2.2 第一个vbs脚本语言–hello world 打开记事本程序，在编辑窗口填写，保存文件的扩展名为：.vbs 对话框：输入框 inputbox(“请输入第一条边的边长”,“第一条边”) 2. 输出框 msgbox("输入错误! ") 可能遇到错误： 1：解决方法：把vbs另存为ANSI编码 2：调用过程函数时不能使用括号，即：inputbox “请输入第一条边的边长”,“第一条边”（因为此时没有赋值，直接使

1、课程概要本课程主要分享VBScript脚本语言编程与自动化运维操作学习教程！2、课程目标本课程致力于帮助学员学习并掌握VBScript脚本语言编程及自动化运维技巧！3、适合人员本课程适合兴趣VBS编程或从事运维自动化的学员观看学习！4、特别说明本课程支持一次购买，永久观看，请大家放心选购！

VBScript QTP使用Microsoft的VBScript 作为脚本语言，关于此语言的详细描述不在此书的范围内，这一章节提供一个关于VBScript一些功能的简短的概述，这些功能都是开发QTP脚本的时经常使用的，关于完整的功能说明，请参考QTP的Online help Sting 这一节讨论字符串处理函数 Lcase an UCase 这两个函数把一个字符串从小写转换成大写，反之亦

1. VBS介绍VBS是一种Windows脚本，全称是 : Microsoft Visual Basic ScriptEdition. VBS是VisualBasic的的一个抽象子集，是系统内置的，用它编写的脚本代码不能编译成二进制文件，直接由Windows系统执行（实际是一个叫做宿主host的解释源代码并执行），高效、易学，但是大部分高级语言能干的事情，它基本上都具备，它可以使各种各...

1,486

社区成员

23,280

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章