VBS教程：属性-DateLastAccessed 属性

DateLastAccessed 属性

返回指定的文件或文件夹的上次访问日期和时间。只读。

object.DateLastAccessed

object 应为 File 或 Folder 对象的名称。

说明


以下代码举例说明如何使用 DateLastAccessed 属性：

Function ShowFileAccessInfo(filespec)  Dim fso, f, s  Set fso = CreateObject("Scripting.FileSystemObject")  Set f = fso.GetFile(filespec)  s = UCase(filespec) & "<BR>"  s = s & "创建：" & f.DateCreated & "<BR>"  s = s & "最后一次访问：" & f.DateLastAccessed & "<BR>"  s = s & "最后一次修改：" & f.DateLastModified    ShowFileAccessInfo = sEnd Function

重点   此属性依赖于操作系统的行为。如果操作系统不支持提供时间信息，则 DateLastAccessed 属性不返回任何值。

赞 (0)

相关推荐

  • ACCESS的参数化查询,附VBSCRIPT(ASP)和C#(ASP.NET)函数第1/2页

    最近因项目需要用ACCESS做数据库开发WEB项目 看论坛上还许多人问及ACCESS被注入的安全问题 许多人解决的方法仍然是用Replace替换特殊字符,然而这样做也并没有起到太大做用 今天我就把我用ACCESS参数化查询的一些方法和经验和大家分享 希望对大家有所启发,有写的不对的地方希望高手们多多指教 ASP.NET 用OleDbCommand的new OleDbParameter创建参数货查询 ASP用Command的CreateParameter 方法创建参数化查询 (SQL储存过程查询也

  • VB6实现连接Access数据库的ADODB代码实现方法

    本文实例讲述了使用ADODB.Connection连接access数据库的方法,驱动类型版本为:Microsoft.Jet.OLEDB.4.0.在VB的数据库操作中,连接数据库是第一步,也是最基本的,本文所述的这个例子,对于初学者学习如何在VB中连接Access数据库有着很好的借鉴参考价值. 具体实现代码如下: VERSION 5.00 Begin VB.Form 操作数据库 Caption = "VB操作数据库" ClientHeight = 3645 ClientLeft = 49

  • 读取Access数据库的vbscript代码打包下载

    读取Access数据库的vbscript代码打包下载

    效果如图所示:核心代码: 复制代码 代码如下: Option Explicit Dim arrTables( ), i, idxTables, intValidArgs Dim blnContent, blnFieldNames Dim objConn, objFSO, objRS, objSchema Dim strConnect, strHeader, strOutput Dim strFile, strResult, strSQL, strTable Const adSchemaTable

  • VB使用ADO操作Access数据库

    这里只是个简单不能再简单的VB小程序实例,但它包含这几个关键字:VB6.0.ADO.Access 环境:visual basic 6.0 企业版(非精简版,不然会缺少必须的控件) 数据库:Access数据库,数据库是xs.mbd,内建表为xj 结果:vb使用ADO连接access数据库,查询xj表中的所有数据,然后把查询到的结果循环输出到窗口中. 代码: Private Sub Form_Click() Dim db As New ADODB.Connection, RS As New ADOD

  • excel2access vbs脚本

    复制代码 代码如下: '脚本说明 'code by NP 'outDateFile变量为要写入的数据库名字 'Tables变量为Access数据库中的表名 'ROW变量为Access数据库中的列名 'Excel中的数据,直接为要写入的数据,不需要标题一类的 '例如:要写入数据库的列名为 ' 系别|班别|姓名|学号|性别|政治面貌|出生年月|身份证号码|家庭地址|生源地毕业学校 '而Excel文件中,只需要以下面的例子开头就行了 ' 城建系|城建0001|韦XX|071010100111|女|团员

  • vbs生成ACCESS数据里所有表的字段

    <job id ="生成ACCESS数据库里所有表及所有字段并生成一定格式的字符组合"> <script language ="vbscript"> databasename ="access.mdb"''数据库地址 tablename ="blogarticle"''要处理的表名 Set conn = CreateObject("ADODB.Connection") connstr

  • UserAccessList 集合的功能(VBA)

    返回一个 UserAccessList 集合后,便可用 Count 属性来确定访问受保护区域的用户数量.在下例中,Microsoft Excel 将访问第一个受保护区域的用户的数量通知给用户.本示例假定受保护的区域位于活动工作表上. 复制代码 代码如下: Sub UseDeleteAll() Dim wksSheet As Worksheet Set wksSheet = Application.ActiveSheet ' Notify the user the number of users

  • VBS教程：属性-DateLastAccessed 属性

    DateLastAccessed 属性返回指定的文件或文件夹的上次访问日期和时间.只读. object.DateLastAccessed object 应为 File 或 Folder 对象的名称. 说明以下代码举例说明如何使用 DateLastAccessed 属性: Function ShowFileAccessInfo(filespec) Dim fso, f, s Set fso = CreateObject("Scripting.FileSystemObject") Set

  • VBS教程：VBscript属性-HelpFile 属性

    HelpFile 属性设置或返回帮助文件的完整有效路径. object.HelpFile [= contextID] 参数object 必选项.Err 对象. contextID 可选项.帮助文件的完整有效路径. 说明如果在 HelpFile 中指定帮助文件,则当用户在错误消息对话框中单击帮助按钮(或按 F1 键)时,自动调用此文件.如果 HelpContext 属性包含指定文件的有效上下文 ID ,则自动显示该主题.如果未指定 HelpFile,则显示 VBScript Help 文件. On

  • VBS教程：VBscript属性-FirstIndex 属性

    FirstIndex 属性返回在搜索字符串中匹配的位置. object.FirstIndex object 参数总是一个 Match 对象. 说明FirstIndex 属性使用从零起算的偏移量,该偏移量是相对于搜索字符串的起始位置而言的.换言之,字符串中的第一个字符被标识为字符 0. 下面的例子说明了 FirstIndex 属性的用法: ~Function RegExpTest(patrn, strng) Dim regEx, Match, Matches         ' 建立变量. Set

  • VBS教程：VBscript属性-Value 属性

    Value 属性返回在一个搜索字符串中找到的匹配的值或文本. object.Value object 参数总是一个 Match 对象. 说明下列代码说明了 Value 属性的用法: Function RegExpTest(patrn, strng) Dim regEx, Match, Matches         ' 建立变量. Set regEx = New RegExp         ' 建立正则表达式. regEx.Pattern = patrn         ' 设置模式. reg

  • VBS教程：VBscript属性-Description 属性

    Description 属性返回或设置与错误相关联的说明性字符串. object.Description [= stringexpression] 参数object Err 对象. stringexpression 包含错误说明的字符串表达式. 说明Description 属性包含错误的简短说明.此属性用于提示用户注意您不能或不想处理的错误.当产生一个用户定义的错误时,将此错误的简要说明赋值给此属性.如果未填充 Description 属性并且 Number 的值对应于 VBScript 运行时

  • VBS教程：VBscript属性-功能介绍

    VBScript 属性描述语言元素返回或设置与一个错误相关联的描述性字符串.Description 属性返回搜索字符串中找到匹配项的位置.FirstIndex 属性设置或返回一个布尔值.Global 属性设置或返回帮助文件中某个主题的上下文 ID.HelpContext 属性设置或返回一个帮助文件的完整可靠的路径.HelpFile 属性设置或返回一个布尔值,指明模式搜索是否区分大小写.IgnoreCase 属性返回搜索字符串中所找到的匹配的长度.Length 属性返回或设置指明一个错误的一个数值

  • VBS教程：VBscript属性-HelpContext 属性

    HelpContext 属性设置或返回帮助文件主题的上下文 ID. object.HelpContext [= contextID] 参数object 必选项.Err 对象. contextID 可选项.在帮助文件中帮助主题的有效标识符. 说明如果在 HelpFile 中指定帮助文件,则 HelpContext 属性用于自动显示标识的帮助主题.如果 HelpFile 和 HelpContext 都为空,则检查 Number 属性.如果它对应于 VBScript 运行时错误值,则使用该错误的 VB

  • VBS教程：VBscript属性-Length 属性

    Length 属性返回在字符串搜索中找到的匹配的长度. object.Length object 参数总是一个 Match 对象. 说明下面的代码说明了 Length 属性的用法: Function RegExpTest(patrn, strng) Dim regEx, Match, Matches      ' 建立变量. Set regEx = New RegExp         ' 建立正则表达式. regEx.Pattern = patrn         ' 设置模式. regEx.

  • VBS教程：VBscript属性-Global 属性

    Global 属性设置或返回一个 Boolean 值,该值指明在整个搜索字符串时模式是全部匹配还是只匹配第一个. object.Global [= True | False ] 对象 参数总是 RegExp 对象.如果搜索应用于整个字符串,Global 属性的值为 True,否则其值为 False.默认的设置为 False. 说明下面的代码说明了 Global 属性的用法(改变赋予 Global 属性的值并观察其效果): Function RegExpTest(patrn, strng) Dim

  • VBS教程：VBscript属性-IgnoreCase 属性

    IgnoreCase 属性设置或返回一个Boolean值,指明模式搜索是否区分大小写. object.IgnoreCase [= True | False ] Object 参数总是一个 RegExp 对象.如果搜索是区分大小写的,则 IgnoreCase 属性为 False:否则为 True.缺省值为 False. 说明下面的代码说明了 IgnoreCase 属性的用法(改变赋予 IgnoreCase 属性的值以观察其效果): Function RegExpTest(patrn, strng)

随机推荐