epac
发表于 2012-2-9 12:28:23
楼主有缘码么
zyfzyj
发表于 2012-2-11 10:19:29
什么原理?看看先!!
sun777222
发表于 2012-2-13 06:11:16
謝謝提供!來試試~~
proteus
发表于 2012-3-1 23:24:57
那么多人想要源码,顺手将它反了。#NoTrayIcon
#region
#AutoIt3Wrapper_icon=setting.ico
#AutoIt3Wrapper_Compression=4
#AutoIt3Wrapper_Res_Comment=本程序会在系统启动菜单中加入“从光驱启动”,免去去BIOS设置的麻烦,也方便菜鸟!
#AutoIt3Wrapper_Res_Description=By kn007
#AutoIt3Wrapper_Res_Fileversion=1.0.0.0
#AutoIt3Wrapper_Res_LegalCopyright=kn007@126.com
#endregion
FileInstall("bootsect.cdr", @TempDir & "\bootsect.cdr")
If MsgBox(8484, "本程序将在系统启动菜单中加入“从光驱启动” By kn007 ", "如果因为安装本程序而造成未知错误,您自己负责!好了,您是否现在安装本程序?(10秒等待)", 10) = 6 Then
FileCopy(@TempDir & "\bootsect.cdr", "C:\", 9)
FileDelete(@TempDir & "\bootsect.cdr")
FileSetAttrib("C:\bootsect.cdr", "+RASH")
If FileExists("C:\boot.ini") Then
FileSetAttrib("C:\boot.ini", "-RASH")
$FILE = "C:\boot.ini"
$STR = StringRegExpReplace(FileRead($FILE), "timeout\s*=\s*\d+", "timeout=5")
$TMP_FILE = FileOpen($FILE, 2)
FileWrite($FILE, $STR)
FileClose($TMP_FILE)
If StringInStr(FileRead($FILE), "C:\bootsect.cdr") Then
FileSetAttrib("C:\boot.ini", "+RASH")
Exit
Else
FileWriteLine("C:\boot.ini", "C:\bootsect.cdr=Boot From CD-ROM")
FileSetAttrib("C:\boot.ini", "+RASH")
MsgBox(64, "安装完毕! By kn007 ", "谢谢您的支持,我的E-Mail是kn007@126.com", 5)
Exit
EndIf
Else
MsgBox(4096, "警告 !!! By kn007 ", "您的系统没有启动菜单文件,请确认您的系统是本程序支持的!", 5)
FileDelete(@TempDir & "\bootsect.cdr")
Exit
EndIf
Else
FileDelete(@TempDir & "\bootsect.cdr")
Exit
EndIf
lzy9903
发表于 2012-4-23 17:26:35
这个直接在BIOS中也可以高置的呀
那片叶子
发表于 2012-4-27 20:06:23
被谁警告?
ooxxgod
发表于 2012-5-15 19:56:57
这个原理是能BIOS 改 光驱启动?
xphome
发表于 2012-5-27 15:46:19
好东西。。。。。
wgsyu
发表于 2012-5-29 20:57:37
学习了,很不错
kkk123
发表于 2012-10-15 01:57:47
谢谢楼主!!!
jasonny
发表于 2012-12-18 00:25:04
真厲害,感覺不錯用的樣子
hollandmfq
发表于 2014-5-3 20:07:23
雷锋精神传天下!谢谢分享!
zlong486
发表于 2014-5-3 21:00:21
谢谢分享,支持一下
tianji028
发表于 2017-2-14 23:22:00
看看如何实现。。
wbb870319
发表于 2017-6-29 16:51:02
这东西还被警告了?