日历

« 2008-11-23  
日 一 二 三 四 五 六
      1
2345678
9101112131415
16171819202122
23242526272829
30      

最新来客

我的好友

统计信息

  • 访问量: 156
  • 日志数: 4
  • 建立时间: 2007-04-28
  • 更新时间: 2007-08-28

RSS订阅

我的最新日志

  • [转贴]随机选取weblist的方法

    2007-8-21

    Function Select_weblist(obj)
       Dim item_count
       item_count=obj.GetROProperty ("items count")
       If  item_count > 0 Then
              Randomize
      Get_Ran=RandomNumber (1,item_count-1)
      obj.Select "#"&Get_Ran
       End If
    End Function

    把对象传进去,就可以自动选取weblist中的值，在实际操作中特别是针对动态的weblist,而且对流程没有影响的的weblist效果不错。

    感谢风过无息！！！

    查看(24) 评论(0)

  • [转贴]小小技巧

    2007-8-21

    在调试过程中，经常要用到msgbox 弹出一个值
    但每次都要点击后才能继续运行脚本，的确有点不爽
    下面两行代码可以解决这点不爽
           Set WshShell = CreateObject("Wscrīpt.Shell")
           WshShell.Popup "123456789", 2, "标题"
    2:表示，停顿两秒
    小小技巧与大家分享。
     
    感谢dyq！！！！

    查看(39) 评论(0)

  • 中国人民解放军建军八十周年

    2007-8-01

    我要写的内容和题目丝毫关系都没有，只不过是为了说明写这篇日子的时间罢了。一转眼，来到这个新公司已经3个多月了，已经不在试用期了，意味着我如果要选择离开这家公司的话，要给它对于我来说是非常非常多的违约金。不过算了，三年而已嘛，很快就会过去的。何况现在有很多东西在等待着我去学习，能够充实自己也是不错的！不过最大的烦恼就是money太少，昨天晚上打车，出租车司机聊起了他的收入，我终于知道为什么那么多的出租车司机被害了，因为他们挣得确实是不少，比我的二倍多多了。记得有一位朋友说过：在资本面前，技术就是婊子。这句话太有道理了！！！！尤其像我们这样技术还不是巨牛，不是管理人员，也没有外捞的人实在是痛苦呀！！

    查看(22) 评论(0)

Open Toolbar