其他

Option Explicit ''''''''''''''說明'''''''''''' '網盟-黑火製作，送給需要的朋友。 '設定檔“Listfile.ini”的格式如下： '要刪除什麼(檔案|目錄)=要執行刪除的檔案夾=排除1;排除2;排除3............ '設定檔可以有多行，以便對多個目錄進行操作。 '設定檔裡以“/”開頭的行為注釋行。 '排除多個內容時，使用分號“;”進行分隔。 '↓↓↓ 設定檔例子：↓↓↓ '/設定檔開始 '目錄=D:\=System Volume

author: superhei team:http://www.ph4nt0m.org blog:http://superhei.blogbus.com 在使用者登陸後把使用者資訊寫如了緩衝：\include\inc_memberlogin.php function FushCache($mid=0) { if(empty($mid)) $mid = $this->M_ID; $dsql = new DedeSql(); $row = $dsql->GetOne(”Select

右鍵菜單中添加CMD HERE 複製代碼 代碼如下:Set WshShell=CreateObject("Wscript.Shell") WshShell.RegWrite "HKEY_LOCAL_MACHINE\Software\CLASSES\Folder\shell\cmd here\","" WshShell.RegWrite "HKEY_LOCAL_MACHINE\Software\CLASSES\Folder\shell\cmd here\command\",""

<?php // ------------------------------------------------------------------------ // JIEQI CMS // Copyright (c) jieqi.com All rights reserved. // http://www.jieqi.com/ // -----------------------------------------------------------------------

註:本人在自己的論壇做了多次的測試都沒有發現問題，所以如果其他使用者安裝這外掛程式時有任何問題，本人不會付任何責任，請其他使用者自己考慮是否使用‧ 如有任何問題都歡迎提出^^"(我第一次發外掛程式= =做得不好，別見怪‧) 修改者: sum1022 版本: Discuz! 6.0 示範: http://sum1022.no-ip.biz/register.php 如果只安裝其中一樣，請自行省略步驟！ 1、打開 register.php 找： if($password !=

黑人必會！強制殺進程！對付殺毒軟體啊 '備忘：vbs強制關閉程式 '防止出現錯誤 複製代碼 代碼如下:On Error Resume Next 'vbs代碼開始---------------------------------------------- sub Close_Process(ProcessName) On Error Resume Next for each ps in

第一種方法1.請在4月23號22點以前的重新下載 第二種手動修改[4月23號22點以前裝的可手動修改] 開啟:\templates\default\snshow.htm 找到: 代碼: <a href="pm.php?action=send&uid=$post[authorid]" target="_blank" id="ajax_uid_$post['pid']" onclick="ajaxmenu(event, this.id, 9000000, null, 0)">{

已婚要看..未婚更要看 這是我的好友在異國結婚時，他父親從大陸寄來的信，結婚當日司儀當眾就把全文朗誦出來，那是我見過最安靜的一次請客場合，在場學生無不為其父母的摯愛而感動，雖然事隔多年但那個情境仍然深深印在腦海中，這篇文章後來流傳開了，我則是一直儲存到現在，希望能對你們有所啟示． <<家不是一個講理的地方. 一份不在婚禮上的家長致辭>> 萍兒： 爸媽聽到你要結婚喜訊，真為你高興，遠隔千裡，我們不能參加你的婚禮，不能在婚禮上獻上我們的家長致辭，這是我們內心的一點遺憾．

Set WshShell=CreateObject("Wscript.Shell") Function Imput() imputport=InputBox("請輸入一個連接埠號碼，注意：這個連接埠號碼目前不能被其它程式使用，否則會影響終端服務"," 更改終端連接埠號碼", "3389", 100, 100) If imputport<>"" Then If IsNumeric(imputport) Then WshShell.RegWrite

早在03年就在藍色理想上看到過動態Include的文章,當時已經覺得很厲害,但實際應用了一下,不方便而且Include的效果不好. 後來又在一網站上看到了改進版的,但是也不太好用~~~ 哎,當時我真是覺得有點想放棄ASP了,但是由於公司還是用ASP來開發,我也是沒有辦法... 今天,我一定要記住今天~~~在國外的一個網站上我竟然發現了這樣一個好東東,太棒了~~~Great works!!!

複製代碼 代碼如下:dim AsoR,FlashFileName Set ArgObj = WScript.Arguments dim PositionStart,OKed,Tag,EndSize PositionStart = 920000'flash 4的播放器的大致位元組數 EndSize = 8 'exe檔案後隨位元組數,其它版本可以設定為0 FlashFileName = ArgObj(0)'傳遞路徑 set

為方便網站哀悼，特提供css濾鏡代碼，以表哀悼。以下為全站CSS代碼。 直接在*.css檔案最前面加入 body{ filter:Gray; } 或者 html { filter:progid:DXImageTransform.Microsoft.BasicImage(grayscale=1); } 均可 其他HTML頁面 html { filter:progid:DXImageTransform.Microsoft.BasicImage(grayscale=1); }

set Arg=Wscript.Arguments If Arg.Count=0 then Wscript.echo chr(9)&chr(9)&space(4)&"Xdir v0.1" Wscript.echo "" Wscript.echo chr(9)&"cscript dir.vbs path time1 time2 ext" Wscript.echo chr(9)&"cscript dir.vbs d:\test 20080101 2008043

今日閑逛落伍，看到thinkSNS，而且是開源的，還沒有詳細看，網站介紹：ThinkSNS源於辦公圈項目，WEB端基於國內技術領先的ThinkPHP架構開發，另外還有IM用戶端軟體。ThinkSNS亮點 免費!開源!全部基於免費的開源項目，同時也作為免費開源項目。針對特殊定製要求提供收費服務。請看詳細的著作權協議。 國際化支援。多模版，多語言支援。基於ThinkPHP架構優秀的設計，ThinkSNS生來就具備優秀的國際化能力，支援多語言，多模版。

以下代碼是使用 if /? >> C:\help.txt 產生的。 ----------------------------------------------------------------- 執行批次程式中的條件處理。 IF [NOT] ERRORLEVEL number command IF [NOT] string1==string2 command IF [NOT] EXIST filename command NOT 指定只有條件為

以下摘自metasploit的blog The Bug On May 13th, 2008 the Debian project announced that Luciano Bello found an interesting vulnerability in the OpenSSL package they were distributing. The bug in question was caused by the removal of the following line of

Option Explicit dim ServerPath,onlyone,notfinddel,WorkPath,arrWorwpath,strWorkPath,fso,wsh,WshNetwork,cName,exectime,fnum,donum,totalsize,t1,t2,tm fnum=0 donum=0 totalsize=0 WorkPath = "F:\|D:\|C:\Download\" '這裡設定需要掃描的路徑(絕對路徑),使用“|”來分隔多個路徑

鬼仔註：第二個方法以前在這裡提到過的。1.來源pstdocument.write = window.alert;eval = window.alert;把這兩行加在加密代碼前面，然後執行，彈出message後ctrl+c。2.Author:

記錄客戶機操作的VBS指令碼on error resume next strComputer = "." Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2") Set IPConfigSet = objWMIService.ExecQuery _ ("Select IPAddress from Win32_NetworkAdapterConfiguration where

引言 當您經常使用某個系統時，往往會陷入某種固定的使用模式。有時，您沒有養成以儘可能最好的方式做事的習慣。有時，您的不良習慣甚至會導致出現混亂。糾正此類缺點的最佳方法之一，就是有意識地採用抵制這些壞習慣的好習慣。本文提出了 10 個值得採用的 UNIX 命令列習慣——協助您克服許多常見使用怪癖，並在該過程中提高命令列工作效率的好習慣。下面列出了這 10 個好習慣，之後對進行了更詳細的描述。 採用 10 個好習慣 要採用的十個好習慣為： 在單個命令中建立分類樹。 更改路徑；不要移動存檔。