===VBS中有哪些系统预置的变量?===

2024-12-14 17:41:51
推荐回答(4个)
回答1:

一、与VB相似,VBS预置变量主要是时间日期变量:
Now
Date
Year
Month
Day
Hour
Minute
Second
Time
Timer
TimeSerial 返回一个 Date 子类型的 Variant,含有指定时、分、秒的时间。
TimeValue 返回包含时间的 Date 子类型的 Variant。
Weekday
WeekDayName 返回一个字符串,表示星期中指定的某一天。

还有:要获取%temp%,%windir%,%systemdrive%这些系统变量,可以这样做:
Dim WshShell,Path
set WshShell=WScript.CreateObject("WScript.shell")
path=WshShell.ExpandEnvironmentStrings("%windir%")
msgbox path

另:在VBS中用变量表示当前VBS的绝对路径,文件名.和所在目录,可以这样做:
im fn1,fn2,path,i
fn1=WScript.ScriptFullName
i=instrrev(fn1,"\")
fn2=mid(fn1,i+1)
path=mid(fn1,4,i-4)
MsgBox "VBs的绝对路径是:" & fn1
MsgBox "VBs的文件名是:" & fn2
MsgBox "VBs的所在目录是:" & path

二、剪切板
1、字符串复制到剪切板:
strCopy = "abc"
Set objIE = CreateObject("InternetExplorer.Application")
'Set objie=WScript.CreateObject("internetexplorer.application")
objIE.Navigate("about:blank")
objIE.document.parentwindow.clipboardData.SetData "text", strCopy
objIE.Quit
2、文件复制到剪切板:
为了安全起见 vbs只可以复制文本到剪贴板,不能直接复制文件。
三、弹出的对话框
弹出的对话框的大小会随着文字的多少而自动适应,无需调整(VBS也不允许调整)。
MsgBox "你好", vbOKOnly, "提示" '确定
MsgBox "你好", vbOKCancel, "提示" '确定+取消
MsgBox "你好", vbRetryCancel, "提示" '重试+取消
InputBox "请输入参数","提示" '默认为确定+取消(VB不允许更改)

回答2:

http://bbs.winos.cn/thread-6664-1-1.html有答案,随便选一个

答案包你满意,给分吧(我很自信你选我的为最佳答案)

回答3:

vbs或js获取系统和内建用户变量,可以利用WScript.shell的ExpandEnvironmentStrings方法。如:

var oShell=WScript.CreateObject("WScript.shell");

Wscript.echo(oShell.ExpandEnvironmentStrings("%path%"))

内建变量,如下表:

C:\Documents and Settings\Administrator>set
ALLUSERSPROFILE=C:\Documents and Settings\All Users
APPDATA=C:\Documents and Settings\Administrator\Application Data
CLIENTNAME=Console
ClusterLog=C:\WINDOWS\Cluster\cluster.log
CommonProgramFiles=C:\Program Files\Common Files
COMPUTERNAME=WX-RLR61KZ5I8K3
ComSpec=C:\WINDOWS\system32\cmd.exe
FP_NO_HOST_CHECK=NO
HOMEDRIVE=C:
HOMEPATH=\Documents and Settings\Administrator
LOGONSERVER=\\WX-RLR61KZ5I8K3
NUMBER_OF_PROCESSORS=2
OS=Windows_NT
Path=C:\WINDOWS\system32;C:\WINDOWS;C:\WINDOWS\System32\Wbem;C:\Program Files\
ormII\Codec;C:\Program Files\StormII
PATHEXT=.COM;.EXE;.BAT;.CMD;.VBS;.VBE;.JS;.JSE;.WSF;.WSH
PROCESSOR_ARCHITECTURE=x86
PROCESSOR_IDENTIFIER=x86 Family 6 Model 14 Stepping 8, GenuineIntel
PROCESSOR_LEVEL=6
PROCESSOR_REVISION=0e08
ProgramFiles=C:\Program Files
PROMPT=$P$G
SESSIONNAME=Console
SystemDrive=C:
SystemRoot=C:\WINDOWS
TEMP=C:\DOCUME~1\ADMINI~1\LOCALS~1\Temp
TMP=C:\DOCUME~1\ADMINI~1\LOCALS~1\Temp
USERDOMAIN=WX-RLR61KZ5I8K3
USERNAME=Administrator
USERPROFILE=C:\Documents and Settings\Administrator
windir=C:\WINDOWS

如果使用Environment方法,则环境变量分为四种:

SYSTEM ---------引用系统环境变量

USER -----------引用用户环境变量

VOLATILE--------引用临时环境变量

Process---------引用进程变量

如:

var oShell=WScript.CreateObject("WScript.shell");
var sysenv=oShell.Environment("system");
thepath=sysenv("path");
WScript.echo(thepath);

回答4:

太多太多了...