赏客

摘要： 免费正则表达式辅助工具前段时间由于工作需要，学了一天的正则表达式，发现正则表达式功能实在是强大，但是也很奇怪，刚接触会很不习惯。我不需要很深入地了解，所以也没学多久，不过找了几款很不错的免费的正则表达式辅助软件。RegexTester这是我在看《正则表达式30分钟入门教程》时，作者推荐的，很不错。要... 阅读全文

摘要： Set wordApp=getObject(,"word.Application")wordApp.Visible=trueDim odocFor each odoc in wordApp.Documentsmsgbox "Name:"& odoc.Name & ",path:"& odoc.pathNext 阅读全文

摘要： Dim objOutlook Dim objOutlookMsg Dim olMailItem ' Create the Outlook object and the new mail object. Set objOutlook = CreateObject("Outlook.Application") Set objOutlookMsg = objOutlook.CreateItem(olMailItem) Set mapi = objOutlook.GetNameSpace("MAPI") ' Define mail recipie 阅读全文

摘要： 属性名称属性描述abs_xx轴的屏幕像速位置abs_yy轴的屏幕像速位置ClassName对象的名称enabled该对象属性是否可见（true/false)focused光标是否定位于该控件上面Foreground该对象是否处于激活状态HasBorder是否有边框HasCaption是否有titlebarHasHScroll是否有水平滚动条HasSizebox是否定义边框的面积HasSystemMenu在titlebar上是否有menuHasVScroll是否有垂直滚动条height对象的高度HScrollPageSize水平滚动条的面积，如果对象没有水平滚动条，那么GetROProperty 阅读全文

摘要： Dim rs,sqset conn=createobject("adodb.connection")set rs=createobject("adodb.recordset")conn.open="Driver={Microsoft ODBC for Oracle};Server=SID_HOST.DOMAIN.COM;Uid=mssqa;Pwd=password;"sql="select * from CLIENT_TABLE"rs.open sql,conn,3,3do while not rs.eofvalu 阅读全文

摘要： 1.因为你的U盘是FAT32格式的，所以直接将其格式化为NTFS格式的再拷贝就OK2.不用格式化U盘的另一种方法：如果你的U盘盘符是I，那么直接在命令行中输入convert i:/fs:ntfs。 阅读全文

摘要： 描述性编程，关闭浏览器，首先还是要把对象添加到对象库window("Text:=百度一下，你就知道 - Windows Internet Explorer","index:="&i).close2.vbs启动QQ，要用三个空格、、option explicit ‘告诉宿主变量必须先声明后使用dim ... 阅读全文

摘要： BeyondTechnology随笔- 144 文章- 1 评论- 10博客园首页新随笔联系管理订阅Vbs脚本经典教材(最全的资料还是MSDN)—为什么要使用Vbs？在Windows中，学习计算机操作也许很简单，但是很多计算机工作是重复性劳动，例如你每周也许需要对一些计算机文件进行复制、粘贴、改名、删除，也许你每天启动计算机第一件事情就是打开WORD，切换到你喜爱的输入法进行文本编辑，同时还要播放优美的音乐给工作创造一个舒心的环境，当然也有可能你经常需要对文本中的某些数据进行整理，把各式各样的数据按照某种规则排列起来……。这些事情重复、琐碎，使人容易疲劳。第三方软件也许可以强化计算机的某些功能 阅读全文

摘要： '新增一个用户，包含用户姓名、密码、邮箱、手机号码，角色Browser("BIP管理系统").Page("BIP管理系统").WebEdit("username").Set "admin" '登录用户名Browser("BIP管理系统").Page("BIP管理系统").WebEdit("password").SetSecure "123456" '登录密码Browser("BIP管理系统") 阅读全文

摘要： 一,我们闲看下QTP中常用的一些函数1)InStr 函数 返回某字符串在另一字符串中第一次出现的位置。 InStr([start, ]string1, string2[, compare])2)Right 函数 从字符串右边返回指定数目的字符。 Right(string, length) 举例：Dim AnyString, MyStr AnyString = "Hello World" ' 定义字符串。 MyStr = Right(AnyString, 1) ' 返回 "d"。 MyStr = Right(AnyS... 阅读全文