怎樣寫virus

goodday

原帖由 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

～。～ 还是不明白我要什么，直接放出来吧！不要偷我的版权哦！
放你名字没有错啊，全部code你给的

goodday

原帖由 goodhermit95 于 2008-4-11 09:08 AM 发表
～。～ 还是不明白我要什么，直接放出来吧！不要偷我的版权哦！
放你名字没有错啊，全部code你给的

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

去google 看了他的 api 没有download 的api
要找 dhilip89 叻 他会 http raw msg protocol

youzi

有没有各位大大...
看不懂你们在干麻...
可以解释下吗？
抓病毒怎么抓？
放进去了抓不到会怎样？
用还原系统会不会有很好的帮助？

goodhermit95

我们防的病毒是捉不到的

goodhermit95

...算了。。。
dhilip89 很像不教人的，很多人问他都不理人

goodhermit95

你在研究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

本人有玩过VB，但不精通

goodday

  老板 ~~~ 给我一点时间咯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

原帖由 terence_say 于 2008-4-12 10:32 AM 发表
本人有玩过VB，但不精通

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