2005年4月28日星期四

Google PageRank的计算源代码

  最近对google的PageRank(网页等级)比较感兴趣,一直想知道如何不用google toolbar来获取pr值。苦苦搜索之后,找到如下代码:

 

<?php
/**
    This code is released unto the public domain
*/
//header("Content-Type: text/plain; charset=utf-8");
define('GOOGLE_MAGIC', 0xE6359A60);

//unsigned shift right
function zeroFill($a, $b)
{
    $z = hexdec(80000000);
        if ($z & $a)
        {
            $a = ($a>>1);
            $a &= (~$z);
            $a |= 0x40000000;
            $a = ($a>>($b-1));
        }
        else
        {
            $a = ($a>>$b);
        }
        return $a;
}  

function mix($a,$b,$c) {
  $a -= $b; $a -= $c; $a ^= (zeroFill($c,13));
  $b -= $c; $b -= $a; $b ^= ($a<<8);
  $c -= $a; $c -= $b; $c ^= (zeroFill($b,13));
  $a -= $b; $a -= $c; $a ^= (zeroFill($c,12));
  $b -= $c; $b -= $a; $b ^= ($a<<16);
  $c -= $a; $c -= $b; $c ^= (zeroFill($b,5));
  $a -= $b; $a -= $c; $a ^= (zeroFill($c,3));
  $b -= $c; $b -= $a; $b ^= ($a<<10);
  $c -= $a; $c -= $b; $c ^= (zeroFill($b,15));

  return array($a,$b,$c);
}

function GoogleCH($url, $length=null, $init=GOOGLE_MAGIC) {
    if(is_null($length)) {
        $length = sizeof($url);
    }
    $a = $b = 0x9E3779B9;
    $c = $init;
    $k = 0;
    $len = $length;
    while($len >= 12) {
        $a += ($url[$k+0] +($url[$k+1]<<8) +($url[$k+2]<<16) +($url[$k+3]<<24));
        $b += ($url[$k+4] +($url[$k+5]<<8) +($url[$k+6]<<16) +($url[$k+7]<<24));
        $c += ($url[$k+8] +($url[$k+9]<<8) +($url[$k+10]<<16)+($url[$k+11]<<24));
        $mix = mix($a,$b,$c);
        $a = $mix[0]; $b = $mix[1]; $c = $mix[2];
        $k += 12;
        $len -= 12;
    }

    $c += $length;
    switch($len)              /* all the case statements fall through */
    {
        case 11: $c+=($url[$k+10]<<24);
        case 10: $c+=($url[$k+9]<<16);
        case 9 : $c+=($url[$k+8]<<8);
          /* the first byte of c is reserved for the length */
        case 8 : $b+=($url[$k+7]<<24);
        case 7 : $b+=($url[$k+6]<<16);
        case 6 : $b+=($url[$k+5]<<8);
        case 5 : $b+=($url[$k+4]);
        case 4 : $a+=($url[$k+3]<<24);
        case 3 : $a+=($url[$k+2]<<16);
        case 2 : $a+=($url[$k+1]<<8);
        case 1 : $a+=($url[$k+0]);
         /* case 0: nothing left to add */
    }
    $mix = mix($a,$b,$c);
    /*-------------------------------------------- report the result */
    return $mix[2];
}

//converts a string into an array of integers containing the numeric value of the char

function strord($string) {
    for($i=0;$i<strlen($string);$i++) {
        $result[$i] = ord($string{$i});
    }
    return $result;
}
// http://www.example.com/ - Checksum: 6540747202
$url = 'info:'.$_GET['url'];
$ch = GoogleCH(strord($url));
$url='info:'.urlencode($_GET['url']);
echo file_get_contents("http://www.google.com/search?client=navclient-auto&ch=6$ch&ie=UTF-8&oe=UTF-8&features=Rank&q=$url");
/* use curl send the user angent
$curl = curl_init("http://www.google.com/search?client=navclient-auto&ch=6$ch&ie=UTF-8&oe=UTF-8&features=Rank&q=$url");
curl_setopt ($curl, CURLOPT_USERAGENT, "Mozilla/4.0 (compatible; GoogleToolbar 2.0.110-big; Windows 2000 5.0)");
curl_exec($curl);
*/
?>
</></>

 

2005年4月26日星期二

自动打开最快镜像站

  如果一个网站有多个镜像站的话,使用本文的方法可以使得用户自动跳转到其访问速度最快的那个镜像站上。

直接将下面代码加入到<body></body>中
<script>
i=1
var autourl=new Array()
autourl[1]="www.williamlong.info"
autourl[2]="www.moon-bbs.com"
function auto(url){if(i){i=0;top.location=url}}
function run(){for(var i=1;i<autourl.length;i++)document.write("<img src=http://"+autourl+" width=1 height=1 onerror=auto('http://"+autourl+"')>")}
run()
</script>

2005年4月24日星期日

世界十大经典恐怖片

  恐怖片是以冤魂厉鬼、异性怪魔等异类非人为形象塑造,以奇异的超验幻想、离奇的梦魇谵妄为虚构手段,以恐怖骇人、惊悚阴森、离奇悬疑的超现实情节为故事题材,以追求惊惧恐怖的感官刺激效果为目的的音像制品。东方恐怖片以营造气氛见长 配以曲折 悬念丛生的恐怖情节达到恐怖的效果。西方恐怖片往往在画面上 血腥恐怖 给观众的视觉造成极大的冲击效果。下面的十大经典恐怖片是世界电影早期的恐怖片,虽然其风格和效果可能不如现代的恐怖片,但其对于现代恐怖片的发展和影响是非常大的。

  《驱魔人》(1977)

  导演:威廉姆·弗莱金

  改编自William Batty的小说。故事一开始位于伊朗的一个考古现场,在那儿发生了许多怪异的事。Merrin神甫的直觉告诉他:黑暗的君主想要重回大地,一场大战不可避免,问题只在于:它将在哪儿发生……镜头一转来到了华盛顿。Regan MacNiel是一个十二岁的孩子,他心爱的玩具是一个占卜板。通过游戏,她认识了一个朋友——Howdy.接着,奇怪的事在MacNiel家发生了,Regan变的精神不正常。经过一番痛苦的测试后,他们认识到Regan已不是她自己,全美国的医生对此都束手无策,直到一个医生推荐了驱魔人Karras. 善神,恶神和魔鬼,到底谁是最后的胜利者,影片自有分晓。

  这是一部经典恐怖片,曾经风靡一时。影片有着真实的效果和可怕的气氛,这无疑使本片在任何时候都是一部引人入胜的佳作。本片获得十项学院奖提名(赢得了最佳改编剧本和最佳音效)和四项金球奖(最佳导演,最佳影片,最佳音效和最佳女配角)。

  这部影片描写恶魔撒旦附身于12岁女孩,在人间大开杀戒。成年人念念不忘。当时美国正逢越战失败与水门事件,所以美国人都笼罩在失望、受骗、悲观的氛围中,此片宣扬的恐怖神秘主义无疑是一帖心灵创伤的麻醉剂。由于过于恐怖,多人观看时晕倒。

  《德州电锯杀人狂》(1974)

  导演:托伯·霍善

  塞利和他的四个朋友一起去拜访祖父的墓地,在路上,他们载了一个搭车客,没想到这人却突然发了疯,塞利一伙只好扔下他继续走。最后他们来到了塞利曾经住过的房子,不幸的是,那个搭车客正在那儿等着他们,一场屠杀开始了。

  《德州电锯杀人狂》故事原型出自1957年美国杀人狂、威斯康辛州普兰菲尔德镇的艾德·盖恩(Ed Gein)。以艾德·盖恩事件为题材的影片早已层出不穷,尤其是他以人皮缝制“皮脸”的残忍手段,在众多恐怖片中被描绘得淋漓尽致,就连《沉默的羔羊》也深受影响。它被认为同《活死人之夜》和 《驱魔人》一起开创了现代恐怖片的新时代。但影片中有着太多的暴力和血腥,这使的影片一直以来备受争议。

  《活死人之夜》(1968)

  导演:乔治·罗梅罗

  一颗坠落的人造卫星发出的放射线使死人复活了,他们从坟墓中爬起来,寻找活人作食物。附近的人们为了逃生,躲到了一个农场的房子里。他们心惊胆战,外面就是那些冷漠无情的幽灵——摇摇晃晃,一步步接近——要想杀死他们。而只有击打他们的头部才能将他们彻底消灭……

  这部低成本的黑白电影长90分钟,在匹兹堡拍摄,惊险恐怖,摄人心魄,现在看来仍然和当年一样犹如经历了一场噩梦。导演乔治﹒罗梅罗因为这部影片确立了他的恐怖片大师地位。

  如果你曾经看过《活死人之夜》这部电影,你就会走近那种特殊的恐怖意境:所有人都认为已经死掉了的计划和建议不断从坟墓中爬出来,摇摇晃晃重新走进回忆当中,吃掉活人的大脑。

  《万圣节前夜》(1978)

  导演:约翰·卡普特

  1963年的万圣节。小镇哈登菲尔德的一个6岁男孩麦克尔·麦尔斯用一把菜刀杀死了他的姐姐,当他的父母发现他时,他正手攥着那把血淋淋的杀人凶器直瞪瞪的望着天空。麦克尔·麦尔斯被送到了精神病院。尽管医生萨缪尔·路米斯做了最大的努力,但他还只是坐着,仍旧眼瞪着天空,这样持续了15年。

  1978年12月30日,似乎有种神奇的力量在驱使麦克尔离开那里。在暴风雨中他偷了萨缪尔·路米斯医生和玛瑞恩护士的车,返回哈登菲尔德小镇并在那偷了个白色的面具。一房地产经纪人的女儿和学生劳瑞·斯托德发现,不知是什么原因麦克尔一整天都在谈论她,可她并不认识他。当路米斯医生和警长疯狂的到处寻找麦克尔时,他不知道劳瑞正在照顾小孩琳德西和汤米,而且劳瑞的朋友安妮,琳达和鲍勃一个一个的失踪……

  导演约翰·卡普特。描写万圣节前夜,冷酷的面具杀手。这部系列片在11年里共拍了5集,一部比一部血腥。

  《闪灵》(1980)

  导演:斯坦利·库布里奇

  杰克·托伦斯(杰克·尼科尔森)是一名作家,为了摆脱工作上的失意,他决定接管一家奢华的山间饭店。那是一间座落偏僻,处处露着阴森之气的大屋,据说它的前一任管理者曾莫名地丧失了理智,并杀害了他的全家。杰克却没有把它当作一回事儿,他只想找一个清幽的地方专心写作。于是,他不顾朋友丹尼 (丹尼·劳埃德)的劝告,和妻子温蒂 (希莉·杜瓦)一起搬了这幢饭店。他们制订了新的规矩,杰克还专门设立了一个供自己创作的休息室。然而,诡异渐渐地从平静的表面浮现出来。杰克开始经常出入饭店的酒吧,寻找有关自己的过去,回忆脑海里那些血淋淋的画面;反常的事情终于无可避免地发生了……

  这部由斯坦利·库布里奇执导并根据史帝芬·金的畅销恐怖小说改编成的影片被许多金的书迷认为过于睿智,但是正是由于它的睿智使得该片成为具有非凡心理攻势的恐怖电影。库布里奇带着我们大家进行了一场颠簸离奇的旅行,进入了一个小说家(由杰克·尼可尔森饰演)疯狂的内心世界。主人公和他的妻子儿子居住的空旷荒芜,被大雪所困的旅店,那围绕在旅店四周沉重怪诞的寂静使观众颇有患了幽闭恐怖症般的迷惘怅然。为了更加淋漓尽致的刻画剧情,库布里奇无情的将一个外表斯文的男子堕落成一个禽兽般的野蛮人。

  《怪谈》(1965)

  导演:小林正树

  其实,所谓《怪谈》,就是中国人说的聊斋故事。影片由四个鬼故事串成。我尤其欣赏〈雪女〉和〈没有耳朵的芳一〉。〈雪女〉的布景美得出奇,犹如一册浮世绘画本,浓艳、夸张。那抹在苍穹上的眼睛,几欲滴睛油彩;而末尾,雪女遁去时天上的太阳,也充盈着招魂的神秘气息。〈没有耳朵的芳一〉则为我们展现了日本的雅乐遗风。芳一手下的琵琶,嘈嘈切切,大写意了古战场的惨烈与悲壮。该片的配乐是赫赫有句的日本现代音乐大师武满彻,他为整部影片加重了氛围元素。

  很小心地拿着黑泽明和小林正树作了比较,发现前者骨子里是西方式的思维。人道主义和荒诞的主题成为了萨特的注脚 .一向不喜欢电影里的说教气,可黑泽明就喜欢给故事拉郎配似地硬加上鲜明的主旨,司马昭之心路人皆知,充其量不过是日本的张艺谋罢了。可小林正树在表达传统主题题材上,浑然天成。完全展示了一派未被西方理性污染的东方智慧。几个鬼故事叙述得零零落落,描述性成份大大超过叙事。他给观众一双观察的眼睛,自己去体会虚无缥缈的故事中的禅机,而不是暴力式地引导观众按导演的思路去撬开现象,探究本质。

  《吸血鬼诺斯费拉杜》(1922)

  导演:F.W.茂瑙

  吸血鬼的故事是电影史上被改编过最多次数的题材,连不少木乃伊故事都是取材于布拉姆·斯多克的小说《德拉库拉》。其中,最梦魇般的吸血鬼形象来自20年代的德国。1922年德国摄制的默片《吸血鬼诺斯费拉杜》,著名导演茂瑙用大量的广角镜头对吸血鬼进行仰拍,当高大的驼背诺斯费拉杜乘船抵达时,他在凌厉的天空下,伸着镰刀似的手,耳朵竖着,眼睛瞪着,从银幕上直接扑向观众,因此当年看完电影的观众很多都不敢回家了。

  此片是德国早期表现主义电影的重要作品。影片在荒凉的古堡外开拍,吸血鬼的形容枯槁、眼眶深凹、牙齿暴凸、肩耸背弯尖耳的模样,真实的程度远超过想象,而那彷佛洞悉一切却又带点畏缩的阴沉眼神、那细瘦尖长的手指与长指甲、那猥琐又具有侵略性的体型姿态,更让见到他的人都忍不住打起寒颤来。

  《尸变》(1983)

  导演:塞姆·莱米

  五个大学生相约到田纳西州的森林里去探险,在森林里他们找到了一间孤零零的小屋,打算在里面度过周末,但不幸的是我们的主人公找到了一盘录音带和一本书——死亡之书。当他们播放那盘录音带时,恶魔的诅咒传了出来,通向地狱的大门打开了。而那本浸透了人血的死亡之书描述了如何唤醒邪恶灵魂的古代仪式。于是,那些可怜的学生就一个个的被控制,变成了可怕的恶魔。而幸存者们唯一能做的就是对昔日的朋友痛下杀手。谁将被恶魔控制,又有谁能活着度过这恐怖的夜晚?

  这部电影不光是全部都是赤裸裸的令人呕吐的血腥镜头,它所营造的恐怖场面和氛围也堪称一流,可以说从影片一开始就就让你精神高度集中及紧张,还有很多镜头运动的手法也是影片用来营造恐怖气氛的一个关键因素,在片中镜头有时似乎变成了魔鬼的眼睛,随着它的身体在移动。

  电影拍摄时导演塞姆还是一个高中生,他和他的几个高中同学从投资商手中筹集了大约37万美元,耗时三个月拍摄了这部电影,最初定名为"死亡之书".通过对尸体千变万化后变成魔鬼玩弄人的描述,将一幕幕毛骨悚然的场面充斥在你的眼前。本片无论是拍摄手法还是场景制作都堪称一流,无不显示了导演的鬼才。

  《阴风阵阵》(1977)

  导演:达里奥·阿金图

  意大利恐怖片大师达里奥·阿金图(Dario Argento)的最著名作品。这是一部风格非常独特的影片,被称为是电影史上最优雅的恐怖片。一位美国少女来到欧洲的一所芭蕾舞学校,迎接她的是一连串的谋杀。意大利大师对音乐、迷离的光线、以及镜头的运用给观众带来了前所未有的全新体验。

  只要挺过头十分钟你就会象在家里一样平安无事。影片中利刃刺入被害者跳动的心脏的特写被人们一致认为是最恶毒的谋杀场景。达里奥·阿金图不同于其它导演。他的作品总是能捉住观众的目光,再趁观众疏于防备时,出其不意地震摄全场。这个手法,使他成为电影界独树一格的人物。

  《精神病患者》(1960)

  导演:希区柯克

  该片可以算是所有现代恐怖片之母了,有多少观众被片中的变态杀手和那场脍炙人口的浴室杀人戏吓得不敢一个人洗澡。光浴室谋杀短短一分多钟一场戏,就有接达50多次,那浴帘外闪烁的人影,女主角惊恐的眼神,挥舞的匕首,黑色的血液,花花的流水,这些经典的镜头没有一点现代恐怖片的以恶心,音响取胜之处,却牢牢的抓住观众内心的恐怖情结,成为了影史上的典范。用他自己的话说,他对人生抱着一种奇怪的恐怖感。他认为,骇人的东西不仅潜伏在阴影里或者潜伏在只身独处的时候,有时,当我们和正派、友好的人在一起时,也会感到十分孤独、险象环生和孤立无援。

  与现代的恐怖片不同,希区柯克的影片更可以称其为惊愫片,没有妖魔鬼怪,所有的恐怖都在人与人之间存在和发生着,而且影片没有半点血流成河,扭曲变形等令人作呕的画面,完全是以其精巧的情节安排,演员卓越的发挥,还有希区柯克影片独特的五六十年代的音乐配乐形成了希氏招牌。

  来源:E视网

2005年4月23日星期六

中国十大禁片

  下面所列的十部电影,是中国八十年代后拍摄的十部电影,因为各种各样的原因还不能和观众见面,也可以说它们是中国电影的十面“白旗”,但有一点是可以肯定的,它们都出自真正热爱电影的人之手,电影就是他们心灵的形状。可以说,这些影片的出现使多少有些暮气的国产电影出现了新的可能性,它们以一种新的东西攫住你,把你高举于时代之上。因为他们的努力,有理由让我们相信,在打磨得越来越光滑的艺术世界里,电影仍然是一座山峰。

  苦恋

  出品单位:长春电影制片厂
  出品年代:1980年
  编剧:白桦 彭宁
  导演:彭宁
  演员:刘文治 黄梅莹

  剧情梗概:

  一对侨居海外的画家夫妇在新中国诞生的时候,毅然决定重返祖国的怀抱,他们的孩子也在飘扬的五星红旗下呱呱落地。但这双爱国华侨却在历次政治运动中受尽迫害,他们的女儿从小也受尽歧视。男主人公在逃亡中冻馁而死,临死前在雪地上爬出一个大大的问号。文化大革命结束之后,女儿执意出国。在亲人试图挽留她的时候,她说:“你们爱祖国,可是祖国爱你们吗?”这段台词成为《苦恋》最大的罪状。

  影片背景:

  《苦恋》改编成电影后更名为《太阳和人》,但前者的影响无疑更为巨大。这部影片在举行内部放映的时候引起很大争议,指责者甚至上升到违背四项基本原则的高度。随之而来的是贯穿于1981年全年的对该片的批判浪潮。本片从未公开上映,因此后来的人们只能通过白桦的剧本了解该片的一些基本情况。

  芙蓉镇

  出品单位:上海电影制片厂
  出品年代:1986年
  编剧:阿城、谢晋
  导演:谢晋
  演员:刘晓庆、姜文、郑在石、徐松子

  剧情梗概:

  胡玉音和丈夫黎桂桂在芙蓉镇以卖米豆腐为生,有“豆腐西施”的美誉。“四清”运动中,以李国香为首的工作组把胡玉音打成新富农,黎桂桂被逼自杀。二流子王秋赦在“文革”中也当上镇党支书,芙蓉镇笼罩在恐怖中。胡玉音与右派分子秦书田逐渐相爱,但秦书田又因为“反革命”被判刑十年。十年动乱结束了。秦书田平反回到镇上。这时王秋赫已变成疯子,他敲着破锣,嘶哑地叫嚷着“运动了,运动了……”

  影片背景:

  谢晋导演的一部反映建国以来多次政治运动中小人物悲欢离合的电影。在当时引发了人们对“四清”、“反右”、“文革”等历史问题清算的热情。但总的来说它仍然还是一部谢晋式“哀而不怒”的电影,最终通过审查,修成了正果。

  蓝风筝

  出品公司 北京电影制片厂
  出品年代 1992年
  编剧:萧矛
  导演:田壮壮
  演员:吕丽萍 李雪健 濮存昕

  剧情梗概:

  本片透过小孩铁头的眼光,反映了自1953年至1967年的大陆历次政治运动。女主人公是铁头的母亲陈树娟,一生际遇坎坷。第一任丈夫被错划为右派,在北方劳改时被倒下来的大树压死。好友李国栋为照顾铁头母子,成了第二任丈夫,但在大跃进后期的大荒积劳成疾致死。第三任丈夫是老干部,在文革中被造反派批斗致死,她也被划成反革命分子。 本片以悲哀、灰暗的基调讲述几十年的故土旧事,透视埋在历史灰烬下的人的命运,

  影片背景:

  《蓝风筝》是第五代导演执导的电影当中最直面政治历史的一部作品,但由于影片有香港及日本资金,故得以日本影片名义参加国际电影节。曾获日本第6届东京国际电影节最佳影片奖、最佳女演员奖。但由于中国电影代表团为此愤而退出东京电影节,因此该片与导演所受到的处罚最为严厉。

  霸王别姬

  出品单位:北京电影制片厂、汤臣电影事业有限公司
  出品年代:1993年
  编剧:李碧华、芦苇
  导演:陈凯歌
  演员:张国荣 巩俐 张丰毅

  剧情梗概:

  演生角的段小楼与演旦角的程蝶衣是自小在一起长大的师兄弟。两人合演的《霸王别姬》誉满京城,他们约定合演一辈子《霸王别姬》。后来段小楼娶了名妓菊仙为妻,依恋着师兄的蝶衣决定不再与小楼演这出戏。文化大革命中,段小楼成了牛鬼蛇神。在造反派的威逼下,师兄二人相互揭发“罪行”。菊仙承受不了打击,上吊自尽。打倒“四人帮”后,师兄二人在分离了22年的舞台上最后一次合演《霸王别姬》,蝶衣在师兄小楼的怀中结束了自己的演艺生涯,也结束了这出灿烂的悲剧。

  影片背景:

  《霸王别姬》是陈凯歌电影创作中的一个转折点。这部影片为他赢得了戛纳大奖,但也宣告了第五代文化反思时代的最后终结,第五代全面转型基本告一段落。本片之所以在大陆未能公映,与其所展现的京剧名角在文革期间惨烈的屈辱史不无关系。这也是九十年代“反思电影”所遭逢的共同障碍,而影片流露出的几分同性恋气息也使其在当时受到排斥。

  活着

  出品年代:1994年
  编剧:余华
  导演:张艺谋
  演员:葛优 巩俐

  剧情梗概:

  大少爷徐福贵嗜赌成性,妻子家珍屡劝无效,带着女儿凤霞回娘家。当夜福贵输光全部家产,父亲给他气死。一年后,家珍带着女儿及手抱的男婴有庆回家,福贵痛改前非,走埠演皮影戏维生。适逢国共内战,福贵先被国民党拉俘当兵,后被俘掳。好不容易获释回乡,庆幸一家团圆,却发现凤霞生病成了哑巴。数年后,大跃进运动及文化大革命先后发生,有庆与凤霞亦先后惨死。剩下凤霞难产生下的孙子馒头跟老人家继续活下去。

  影片背景:

  本片以贴近生活的小人物通俗剧风格,反映数十年来中国老百姓“好死不如赖活”的生活观,对大陆的政治运动荒谬性作出嬉笑怒骂的批判,是罕见的黑色喜剧佳作,但在大陆遭禁映。因投资者为香港年代公司,故在海外均有公映。

  邮差

  出品年代:1995年
  编剧:何建军
  导演:何建军
  演员:冯远征 梁丹妮 濮存昕

  剧情梗概:

  故事发生在北京的一个冬天。小豆是一个沉默内向的青年,和他的姐姐(梁丹妮)住在一起。他的工作是负责收发幸福区内居民的信件。在百无聊赖中,他开始把信件偷偷带回家拆开看。渐渐地他不满足于只是偷窥,而是开始干预别人的生活。他写匿名信,冒名写假信,甚至闯入别人家中,一发而不可收拾。他以为可以改变别人的生活,然而,最后他发现他只是改变了自己。

  影片背景:

  这部电影是导演何建军得到鹿特丹电影节的一个基金的资助拍摄,并在欧洲完成后期制作的。这就决定了本片不可能在国内获得放映的机会。从国外电影节或电影基金获取资金支持是不少青年电影导演的基本运作方式,也是他们完成的电影无法得以审查通过并与观众见面的根本原因。

  爸爸

  出品公司:北京电影制片厂
  出品年代:1996年
  编剧:王朔,冯小刚
  导演:王朔
  主演:冯小刚 胡晓培 徐帆

  剧情梗概:

  本片改编自王朔90年代早期的一部小说《我是你爸爸》。讲述了丧妻的男人马林生与他一手拉扯大的儿子之间日趋紧张的关系。这个在机关里混日子的小职员在对待儿子的时候,时而滥施暴力、时而摇尾乞怜,有时又满腔热情地和儿子称兄道弟。但最终父子之间仍然存在着不可逾越的鸿沟。

  影片背景:

  《爸爸》是中国著名“痞子文学”作家王朔的电影处女作,也是他迄今为止唯一的一部电影作品。这部影片据说对当代中国的社会关系进行了一些隐晦的讥讽,因此从来就没有在国内公映。富有戏剧性的是2000年的瑞士洛加诺电影节将本片评选为当年的最佳影片,票友导演王朔也许并不因此有太多的兴奋感:本片的公映为此又遥遥无期了。
 
  小武

  出品公司:香港胡同制作公司
  出品年代:1997
  编剧:贾樟柯
  导演:贾樟柯
  主演:王宏伟、左百韬

  剧情梗概:

  1997年,山西汾阳。小武是个扒手,自称是干手艺活的。他戴着粗黑框眼镜,寡言,不怎么笑,头时刻歪斜着,舌头总是顶着腮帮。他常常抚摸着石头墙壁,在澡堂里练习卡拉OK,陪歌女枯燥地压马路,与他从前的“同事”现在的大款说几句闲言淡语。他穿着大两号的西装,在大兴土木的小镇上晃来晃去。每当城里风声收紧,小武总是被公安人员第一个看押起来。

  影片背景:

  这部影片的悄然问世及它此后对中国青年影人所产生的影响都是标志性的。导演贾樟柯凭借《小武》在国际影坛一举成名,成为中国青年导演中后来居上的代表人物。他的拍片方式与其他独立制片人并无二致,走国际融资与发行的道路,基本与本土电影市场不发生任何关系。在国内,《小武》及其他类似的电影作品都是通过录像带或盗版VCD的形式与观众见面的。对崇拜他的人而言,贾樟柯似乎代表着“业余电影时代”的到来。

  赵先生

  出品年代:1998年
  编剧:述平
  导演:吕乐
  演员表:蒋雯丽 张芝华 陈怡楠

  剧情梗概:

  上海的下岗女工周若敏无意中发现她的教授丈夫赵先生与从前的女学生田静在搞婚外恋。第二天,田静告诉赵先生,她已经怀上了他俩的孩子。赵先生含糊其辞,令田静伤心失望,去医院做人工流产。闻讯赶来的赵先生在手术室外与田静的一位朋友动起手来。赵先生落荒而逃,被卡车撞倒。第二年秋天,已成植物人的赵先生被从医院接回家中。在赵的办公室里,周若敏与田静不期而遇,她们都是来为赵先生整理东西的。这时,桌上的录音电话传出了第三个女人的声音,她是赵先生遇车祸前一刻认识的。

  电影背景:

  第五代最杰出的摄影师之一吕乐试图通过拍摄处女作《赵先生》,像他的同门师兄张艺谋一样成功转型成电影导演。但这一努力却并未取得太大的成效,虽然本片在瑞士洛加诺电影节获得金奖,不过依然未能摆脱在国内禁映的下场。他执导的第二部电影《小说》据说因为情节晦涩,也处在封存状态中。

  鬼子来了

  出品年代:1999年
  编剧:姜文 述平
  导演:姜文
  演员:姜文 姜鸿波

  剧情梗概:

  日本侵华战争中,撤退的中国军队在村民马大三家里留下两个黄麻袋,马大三发现其中装着一个日本鬼子和一个汉奸翻译。6个月过去了,中国军队不见踪影,村民们必须精心地看管住这两个俘虏不让敌人发现,而且还要防止俘虏查觉到情况的变化。村民们要求马大三解决这两个鬼子,但他却下不了手。鬼子向马大三提议,愿意以粮食来换取自由,这可以救济正陷于饥荒中村民。马大三相信了这个在他家住了多时的鬼子,结果却出乎他的意料,一双方互为友好的宴会在日本兵对村民的大屠杀中结束,村子也被烧成白地。

  影片背景:

  《鬼子来了》是姜文在成功执导《阳光灿烂的日子》之后第二部电影作品,影片在题材的深刻性与影像的丰富性上都达到了姜文电影创作的又一个高峰。但他却在未经电影局同意的情况下私自将该片送往戛纳电影节参展,并获得了评委会大奖。但如此崇高的荣誉仍然不足以打动电影局领导的心,迄今为止,《鬼子来了》还只是一声“狼来了”,始终不见放映的踪影。

  十七岁的单车

  出品单位:北京电影制片厂
  出品年代:2000年
  导演:王小帅
  演员:周迅 李宾 高媛媛

  剧情梗概:

  十七岁的阿贵从乡下来到北京,开始他的城市生活。他的梦想是买一辆山地自行车。阿贵给自己找了一个自行车快递的工作,当他就快要存够钱时,发现他的自行车不见了!他焦急地寻遍了整个北京,终于发现另外一个男人骑着他的自行车。他于是急忙追了上去,展开理论。但是,那个男人是在跳蚤市场上买到他的车的,他们两个人,必须要商量出一个办法,一起使用那辆自行车……。

  影片背景:

  《十七岁的单车》是第六代导演的代表人物王小帅的最新作品。按照制片方协议规定,该片如果参加国际电影节,须经过电影局审查批准方可。但王小帅显然对使电影局满意信心不足,在没有拿到审片结论之前便携片参加了柏林国际电影节,并赢得了一尊银熊奖。这使得《十七岁的单车》成为又一部被禁止在国内公映的电影作品。

  来源:网易影视频道

2005年4月21日星期四

如何开公司的手续过程

  注册一个公司,首先想好经营什么,怎样经营好,再来注册。要不,注册了也没有用,注册了公司是需要很多成本的,不是一件“好玩”的事情。

  前期可行性分析调查,建议你自己认真的考虑一下。接下来谈谈如何注册公司,需要哪些手续、怎样操作。

  一、选择公司的形式:

  普通的有限责任公司,最低注册资金3万元,需要2个(或以上)股东,

  从06年1月起新的公司法规定,允许1个股东注册有限责任公司,这种特殊的有限责任公司又称“一人有限公司”(但公司名称中不会有“一人”字样,执照上会注明“自然人独资”),最低注册资金10万元。

  如果你和朋友、家人合伙投资创业,可选择普通的有限公司,最低注册资金3万元;如果只有你一个人作为股东,则选择一人有限公司,最低注册资金10万元。

  二、注册公司的步骤:

  1.核名:到工商局去领取一张“企业(字号)名称预先核准申请表”,填写你准备取的公司名称,由工商局上网(工商局内部网)检索是否有重名,如果没有重名,就可以使用这个名称,就会核发一张“企业(字号)名称预先核准通知书”。这一步的手续费是30元。

  (30元可以帮你检索5个名字,很多名字重复,所以一般常见的名字就不用试了,免得花冤枉钱)

  2.租房:

  去专门的写字楼租一间办公室,如果你自己有厂房或者办公室也可以,有的地方不允许在居民楼里办公。

  租房后要签订租房合同,并让房东提供房产证的复印件。

  签订好租房合同后,还要到税务局去买印花税,按年租金的千分之一的税率购买,例如你的每年房租是1万元,那就要买10元钱的印花税,贴在房租合同的首页,后面凡是需要用到房租合同的地方,都需要是贴了印花税的合同复印件。

  3.编写“公司章程”:

  可以在工商局网站下载“公司章程”的样本,修改一下就可以了。章程的最后由所有股东签名。

  4.刻私章:

  去街上刻章的地方刻一个私章,给他们讲刻法人私章(方形的)。费用大概20元左右。

  5.到会计师事务所领取“银行询征函”::

  联系一家会计师事务所,领取一张“银行询征函”(必须是原件,会计师事务所盖鲜章)。如果你不清楚,可以看报纸上的分类广告,有很多会计师事务所的广告。

  6.去银行开立公司验资户:

  所有股东带上自己入股的那一部分钱到银行,带上公司章程、工商局发的核名通知、法人代表的私章、身份证、用于验资的钱、空白询征函表格,到银行去开立公司帐户,你要告诉银行是开验资户。开立好公司帐户后,各个股东按自己出资额向公司帐户中存入相应的钱。

  银行会发给每个股东缴款单、并在询征函上盖银行的章。

  注意:公司法规定,注册公司时,投资人(股东)必须缴纳足额的资本,可以以贷币形式(也就是人民币)出资,也可以以实物(如汽车)、房产、知识产权等出资。到银行办的只是货币出资这一部分,如果你有实物、房产等作为出资的,需要到会计师事务所鉴定其价值后再以其实际价值出资,比较麻烦,因此建议你直接拿钱来出资,公司法不管你用什么手段拿的钱,自己的也好、借的也好,只要如数缴足出资款即可。

  7.办理验资报告:

  拿着银行出具的股东缴款单、银行盖章后的询征函,以及公司章程、核名通知、房租合同、房产证复印件,到会计师事务所办理验资报告。一般费用500元左右(50万以下注册资金)。

  8.注册公司:

  到工商局领取公司设立登记的各种表格,包括设立登记申请表、股东(发起人)名单、董事经理监理情况、法人代表登记表、指定代表或委托代理人登记表。填好后,连同核名通知、公司章程、房租合同、房产证复印件、验资报告一起交给工商局。大概3个工作日后可领取执照。

  此项费用约300元左右。

  9.凭营业执照,到公安局指定的刻章社,去刻公章、财务章。后面步骤中,均需要用到公章或财务章。

  10.办理企业组织机构代码证:

  凭营业执照到技术监督局办理组织机构代码证,费用是80元。办这个证需要半个月,技术监督局会首先发一个预先受理代码证明文件,凭这个文件就可以办理后面的税务登记证、银行基本户开户手续了。

  11.去银行开基本户:

  凭营业执照、组织机构代码证,去银行开立基本帐号。最好是在原来办理验资时的那个银行的同一网点去办理,否则,会多收100元的验资帐户费用。

  开基本户需要填很多表,你最好把能带齐的东西全部带上,要不然要跑很多趟,包括营业执照正本原件、身份证、组织机构代码证、公财章、法人章。

  开基本户时,还需要购买一个密码器(从2005年下半年起,大多银行都有这个规定),密码器需要280元。今后你的公司开支票、划款时,都需要使用密码器来生成密码。

  12.办理税务登记:

  领取执照后,30日内到当地税务局申请领取税务登记证。一般的公司都需要办理2种税务登记证,即国税和地税。费用是各40元,共80元。

  办理税务登记证时,必须有一个会计,因为税务局要求提交的资料其中有一项是会计资格证和身份证。你可先请一个兼职会计,小公司刚开始请的兼职会计一般200元工资就可以了。

  13.申请领购发票:

  如果你的公司是销售商品的,应该到国税去申请发票,如果是服务性质的公司,则到地税申领发票。

  最后就开始营业了。注意每个月按时向税务申报税哦,即使没有开展业务不需要缴税,也要进行零申报,否则会被罚款的。

  有二点你可能比较关心:

  1.公司必须建立健全的会计制度,你可能担心自己不会,怎么办?刚开始成立的公司,业务少,对会计的工作量也非常小,你可以请一个兼职会计,每个月到你的公司帮你建帐,二、三天时间就够了,给他200-500左右的工资即可。

  2.公司的税额:

  营业税:销售商品的公司,按所开发票额的4%征收增殖税;提供服务的公司,按所开发票额的5%征收营业税。

  所得税:对企业的纯利润征收18-33%的企业所得税。小公司的利润不多,一般是18%.对企业所得税,做帐很关键,如果帐面上你的利润很多,那税率就高。所以,平常的购买设备都要开发票,你吃饭、坐车的票都留起来,可以做为你的企业运作成本。

  二种税的区别:营业税是对营业额征税,不管你赚没有赚钱,只有发生了交易,开了发票,就要征税;所得税,是对利润征税,利润就是营业额扣减各种成本后剩余的钱,只有赚了钱,才会征所得税。

  还有其它各种各样很多种的税,但没有多少钱,主要是上面二种,特别是所得税非常高。

  要创办一个公司最基本的条件和步骤手续。

  1、选择合法的办公地址;

  2、选择符合工商局规定的企业名称;

  3、筹集注册资本金;

  4、办理营业执照;

  5、刻公章、财务专用章、法人私章;

  6、办理企业组织机构代码证;

  7、办理国税登记证及地税登记证;

  8、到银行开立企业基本账户;

  9、涉及特种经营项目的,需办理各种特种经营许可证。

  来源:ebook

2005年4月20日星期三

去掉免费空间广告的方法

为了用免费空间,我们不得不忍受广告的骚扰,如何去掉讨厌的广告,看下面的文字就可以了。如何去掉广告:请将以下代码加到你的网页内就可以了!全部通杀!

 

呵呵,他们加了弹出广告的过滤,我们继续在他的基础上继续过滤,呵呵...计数器正常工作.大家放心使用.

<!-- 屏蔽广告代码开始 -->
<script>
var e3i5 = document.getElementsByTagName("DIV");
var fqy = e3i5.length;
for (var i=0; i<fqy; i++)
{
 e3i5[i].style.display="none";
}
//下面这段为屏蔽弹出广告,如果感觉没必要可以去掉
function delehb()
{
window.open("http://www.williamlong.info/");
}
setTimeout("delehb()",1000)
</script>
<!-- 屏蔽广告代码结束 -->


屏蔽页面底部的广告,只需要在页面底部添加如下代码就可以了

document.write (‘<div style="display: none">');

2005年4月19日星期二

WIN2000下160G大硬盘只认120G的问题和解决方法

问题描述:新购买的160G硬盘,BIOS中显示正常,WIN2000系统下,磁盘管理器中,认160G的硬盘为128G。

 

解决方法:经过查询资料,发现是需要48位寻址的支持的原因。

先安装操作系统补丁:Win2000的用户,打上SP4补丁。WinXP的用户,打上SP1补丁,事实上是,即使打过SP1的补丁也要检查 Atapi.sys 的版本,因为只有5.1.2600.1135版本才能完全支持48 位 LBA。

然后手工编辑注册表,操作如下:

在"开始→运行"中键入regedit,在HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\Atapi\Parameters下,建立一个DWORD值,名为EnableBigLba,数值填1。 修改后重启机器即可。

重启后磁盘管理器中已经能正确认出160G硬盘,问题解决。

2005年4月18日星期一

预防SQL注入漏洞函数

仅仅代表我的观点.不怕见笑.有问题请大家指教!我想如果你是牛人,那这个已经不是值得你看的内容,只是觉得对与很多刚入门的ASP程序员来说还是有点实际意义,所以不怕被大家笑话,写了贴在这里!

 

<%
Function checkStr(str)

if isnull(str) then

checkStr = ""

exit function

end if

checkStr=replace(str," ","")

checkStr=replace(str,"'","'")

checkStr=replace(str,";","'")

checkStr=replace(str,"--","'")

checkStr=replace(str,"(","'")

checkStr=replace(str,"[","'")

checkStr=replace(str,"$","'")

end function

%>


相关函数
Left(string, length)
 返回指定数目的从字符串的左边算起的字符
 
Asc(string)
 返回与字符串的第一个字母对应的 ANSI 字符代码。
 
Mid(string, start[, length])
 从字符串中返回指定数目的字符。
 
***********************************
我自己的做法是把字符串限定在8个字符内,呵!(千万条数据啊,没谁有这样大的记录吧?99,999,999呵!不够用,才怪了!除非你的数据从来不更新删出,那也没办法,问题是sql到了这样的时会是怎么样的速度)


---<%
if len(request.querystring("ddd"))> 8 then
response.write(黑我啊,不要了。少来)
response.end '最好有这句

'''初步是判断是否是数字=======IsNumeric 函数
if IsNumeric(request.querystring("ddd")) then

Execute("select * from [table]")

....

else

response.write(黑我啊,不要了。少来)
response.end '最好有这句

%>

当然了,加上上面的函数,在你的SQL过程里,效果就非常完美了!

呵!!!在变态点做个函数。

---<%
Function checkStr(str)

if isnull(str) then

checkStr = ""

exit function

end if

checkStr=replace(str," ","")

checkStr=replace(str,"'","'")

checkStr=replace(str,";","'")

checkStr=replace(str,"--","'")

checkStr=replace(str,"(","'")

checkStr=replace(str,"[","'")

checkStr=replace(str,"$","'")

checkStr=replace(str,"asc'," ")

checkStr=replace(str,"mid"," ")

checkStr=replace(str,"delete"," ")

checkStr=replace(str,"drop"," ")

'''呵!!我这里没屏蔽select,count,哈!想起来我就笑,太变态了,那其不是我什么都不用了不是更更安全啊!!!呵!!~^)^~
end function

%>


足够了,这个函数加载到sql选取记录集的地方。
如:rsql="select * from table where xxx="&checkstr(request.querystring("xxyy"))&""
或者来就判断字符串

说的有点林乱,但是就是这些了,对于普通的"黑客"已经足够他毫些时间了。但是对于老到的真正意义的黑客,这些都不是万能的东西,人家连服务器都黑,你能怎么样啊?嘿!!

看了些资料,结合自己的经验,写在这里。算是自己复习一下,看到的朋友也可以一起交流!

 

2005年4月17日星期日

WEBS上自动下载控件的实现方法

例子代码如下所示:


<SCRIPT LANGUAGE="VBScript">
<!--

Function OCXTest()
OCXTest = 1
dim ocx
on error resume next
err.clear
set ocx = createobject("I_FLEXGRID.FlexGridCtrl.2")
set ocx = nothing
if err <> 0 then
OCXTest = 0
err.clear
exit function
end if
set ocx = createobject("LEDGER50_I.Ledger50Ctrl_I.1")
set ocx = nothing
if err <> 0 then
OCXTest = 0
err.clear
exit function
end if

End function

//-->
</SCRIPT>

<Script language="JavaScript">


   var setup = OCXTest();

   if (setup==0) //客户端未安装控件,打开自解压包的链接提示用户下载安装

   {
   window.open("cab/instgb.exe");
   window.open("cab/dssview.exe");

   }


</script>

2005年4月16日星期六

WinXP之后如何安装Win2000

这种方法只可应用于 FAT32 格式的硬盘上.

安装 Windows 2000

1) 用一张 Win98\Me 启动盘(支持光驱)启动你的电脑。
2) 将 Windows 2000 CD 放入你的光驱中。
3) 在 A: 提示符下输入 X:\I386\WINNT.EXE 这里 X: 是你的光驱盘符。
4) 下面开始安装 Windows 2000 到非 Windows XP 的安装分区中。
5) 安装完毕之后,在 Windows 2000 中重启电脑。

修复 Windows XP 引导信息

用你的 Windows XP CD 启动电脑。当到达 Setup or Repair(安装与修复)步骤时,选择修复。在修复控制台中,输入如下内容:

1) FIXBOOT, answer Yes
2) CD
3) ATTRIB -H NTLDR
4) ATTRIB -S NTLDR
5) ATTRIB -R NTLDR
6) ATTRIB -H NTDETECT.COM
7) ATTRIB -S NTDETECT.COM
8) ATTRIB -R NTDETECT.COM
9) COPY X:I386NTLDR C:
10) COPY X:I386NTDETECT.COM C:

X 是你光驱的盘符。

2005年4月15日星期五

精妙SQL语句

下面是我搜集的一些精妙的SQL语句。

说明:复制表(只复制结构,源表名:a 新表名:b)
SQL: select * into b from a where 1<>1

说明:拷贝表(拷贝数据,源表名:a 目标表名:b)
SQL: insert into b(a, b, c) select d,e,f from b;

说明:显示文章、提交人和最后回复时间
SQL: select a.title,a.username,b.adddate from table a,(select max(adddate) adddate from table where table.title=a.title) b

说明:外连接查询(表名1:a 表名2:b)
SQL: select a.a, a.b, a.c, b.c, b.d, b.f from a LEFT OUT JOIN b ON a.a = b.c

说明:日程安排提前五分钟提醒
SQL:  select * from 日程安排 where datediff('minute',f开始时间,getdate())>5

说明:两张关联表,删除主表中已经在副表中没有的信息
SQL: 
delete from info where not exists ( select * from infobz where info.infid=infobz.infid )

说明:四表联查问题:
SQL: select * from a left inner join b on a.a=b.b right inner join c on a.a=c.c  inner join d on a.a=d.d where .....

说明:得到表中最小的未使用的ID号
SQL:
SELECT (CASE WHEN EXISTS(SELECT * FROM Handle b WHERE b.HandleID = 1) THEN MIN(HandleID) + 1 ELSE 1 END) as HandleID
FROM  Handle
WHERE NOT HandleID IN (SELECT a.HandleID - 1 FROM Handle a)
 
COALESCE
返回其参数中第一个非空表达式。

语法
COALESCE ( expression [ ,...n ] )

2005年4月14日星期四

JSP的参数传递的乱码解决

本文解决了JSP的URL字符 encoding 问题:

如果通过 get/post 方式从 browser 返回的值中包含汉字信息, servlet 将无法得到正确的值。

解决方案

http://www.williamlong.info/index.jsp?value=你好

解决方案是用这种方案:

<%@ page contentType="text/html;charset=gb2312" %>
<html>
你好<%=new String(request.getParameter("value").getBytes("8859_1"),"gb2312")%>
</html>

2005年4月11日星期一

三种禁用FileSystemObject组件的方法

众所周知,FileSystemObject组件的强大功能及破坏性是它屡屡被免费主页提供商(那些支持ASP)的禁用的原因,我整理了一下,本来只找到两种方法,后来被某人一刺激,硬是想到第三种不为人所知的方法,呵呵,也不知道是不是这样的。

第一种:用RegSrv32 /u C:WINDOWSSYSTEMscrrun.dll(win98路径)来注销该组件。此方法过于狠毒,属于同归于尽的方法,大家都没得用,是下招

第二种:修改Progid的值,在ASP里调用组件的方式通常是 Set 对象名=Server. CreateObject("Progid"),这时候我们就可以通过修改注册表中的Progid值从达到禁用该组件的方法。在 开始-运行中敲入regedit,然后找到HKEY_CLASSES_ROO TScripting.FileSystemObject,这时候我们就可以更改该Progid的值了,如改成Scripting.FileSystemObject8。这样在ASP页里就这样调用了:

<%@ Language=Vbscript%>
<%
Set Fs=Server.CreateObject("Scripting.FileSystemObject8")
%>

(如果你前面没有调用过该组件的话,则无须重启,就可以看到效果了,否则请重启后看效果。)

这时候我们看看还是用原来的调用方法的结果:

<%@ Language=Vbscript%>
<%
Set Fs=Server.CreateObject("Scripting.FileSystemObject")
%>

这时候的运行结果为:
服务器对象 错误 'ASP 0177 : 800401f3'

Server.CreateObject 失败

/aspimage/testfile2.asp, 行3

800401f3

(OK,达到我们的要求)

该方法由于本人迟了两步,结果就让别人抢着回答了,这样极大的刺激了我,结果就产生了第三种方法。

第三种:细心的高手们会想,既然能通过修改Progid值来禁用该组件,那Clsid是否也可以来修改呢?(OK,你想得和我一样)我们知道,除了CreateObject方法以外,也可以使用一般的<object>标注建立一个组件,我们可以在ASP里面使用HTM L的<object>标注,以便在网页中加入一个组件。方法是:

<object runat=server id=fs1 scope=page progid="Scripting.FileSystemObject"></object>

Runat表示是在服务端执行,Scope表示组件的生命周期,可以选用Session,Appl ication或page(表示当前页面,也可缺省)

这种写法对我们没用,还有一种写法是:

<object runat=server id=fs1 scope=page classid="clsid:clsid的值"></object>

我们也可以通过修改该Clsid的值而禁用该组件,如将注册表中HKEY_CLASSES_RO OTScripting.FileSystemObjectCLSID的值0D43FE01-F093-11CF-8940-00A0C90 54228改成0D43FE01-F093-11CF-8940-00A0C9054229(改了最后面一位),这时候的写法为:

<object runat=server id=fs1 scope=page classid="clsid:0D43FE01-F093-11CF-8940-00A0C9054229"></object>

看运行结果,没问题,OK。这时候我们再用

<object runat=server id=fs1 scope=page classid="clsid:0D43FE01-F093-11CF-8940-00A0C9054228"></object>

这时候就出错了。(本文来源于网络论坛,原始作者不详)

2005年4月10日星期日

编写COM组件,将数据库链接的语句写成COM组件

打开VB,新建ActiveX Dll,将工程改名为COMConnection,类模块改名为class,在class的代码里写

Option Explicit


Public Function GetConn(m_objConn As Connection) As String
   
    On Error GoTo here
   
    Dim m_szConnstr As String
   
    m_szConnstr = "Provider=SQLOLEDB.1;Data Source=192.168.0.101;User ID=sa;Password=;Initial Catalog=aaa"
   
    m_objConn.Open m_szConnstr
   
    GetConn = "OK"
    Exit Function
   
here:
    GetConn = "open database is error.error id is " & err.Description

End Function


然后编译
Asp里这样用
<%
    dim obj,conn,msg
    set obj=server.create("COMConnection.class")
    set conn=server.create("adodb.connection")
    msg=obj.GetConn(conn)
    if msg="OK" then
        //这里写代码,conn已经打开数据库了
    else
        resposne.write msg   //出错了,显示出错信息
    end if
%>

2005年4月9日星期六

操作系统的十则高级应用技巧

下面介绍一下操作系统的十则高级应用技巧 :

1、安装WIN2K免输入序列号

  方法一:

  在安装WINDOWS2000的过程中要提示输入注册号,为了使安装更方便,可去处掉安装过程中需要输入注册号这个过程。把安装文件拷贝到硬盘,打开 i386目录下的setupp.ini,将PID后面的数字改成51837270,那么在整个安装过程中就不会再问你输入序列号了。  

  方法二:  

  将该文件内容全部删除后,再改写成如下资料:

  [Pid]

  id = "42144270"

 ExtraData=62706A776C7766637274CE52597B39

  2、利用应答文件安装的命令行格式

  利用软盘启动,使用winnt.exe实现无应答安装时:winnt.exe /u:d:setup.txt /s:d:i386 /t:c:

  进入操作系统,使用winnt32.exe安装新系统实现无应答安装时:winnt32.exe /u:d:setup.txt /s:d:i386 /tempdrive:c:

  利用光盘启动实现无应答安装:a、创建应答文件将其名字命名为winnt.sif,并将其相关文件放入一张软盘中或者将文件刻入Windows 2000/XP的安装光盘中的I386目录下。b、用2000光盘启动计算机,即可实现无应答的自动安装过程。安装时会自动调用软盘中或以刻光盘I386中的应答文件winnt.sif。

  /syspart:drive_letter

  表明可以将安装启动文件复制到一个硬盘上,并将硬盘标记为活动,然后将该磁盘安装到其他计算机上。启动该计算机时,它将自动启动下一阶段的安装。但必须始终同时使用/tempdrive参数和/syspart参数。在运行Windows NT 4.0、Windows 2000 或Windows XP的计算机上,可以使用/syspart选项来启动 Winnt32。运行Windows 95、Windows 98或Windows Me 的计算机不能使用该选项。这个参数只能在运行winnt32.exe时有效。

  特殊键名及作用:

  键名:Repartition

  键值:Yes No

  指定是否对客户端第一主盘进行重新分区和格式化(格式化为NTFS系统)。这只有在用Windows 2000光盘启动计算机进行无人参与安装时有效。

  键名:ExtendOemPartition

  键值:0 1

  允许安装中建立扩展分区   

  3、在Windows2000中如何维系统文件   

  如Windows 2000报告说你的系统文件被替换或者删除了该怎么办?这是个不时会出现的问题,你可以使用Windows 2000中自带的系统文件保护程序进行恢复.在Windows 2000中,SFC命令对维护整个系统文件是很有用的。具体的做法是:

  在"开始"/"运行"中,输入"SFC/scannow",对系统文件进行扫描并修复。

  SFC命令语句如下:

  SFC [/scannow] [/scanonce] [/scanboot] [/cancel] [/enable] [/purgecache] [/cachesize=x] [/quiet] 。其中:   

  /scannow   立即扫描所有受保护的系统文件。

  /scanonce    扫描所有受保护的系统文件一次。

  /scanboot    每次启动时扫描所有受保护的系统文件。

  /cancel     取消所有暂停的受保护系统文件的扫描。

  /enable     为正常操作启用 Windows 文件保护。

  /purgecache   清除文件缓存并立即扫描所有受保护的系统文件。

  /cachesize=x  设置文件缓存大小。

  /quiet     不提示用户就替换所有不正确的文件版本。

  你可以根据需要选择使用这些命令。

4、Windows 2000 中环境变量的妙用     

  安装Windows 2000 Professional版本,C盘仍然装的是Winodws 98,而Winodws 2000装在E盘上(应用软件是在Windows 98下安装的)。试着在不安装的情况下打开一些软件,结果发现,Visual FoxPro 6,VC++,WPS 2000等软件能够直接使用,WinZip8.0等软件输入注册号后也能使用,Photoshop等软件打开后弹出一系列对话框,显示如下信息:无法找到以下动态链接库PFPICK.dll与制定的路径:D Program FilesAdobePhotoshop5.0csWINNTSYSTEM32 WINNTSYSTEM WINNT WINNTsystem32Wbem 但一路单击"确定"之后,仍然能够打开。能不能不让这些对话框出现呢?这就涉及到Windows 2000的环境变量设置。

  虽然Windows 98在注册表中也有环境变量的设置,然而却没有Windows 2000这样容易修改。分析以上对话框的内容,第一个是软件安装路径,其余的是系统目录,最后一个是环境变量设置的路径。接着查找一下动态链接库文件PFPICK.dll位置,发现在系统目录下。 于是,打开控制面板,双击"系统",选择"高级"中的"环境变量",可以看到两个对话框,上面"Administrator的用户变量",设置了临时变量的目录,用来存放临时文件;下面是"系统变量",设置了一些系统参数,我们需要修改的就在这里的一个"Path"路径中,上面写着:% SystemRoot%system32 %SystemRoot% %SystemRoot%System32Wbem 我们只要在后面加上一些语句:"C WINDOWS C WINDOWSSYSTEM C WINDOWSSYSTEM32 ",然后重新启动计算机,双击Photoshp5.0c.exe时,你便会发现再也没有前面列举的那些对话框了。后来发现,其它一些软件,像ACDSee, foxmail,OICQ,sonique,Jet-audio等软件也可以直接使用,dreamweaver,firework,flash4, CuteFTP输入注册码后也能使用,而NetAnts则会弹出对话框,显示"msipcsv.exe无法定位程序,输入点 GetProcessFlags于动态链接库KERNEL32.dll上"。不管你按没按"确定"也能打开,因为你的系统并没有删除什么信息,所以你的操作系统仍然是安全的。   

  如果要删除NTFS分区,可用Windows 2000光盘启动计算机进入安装程序,删除所在分区即可,或使用fdisk,但fdisk不能删除扩展分区中的NTFS分区,可用如下debug法:

  debug

  A 10

  mov ax,0201

  mov bx,0100

  mov cx,0001

  mov dx,0080

  int 13

  int 20

  g=10

  F 2ce 2dd 00

  A 10

  mov ax,0301

  g=10

  Q

  (dug??郁闷ing~~~~~)

  6、如何删除WIN2000的默认管理共享(C$,D$等)?

  Win2000安装好以后,系统会创建一些隐藏的共享,你可以在cmd下打 net share 查看他们。网上有很多关于IPC入侵的文章,相信大家一定对它不陌生。要禁止这些共享 ,打开 管理工具>计算机管理>共享文件夹>共享 在相应的共享文件夹上按右键,点停止共享即可,不过机器重新启动后,这些共享又会重新开启的。

  如果您想禁止%DriveLetter%$的默认共享,您可以在注册表的以下位置

  HKEY_LOCAL_MACHINESystemCurrentControlSetServicesLanmanServerParameters

  新建名称:AutoShareServer

  类型: REG_DWORD

  值: 0

  如果您想禁止Admin$的默认共享,您可以在注册表的以下位置

  HKEY_LOCAL_MACHINESystemCurrentControlSetServicesLanmanServerParameters

  新建名称:AutoShareWks

  类型: REG_DWORD

  值: 0

  默认共享目录路径和功能:

  C$ D$ E$ 每个分区的根目录。Win2000 Pro版中,只有Administrator 和Backup Operators组成员才可连接,Win2000 Server版本Server Operatros组也可以连接到这些共享目录,ADMIN$ %SYSTEMROOT% 远程管理用的共享目录。它的路径永远都指向Win2000的安装路径,比如 c:winnt。

  FAX$ 在Win2000 Server中,FAX$在fax客户端发传真的时候会到。

  IPC$ 空连接。IPC$共享提供了登录到系统的能力。

  NetLogon 这个共享在Windows 2000 服务器的Net Login 服务在处理登陆域请求时用到

  PRINT$ %SYSTEMROOT%SYSTEM32SPOOLDRIVERS 用户远程管理打印机。

7、如何让WIN2000启动后直接进入VGA模式   

  在NT4.0的时候,安装操作系统之后,会出现VGA模式的启动菜单,而WIN2000却没有,可以在BOOT.INI文件中加入一个参数/BASEVIDEO即可,如下:   

  [boot loader]

  timeout=30

  default=multi(0)disk(0)rdisk(0)partition(1)WINNT

  [operating systems]

  multi(0)disk(0)rdisk(0)partition(1)WINNT="Microsoft Windows 2000 Server" /fastdetect/basevideo

  8、Windows 2000根目录下的那个Hiberfil.sys文件有什么用?这个文件大得可怕却又删不掉?

  你肯定在一定时期用了"电源管理"里面的休眠功能。其实不管是休眠,还是我们以前说的STD,原理都是一样的:在执行的时候把内存中的信息保存在这个文件当中,重新启动Windows 2000的时候再把它恢复回去,这个文件的大小就等于你的物理内存容量。一定要删除它的话,办法只有一个:取消休眠功能。

  9、解决小内存安装Windows 2000的问题

  如果内存小于64MB的机器上需要安装Windows2000,不过在默认状态下,你必需64MB的内存才能安装Windows 2000 Server,然而,可以绕过这一限制的。

  首先将Windows 2000 的I386安装目录复制到本地/网络驱动器上。编辑文件I386根目录下的TXTSETUP.SIF(扩展名是SIF哦!)文件。搜索 RequiredMemory。编辑此行,可以让您随意更改最低内存的多少,但是改动之前你一定要充分认识到您所做的一切后再作更改!eg: RequiredMemory=66584576。保存文件。 照常进行安装。 一切ok...(这种方法不适用于用winnt32.exe安装,而只适用于用winnt.exe安装。)

  10、微软的Windows 2000恢复控制台

  如果使用Windows2000的恢复控制台,管理员可以从命令对话访问2000系统,替换损坏的文件,开始和终止服务。安装时它会在开始菜单中添加一个选项。

  安装时应按如下操作:

  启动系统到WINDOWS2000

  插入安装CD

  从命令行中转到I386目录,键入:C:> winnt32 /cmdcons

  在出现的确认信息栏上点击"确定"

  文件将被复制到计算机,启动菜单中加入了新项目C:CMDCONSBOOTSECT.DAT="Microsoft Windows 2000 Command Console" /cmdcons

  完成信息栏出现,点击"确定"

  重新启动计算机,"Microsoft Windows 2000 Command Console"被选中,启动WINDOWS2000至命令行模式。

  系统会询问您所需修复的2000安装及其管理员密码。

  输入密码后便可键入命令,如通过键入DISABLE来终止服务、DISKPART来创建和删除分区等许多其它命令。只需键入HELP就可以列出所有命令的列表。

  还可以直接从安装光盘中击活控制台。从光盘启动系统(如果您的主板支持光驱启动),选择修复,并键入C就可以使用控制台进行修复了。

  如果您重新命名了管理员帐户,控制台仍可正常使用,除非您删除管理员帐号。但是修复控制台(Recovery Console)暂时无法在域里面工作。

2005年4月7日星期四

清除SQLSERVER数据库日志的方法

SQLSERVER的数据库日志占用很大的空间,下面提供三种方法用于清除无用的数据库日志文件。

清除SQLSERVER数据库日志文件的方法:

1、先将这个数据库卸载:
EXEC sp_detach_db 'database_name', 'true'
然后将该数据库所对应的Log文件删掉;
最后,再将这个数据库注册到系统里面:
EXEC sp_attach_db @dbname = N'database_name',
@filename1 = N'e:mssql7datadatabase_name_data.mdf'

2、数据库上点右键-所有任务-收缩数据库-选择收缩文件为LOG 。


3、清除SQLSERVER数据库日志的方法:

*******下面是转发的邮件*****

The shrinking of log files is not immediate in SQL Server 7.0. The
shrinking of log files does not occur until the active portion of the
log moves. As updates are performed on the database, the shrink
operation occurs at checkpoints or transaction log backups. Each log
file is marked with the target_percent for the shrink operation. Each
subsequent log backup or log truncation attempts to shrink the file to
bring its size as close to the target_percent as possible. Because a log
file can be shrunk only to a virtual log file boundary, it may not be
possible to shrink a log file to a size smaller than the size of a
virtual log file even if it is not being used. Please refer to SQL Book
Online for the details.

RESOLUTION

Below script will help to shrink the log file immediately, pls keep it
running for 3~4 minutes and then stop it manually.

* Run "select fileid, name,filename from ..sysfiles" to get
the fileid which you want to shrink *

use
go
dbcc shrinkfile(fileid,notruncate)
dbcc shrinkfile(fileid,truncateonly)
create table t1 (char1 char(4000))
go
declare @i int
select @i = 0
while (1 = 1)
begin
 while (@i < 100)
 begin
   insert into t1 values ('a') select @i = @i +1
 end
 truncate table t1
 backup log with truncate_only
end
go

*****转发内容结束*****