天使之名312吧 关注:49贴子:7,993
  • 12回复贴,共1
按键精灵


1楼2012-07-27 19:52回复
    2楼2012-07-27 21:38
    回复
      http://zy.anjian.com/?action-study


      3楼2012-07-27 21:40
      回复
        http://zhidao.baidu.com/question/297203069.html
        dim a,text
        Dim hwnd
        //这是网页窗口
        hwnd=Plugin.Window.MousePoint()
        //下面这句是打开Excel文档工作表
        Call Plugin.Office.OpenXls("C:\测试.xls")
        a=1
        rem start
        //下面这句是向Excel文档工作表(1)单元格(1, 1)读出内容存入(Text)变量
        Text = Plugin.Office.ReadXls(1, a, 1)
        a=a+1
        //
        Call Plugin.Window.Active(Hwnd)
        //这里你自己写吧,输入TEXT内容并点击
        //
        if text<>"" then
        goto start
        end if


        4楼2012-07-28 19:15
        回复
          http://zhidao.baidu.com/question/297203069.html
          dim a,text
          Dim hwnd
          //这是网页窗口
          hwnd=Plugin.Window.MousePoint()
          //下面这句是打开Excel文档工作表
          Call Plugin.Office.OpenXls("C:\测试.xls")
          a=1
          rem start
          //下面这句是向Excel文档工作表(1)单元格(1, 1)读出内容存入(Text)变量
          Text = Plugin.Office.ReadXls(1, a, 1)
          a=a+1
          //
          Call Plugin.Window.Active(Hwnd)
          //这里你自己写吧,输入TEXT内容并点击
          //
          if text<>"" then
          goto start
          end if


          5楼2012-07-28 19:15
          回复
            1,先建立个txt文本,取名叫s,并在里面每行填上如下:
            一行123
            二行4567
            三行7890000
            (更多自己照葫芦画瓣自己加···)把他放到按键精灵script文件夹里面。
            附上源码到按键里去:
            path="s.txt"
            Plugin l=File.OpenFile(path)
            Plugin z=file.Readfile(l,500)
            Plugin file.CloseFile(l)
            lz=instr(z,"一行")
            lz=mid(z,lz+2,3)
            Plugin Sys.SetCLB(lz)
            SayString lz
            Delay 1000
            lz=instr(z,"二行")
            lz=mid(z,lz+2,4)
            Plugin Sys.SetCLB(lz)
            SayString lz
            Delay 1000
            lz=instr(z,"三行")
            lz=mid(z,lz+2,7)
            Plugin Sys.SetCLB(lz)
            SayString lz
            脚本运行你做个试验,在txt文本窗口下启动,它会自动输入相应数字。
            注意这句Plugin z=file.Readfile(l,500)后面的500是你的字节,我也不知道你的文件有多少字节,所以随便打了个,要是内容长,没有显示出来就把这个数字再加大。
            注意这lz=mid(z,lz+2,3)后面那个三意思是“一行”这两个字后面有多少个字因为后面是123对不对?所以就有三个字,才填3,懂了吧?
            累死了,加多加点分撒···
            


            6楼2012-07-28 19:34
            回复
              要求把一堆excel表格里的数据 填写在网站上 一个个复制粘贴太麻烦 录制按键Call Plugin.Office.OpenXls("d:\\1.xls") dim a,b,c,d,e,f,g,h


              7楼2012-07-28 20:50
              回复
                按键精灵里的插件命令你可以看看
                //定义变量//
                dim a,text
                Call Plugin.Office.OpenXls("C:\AA.xls")
                a = 1
                x = 1
                y = 2
                //读取表格,括号内第2个是行,第3个是列//
                Text = Plugin.Office.ReadXls(1, a, 1)
                a = a + 1
                //写入指定位置//
                Call Plugin.Office.WriteXls(2, x, 1, text)
                x = x + 1
                Call Plugin.Office.WriteXls(2, y, 1, text)
                y = y + 1
                如果需要读取B列,C列,就定义多几个变量,最后写个循环命令就行了


                8楼2012-07-28 20:51
                回复
                  Plugin Text = Office.ReadXls(1,2,3, "c:\wenjian.xls")


                  9楼2012-07-28 20:56
                  回复
                    10楼2012-07-29 10:21
                    回复
                      目前网页按键精灵只支持模拟模式录制,网页录制模式将在下一个版本中添加。
                      说明:
                      录制时会自动加上操作延时,回放时请按照需要进行调整;
                      按键动作回放目前不够稳定,不能在最小化状态进行回放,后台回放
                      注意:
                      下面开始录制:
                      1)启动网页按键精灵
                      2)点击“模拟模式”按钮,设置模拟模式录制选项,去掉“记录鼠标移动”选项,点确定;
                      3)点击“录制脚本”按钮
                      4)打开 www.kaixin001.com
                      5)输入用户名、密码登录
                      6)点击“买房子”组件
                      7)点击“花园”选项
                      8)点击“下一个好友”
                      9)点击“偷菜图标”
                      10)点击每一块可偷的菜地
                      11)偷完之后点“停止录制”,再点“保存脚本”按钮,输入一个脚本名称保存
                      12)关闭按键精灵,重新启动按键精灵,运行该脚本;
                      


                      11楼2012-07-29 10:24
                      回复
                        12楼2012-08-06 15:15
                        回复
                          先进去设置鼠标命令,右键单击,执行1次(按插入),接着设置时间(其他命令)间隔为100毫秒(按插入),然后记得点上面一点的循环,设置为 循环到按中止键为止。。。设置好启动和中止热键,保存,完成,退出。。。。


                          13楼2012-08-27 09:21
                          回复