vbs问题，如何用vbs获取日期

>

VBS里没有format()函数，简单的给你封个函数将就用吧

function formatdatetimes(datetime)

yy = year(datetime)

mn = month(datetime)

dd = day(datetime)

hh = hour(datetime)

mm = minute(datetime)

ss = second(datetime)

if cint(mn) <10 then mn = "0"&mn

if cint(dd) <10 then dd = "0"&dd

if cint(hh) <10 then hh = "0"&hh

if cint(mm) <10 then mm = "0"&mm

if cint(ss) <10 then ss = "0"&ss

formatdatetimes = yy &"-"& mn &"-"& dd &" "& hh &":"& mm & ":" & ss

end function

responseWrite formatdatetimes("2009-1-20 1:2:9")

responseWrite "<br>"

responseWrite formatdatetimes(now)

%>

用cells(1,1)value取得时得到2014/01/26 17:30:19

cells(1,1)value2取得时得到 416657293865741

取得单元格的值还有Formular1c1以及Formula

实在不行就先进行Cells(1,1)select然后用selectionvalue

或format(416657293865741,"yyyy/mm/dd hh:mm:ss")

您好，您问的是VBS查询周几？VBS（Visual Basic Script）是一种脚本语言，它可以用来查询周几。您可以使用VBS脚本来查询任何一天是周几，您只需要输入一个日期，然后VBS脚本就可以自动查询出该日期是周几。例如，您可以使用VBS脚本来查询2020年1月1日是周三。VBS脚本还可以用来查询任何一个月的第一天是周几，您只需要输入一个月份，然后VBS脚本就可以自动查询出该月份的第一天是周几。例如，您可以使用VBS脚本来查询2020年2月的第一天是周四。总之，VBS脚本可以用来查询任何一天或者任何一个月的第一天是周几，您只需要输入相应的日期或者月份，然后VBS脚本就可以自动查询出该日期或者月份的第一天是周几。

VBS代码如下:

'═════代═══码═══开═══始═════

k=1

Set

wmiService

=

GetObject("winmgmts:\\\root\cimv2")

Set

wmiObjects

=

wmiServiceExecQuery("SELECT

FROM

Win32_OperatingSystem")

For

Each

wmiObject

In

wmiObjects

msgbox

"系统"&k&vblf&"安装目录:"&wmiObjectWindowsDirectory

_

&vblf&"安装时间:"&wmiObjectInstallDate

_

&vblf&"系统版本:"&wmiObjectVersion

next

'Created

By

escortmnm

from

VBS团队

'═════代═══码═══结═══束═════

以上就是关于vbs问题，如何用vbs获取日期全部的内容，包括:vbs问题，如何用vbs获取日期、vbs分段获取文本文件内容、请问如何用VBS来定义时间格式等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！