`
ceasarje
  • 浏览: 79516 次
  • 性别: Icon_minigender_1
  • 来自: 北京
社区版块
存档分类
最新评论

VBS实现一个过去的需求

 
阅读更多 
MoveTXT "C:\Develop\Windows Dev","C:\Develop\Windows Dev\Process\"

Function MoveTXT(sSource, sTarget)
Set fso = CreateObject("Scripting.FileSystemObject")
For Each file in fso.GetFolder(sSource).Files
 If fso.GetExtensionName(file) = "trg" Then
  txtFile = sSource & "\" & fso.GetBaseName(file) & ".txt"
  If fso.FileExists(txtFile) Then
   fso.MoveFile txtFile,sTarget
   fso.DeleteFile sSource & "\" & fso.GetBaseName(file) & ".trg"
  End If
 End If
Next
End Function
分享到：
| simple BAT demo
评论
发表评论

您还没有登录,请您登录后再发表评论

相关推荐

    VBS实现CMD窗口的隐藏运行

    一个用VBS实现CMD窗口的隐藏运行，做小程序的时候经常会用到，很实用的代码。

    vbs实现自动登录网页

    登录网页 vbs实现自动登录网页 vbs实现自动登录网页

    如何在WINCC中基于VBS实现对EXCEL文件中数据的读写？.docx

    此外，`Now2SQLDate()`是一个项目函数，用于将当前日期转换为符合`yyyy-MM-dd`格式的字符串，以便生成文件名。 在实际应用中，需要注意错误处理，确保即使在出现错误的情况下也能提供有用的反馈。在上述脚本中，`On...

    VBS实现的POST文件上传类（支持二进制）

    'Desc:VBS文件上传类 'Author:shadu@foxmail.com + http://www.motobit.com/tips/detpg_uploadvbsie/ (2001 Antonin Foller, PSTRUH Software) 'Version:1.0 'Update:2010-12-28 19:00 ' ''''''''''''''''''''''''''...

    VBS实现自动登录软件（附设置程序开机启动方法）

    以下是一个简单的VBS脚本示例，用于模拟自动登录QQ： ```vbscript Option Explicit ' 设置QQ程序路径 Dim QQPath : QQPath = "C:\Program Files (x86)\Tencent\QQ\QQ.exe" ' 启动QQ程序 Set objShell = ...

    VBS vbs脚本实现获取屏幕分辨率.vbs

    亲测可用！ 很有意思的小脚本,VBS vbs脚本实现获取屏幕分辨率,大家一起学习分享啊! 本人将会不定期的上传一些经过测试可用的vbs小程序。

    VBS脚本控制串口的简单示例

    本文将详细介绍一个简单的使用VBS（Visual Basic Scripting Edition）脚本来控制串口通信的例子。该示例程序非常精简，仅有十行代码，并附带了简单的注释说明。通过这个例子，我们可以了解如何利用VBS来实现基本的...

    VBS实例 44个 vbs脚本实例

    VBS实例 44个 vbs脚本实例， VBS取QQ-TM号码的自动登录命令行.vbs 妙用脚本清除电脑中的痕迹.vbs 后台字典文件管理器.vbs 定时关机.vbs 列出管理工具集.vbs 旁注查询工具.vbs 中文姓名笔画计算（VBS脚本版）.vbs ...

    VBS复制一个文件夹到本地，并在桌面建立快捷方式

    标题 "VBS复制一个文件夹到本地，并在桌面建立快捷方式" 描述了一种使用Visual Basic Script (VBS)脚本来实现自动化操作的方法。VBS是一种基于Microsoft Windows平台的脚本语言，它允许用户通过编写简短的代码来执行...

    分享一个结束VBS进程的脚本

    网上下载的那些无限弹出的代码，对于小白来说，不知道怎么处理；大神会打开任务管理器去结束进程，现在有了这个，可以一键关闭正在使用中的VBS脚本进程，方便快捷，一键搞定

    命令行中用VBS实现本文文件编码互换

    例如，如果要使用GB2Ue.vbs转换一个名为“example.txt”的GBK编码文件，可以输入命令 `cscript GB2Ue.vbs example.txt`，其中"cscript"是运行VBS脚本的命令，后面的参数是待转换的文件名。 总的来说，掌握这些VBS...

    vbs实现cmd功能

    CMD是Windows操作系统中的一个命令行界面，用户可以通过它执行各种系统级别的操作，如文件管理、系统维护和运行命令行工具。 通过VBScript实现CMD功能，主要涉及到以下几个关键知识点： 1. **VBScript基础语法**：...

    监听目录 文件变化 vbs实现

    本来以为coffee 一次只能监听一个js文件的变化自动编译，实际上是可以监听目录的。。。于是自己写了个vbs脚本，监听某目录下所有coffee文件，如有变化自动编译成js。 原理是无限循环扫描目录，比对coffee文件MD5值...

    用vbs实现定时运行指定程序

    便于实现管理自动化，如加入开机启动，即可实现无人职守。

    MD5 VBS的实现代码

    MD5 VBS的实现代码，希望对大家有用。

    vbs实现自动IP和静态IP

    这两个脚本`STATIC IP.vbs`和`AUTO IP.vbs`是实现这一目标的实用工具，可以适应不同的网络环境需求。在实际应用中，确保正确设置脚本中的参数，并注意可能的安全问题，例如防止未经授权的IP变更。

    VBS显示IP地址

    以下是一个简单的VBS脚本，用于显示本地计算机的IP地址： ```vbscript Option Explicit Dim objNetwork Set objNetwork = WScript.CreateObject("WScript.Network") Dim strIPAddress strIPAddress = objNetwork....

    vbs 实现多线程

    多线程eeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee.vbs

    vbs压缩和解压zip,vbs压缩zip,vbs解压zip

    3. **ZIP 文件格式**：一种广泛使用的文件压缩与存档格式，能够将多个文件及目录压缩成一个单一的ZIP文件，同时支持文件的加密保护。 #### 二、压缩 ZIP 文件 ##### 代码解析 ```vbscript Sub Zip(ByVal ...

Magicbox
Global site tag (gtag.js) - Google Analytics