2006年02月_EricYeung

原创我有用心读过且有收获的书，原来我是这样成长的。

//按出现时间先后安徒生童话选集郑渊洁的十二生肖童话雷锋日记圣斗士漫画龙珠漫画戊戟（岭南的作家）的小说：《武林传奇》等金庸的小说：《射雕英雄传》等古龙的小说：《大路英雄传》等谭浩强《C语言程序设计》《离散数学及其应用》译版Bruce Eckel 的《C++编程思想》春上村树《挪威的森林》佛洛伊德《精神分析及其导论》《Core Java》e5

2006-02-22 23:07:00 1289

原创 Web Mail Cgi

#! c:/perl/bin/perl.exeuse strict;use CGI;use Net::SMTP;my $q = new CGI;my $smtp = Net::SMTP->new(localhost);my $address = "webmaster/@rc3.org";my $err = "";my ($from, $subject

2006-02-22 22:18:00 1495

原创 A Cgi Get Cookies

#! c:/perl/bin/perl.exeuse CGI qw/:standard *table/;use strict;print header;print start_html(cookies);print h3(Cookies);print start_table(-border=>"1");print Tr([ th([name, va

2006-02-22 22:16:00 1070

原创 Guest Book Cgi

#!c:/Perl/bin/Perl.exeuse strict; # enforce declarations and quotinguse CGI qw(:standard); # import shortcutssub bail { # function to handle errors gracefully my $error = "@_"; pri

2006-02-22 22:14:00 4523

原创 Upload File Cgi Sample

#! c:/perl/bin/perluse CGI;$q = new CGI;$upload_dir = "portraits";if ($q->param(portrait)) { &print_page_start; &write_file; &print_page_end;}else { &print_page

2006-02-22 22:11:00 1588

原创 A Cgi Set Cookies

#! c:/perl/bin/perl.exeuse CGI qw/:standard/;$cookie = cookie(-name=>menus, -value=>on, -expires=>+30d, -path=>/);print header(-cookie=>$cookie);print start_html(-

2006-02-22 22:05:00 1012

原创 A Cgi print Environment Variables

#!c:/Perl/bin/Perl.exeuse CGI;$q = new CGI;print $q->header;foreach $var (sort(keys(%ENV))) { $val = $ENV{$var}; $val =~ s|/n|//n|g; $val =~ s|"|//"|g; print "${var}=

2006-02-22 22:04:00 875

原创 First Perl CGI Example

#!c:/Perl/bin/Perl.exeuse strict;use CGI qw(:standard);print header, start_html(a simple cgi), h1(a simple example), start_form, "whats you name?", textfield(name)

2006-02-22 22:00:00 1277

原创 my _vimrc

set nocompatiblesource $VIMRUNTIME/vimrc_example.vimsource $VIMRUNTIME/mswin.vimbehave mswinset diffexpr=MyDiff()function! MyDiff() let opt = -a --binary if &diffopt =~ icase | let opt = opt .

2006-02-22 21:47:00 1514

原创 Keiko Matsui 松居庆子

很喜欢keiko的爵士钢琴。低音Bass和清脆的钢琴结合，真的是入耳即溶。喜欢的专辑>http://www.keikomatsui.com/

2006-02-22 14:01:00 1119

原创 [Code Collection] 显示系统错误信息

unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) Button1: TButton; proced

2006-02-17 17:14:00 919

原创 [Code Collection] 枚举进程

unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, StrUtils, Tlhelp32, Psapi;type TForm1 = class(TForm) Bu

2006-02-17 17:13:00 1031

原创 [Code Collection] 模拟点击另一窗口的按钮

unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) btnGo: TButton; edtTitle

2006-02-17 16:37:00 1189

原创 [Code Collection] 定时启动notepad.exe

unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls, IdGlobal;type TForm1 = class(TForm) btnStart:

2006-02-17 16:23:00 1025

原创 [Code Collection] 枚举DLL的Export Functions

unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) Memo1: TMemo; OpenDialog

2006-02-17 16:19:00 1080

原创 [Code Collection] 枚举LAN中的资源

unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ComCtrls, StdCtrls, ImgList;type TForm1 = class(TForm) TreeView1:

2006-02-17 16:15:00 936

原创用linked list 来理解Decorator 模式

/* * decorator in linked list s point of view ?????? */class TestClass { String desc; TestClass tc; public TestClass(TestClass tc, String desc) { this.tc = tc;

2006-02-13 12:04:00 1013

Trending Up...