欢迎您光临五金加工厂,如有问题请及时联系我们。

论文拷贝技巧?

作者:五金加工
文章来源:本站

  首先打开word和你要复制的格式的论文打开样式库,

  点击右侧关闭模板然后打开文件,新建一个后缀名为.dotm的文件,这就是你要保存的格式。点击你要用到的格式,点击复制,右面就会添加,添加完毕之后可以选择关闭,保存即可。

  打开你的论文,同上述步骤,将你保存的格式打开也就是dotm的格式,然后复制到左边,这里你可以删除原来的或者直接替换即可。

  方法/步骤

  1/4分步阅读

  打开要复制的论文网站文章列表。

  2/4

  运行按键精灵

  编写脚本

  Delay 500

  LeftClick 1

  Delay 500

  

论文拷贝技巧?

  LeftClick 1

  KeyPress "F2", 1

  // 定义 复制 粘贴 正文,,是 子程序fzzw 里的一部分

  Sub fzzw1

  // 复制 正文

  Delay 500

  RightClick 1

  Delay 200

  MoveR 35, 35

  Delay 200

  LeftClick 1

  Delay 200

  //粘贴 正文

  Delay 200

  MoveTo X12, Y12 + 200

  

论文拷贝技巧?

  Delay 40

  LeftClick 1

  Delay 40

  KeyDown "Ctrl", 1

  Delay 40

  KeyPress "v", 1

  Delay 40

  KeyUp "Ctrl", 1

  Delay 40

  KeyPress "BackSpace", 64

  Delay 50

  KeyPress "Enter", 1

  Delay 100

  End Sub

  // 定义 复制 一 页

  Sub fzzw

  Rem xyy

  Delay 400

  //不能点到字上面,选中前面的文字

  MoveTo X11 + 100, Y11 + 456

  Delay 150

  LeftClick 1

  Delay 180

  LeftClick 1

  Delay 180

  LeftClick 1

  Delay ys2

  // 下拉网页 回6个

  MouseWheel - 100

  Delay ys2

  MouseWheel 6

  Delay ys6

  // 找 当前页面 的 红色

  FindColor 500,110,1360,850,"0000FF",X20,Y20

  If X20 > 0 Then

  Delay 600

  MoveTo X20 - 200, Y20 + 8

  Delay 80

  KeyDown "Shift", 1

  Delay 200

  LeftClick 1

  Delay 200

  KeyUp "Shift", 1

  Delay 100

  // 复制 粘贴 正文

  Call fzzw1

  End If

  Delay 100

  // 找 下一页 否则找 横线 选中后面的文字

  FindPic 540,110,1060,850,"Attachment:\211xyy.bmp",0.98,X21,Y21

  If X21 > 0 And Y21 > 0 Then

  // 点击 下一页

  MoveTo X21 + 16, Y21 + 6

  Delay 50

  LeftClick 1

  Delay wlys

  Goto xyy

  End if

  //否则找 横线 选中后面的文字

  If X21 < 0 Then

  Delay 80

  // 关闭 网页

  Call gbweb

  Delay 80

  End if

  End Sub

  //定义 关闭网页

  //定义 关闭网页

  Sub gbweb

  FindPic 500,50,1330,230,"Attachment:\571gbweb.bmp",0.9,X57,Y57

  If X57 > 0 And Y57 > 0 Then

  MoveTo X57+5, Y57+5

  Delay 40

  LeftClick 1

  End If

  Delay 100

  End Sub

  // 以下 为 电脑 及网络 延时

  ys2 = 200 //电脑 延时 (默认 200 )

  ys6 = 600 //电脑 延时 (默认 600 )

  wlys = 3000 //网络 延时 (默认 3000 )

  //复制文件名

  //复制文件名

  MouseWheel -3

  Delay 600

  FindPic 360,20,660,500,"Attachment:\11nxzdwz.bmp",0.9,X11,Y11

  If X11 > 0 And Y11 > 0 Then

  MoveTo X11 + 300, Y11 + 84

  Delay 180

  LeftClick 1

  Delay 180

  LeftClick 1

  

论文拷贝技巧?

  Delay 180

  LeftClick 1

  End If

  KeyDown "Ctrl", 1

  Delay 40

  KeyPress "C", 1

  Delay 40

  KeyUp "Ctrl", 1

  Delay ys2

  //粘贴文件名

  FindPic 30,30,460,600,"Attachment:\121worddw.bmp",0.9,X12,Y12

  If X12 > 0 And Y12 > 0 Then

  Delay 40

  MoveTo X12, Y12 + 200

  Delay 40

  LeftClick 1

  Delay 40

  KeyDown "

  KeyPress "v", 1

  Delay 40

  KeyUp "Ctrl", 1

  Delay 40

  KeyPress "BackSpace", 64

  Delay 50

  KeyPress "Enter", 3

  Delay 100

  End If

  ///复制第一页///////////////////////////

  //不能点到字上面,选中前面的文字

  MoveTo X11 + 100, Y11 + 456

  Delay 150

  LeftClick 1

  Delay 180

  LeftClick 1

  Delay 180

  LeftClick 1

  Delay ys2

  // 下拉网页 回6个

  MouseWheel - 100

  Delay ys2

  MouseWheel 6

  Delay ys6

  // 找 当前页面 的 红色

  FindColor 500,100,1300,650,"0000FF",X20,Y20

  Delay 600

  // 找 下一页 否则找 横线 选中后面的文字

  FindPic 500,100,1300,650,"Attachment:\211xyy.bmp",0.98,X21,Y21

  If X21 > 0 And Y21 > 0 Then

  MoveTo X20 - 230, Y20 + 8

  Delay 80

  KeyDown "Shift", 1

  Delay 200

  LeftClick 1

  Delay 200

  KeyUp "Shift", 1

  Delay 100

  // 复制 粘贴 正文

  Call fzzw1

  // 点击 下一页

  MoveTo X21 + 16, Y21 + 6

  Delay 50

  LeftClick 1

  Delay wlys

  // 复制第二页,,及以后页

  Call fzzw

  End if

  //否则找 横线 选中后面的文字

  If X21 < 0 Then

  FindPic 540,110,1060,850,"Attachment:\221dw.bmp",0.9,X22,Y22

  If X22 > 0 And Y22 > 0 Then

  MoveTo X22, Y22

  Delay 100

  KeyDown "Shift", 1

  Delay 200

  LeftClick 1

  Delay 200

  KeyUp "Shift", 1

  Delay 80

  // 复制 粘贴 正文

  Call fzzw1

  Delay 80

  // 关闭 网页

  Call gbweb

  Delay 80

  End If

  End if

  /////以上是 复制第一页//////////////////

  3/4

  在左上角打开WORD 约400像素

  在左下角打开新建文件的文件夹列表, 约400像素

  4/4

  调试按键精灵,即可复制。

来源:文章来源于网络,如有侵权请联系我们删除。本文由五金加工编辑,欢迎分享本文,转载请保留出处和链接!