精彩收藏－－收集所有我感兴趣的

好久没有登录blog了，试试能发不。

2010-02-26T22:48:00.001-08:00

不能上blog，真是杯具。。。

innosetup对bde打包安装

2007-09-13T20:57:00.001-07:00

一个朋友拿来一套软件，让我帮着做一个安装程序，这套软件是用Delphi开发的，其中用到了BDE，因此要求把BDE也一起打包安装。

我没用过BDE，更加不熟悉BDE的组成，刚开始不知道如何下手。由于我习惯使用InnoSetup来制作安装程序，便想到在InnoSetup的网站上也许有相关的介绍。于是登录InnoSetup的网站，在FAQ中找到了解决办法，现总结一下：

一、首先，在InnoSetup的网站上下载BdeInst.cab、MiniReg.exe、AddAlias.exe三个程序，其中BdeInst.cab就是BDE的安装包，其中只包含BdeInst.dll一个文件，有3兆多，将它提取出来。

二、将BdeInst.dll、MiniReg.exe、AddAlias.exe与要安装的应用程序放在一起。

三、在制作好的InnoSetup脚本中的相关节中加入以下内容：

[Files]
Source: "BdeInst.dll"; DestDir: "{tmp}"
Source: "MiniReg.exe"; DestDir: "{tmp}"
Source: "AddAlias.exe"; DestDir: "{tmp}"

[Run]
Filename: "{tmp}\MiniReg.exe"; Parameters: """{tmp}\BdeInst.dll"""
Filename: "{tmp}\AddAlias.exe"; Parameters: """Alias SubDir Driver"""

经过这样的改动，制作出来的Setup.exe就可以将应用程序连同BDE一块安装了。

之所以要用到MiniReg.exe和AddAlias.exe，是因为BdeInst.dll其实是一个COM组件，拷贝到用户机器上以后还需要注册一下才能用，MiniReg.exe就是做这个工作的，它的功能类似RegSvr32（不明白为什么不直接使用RegSvr32）， MiniReg.exe是用Delphi编写的，源程序很短，顺便列在下面：

// FileName: MiniReg.dpr
program MiniReg;
{
MiniReg v1.0 by Jordan Russell

Note: For Delphi 3+, you'll need to change "OLE2" below to "ActiveX".
}
uses
Windows, OLE2; // ActiveX

{x$R *.RES}

procedure RegisterServer(const Filename: String);
var
LibHandle: THandle;
RegisterServerProc: function: HRESULT; stdcall;
begin
LibHandle := LoadLibrary(PChar(Filename));
if LibHandle <> 0 then
try
    @RegisterServerProc := GetProcAddress(LibHandle, 'DllRegisterServer');
    if Assigned(@RegisterServerProc) then
      RegisterServerProc;
finally
    FreeLibrary(LibHandle);
end;
end;

begin
if ParamCount <> 1 then
    Exit;
CoInitialize(nil);
try
    RegisterServer(ParamStr(1));
finally
    CoUninitialize;
end;
end.

AddAlias的作用是向BDE注册一个别名，指向要连接的数据库(类似ODBC的数据源)，它运行时需要三个命令行参数，分别是：别名、子目录名、驱动名。AddAlias也是用Delphi写的，源代码如下：

// FileName: AddAlias.dpr
program AddAlias;
{
program adds a alias to the BDE configuration file

parameters:
    0: programname + path (standard parameter of OS)
    1: Name of alias
       if begins with '-' then delete first if exist
                         else do nothing if exist
    2: path to data directory
    3: BDE driver name

Bugfix: Savierhs Lopez Arteaga 3.1.2001
AddAlias didn't delete alias with beginning '-'
}

uses
Windows, SysUtils, BDE;

var
GAlias:    string = 'New';
GDriver:   string = szPARADOX;
GAliasDir: string;
FParams:   string;
FDrvName: string;
FDelete:   boolean;
i:         integer;

function StrToOem(const AnsiStr: string): string;
begin
SetLength(Result, Length(AnsiStr));
if Length(Result) > 0 then
CharToOem(PChar(AnsiStr), PChar(Result));
end;

begin
for i := 1 to ParamCount do
begin
    case i of
      1: GAlias    := ParamStr(1);
      2: GAliasDir := ParamStr(2);
      3: GDriver   := ParamStr(3);
    end;
end;

//default alias
if GAliasDir = '' then GAliasDir := ExtractFilePath(ParamStr(0))+'Data';

//should delete alias first? separate alias name
if GAlias[1] = '-' then
begin
    FDelete := True;
    //GAlias := Copy(GAlias, 1, Length(GAlias)); Bug
    Delete(GAlias, 1, 1); //Fix by Savierhs Lopez Artega
end else FDelete := False;

FDrvName := GDriver;
//set Parameters, the driver and server name
if (CompareText(GDriver, szCFGDBSTANDARD) = 0) or
     (CompareText(GDriver, szPARADOX) = 0)       or
     (CompareText(GDriver, szDBASE) = 0)         or
     (CompareText(GDriver, szFOXPRO) = 0)        or
     (CompareText(GDriver, szASCII) = 0)         then
begin
    if (CompareText(GDriver, szCFGDBSTANDARD) = 0) then FDrvName := szPARADOX;

    //set parameters for the new alias
    FParams := Format('%s:"%s"', [szCFGDBPATH, GAliasDir]) +
               Format(';%s:"%s"', [szCFGDBDEFAULTDRIVER, GDriver]) +
               Format(';%s:"%s"', [szCFGDBENABLEBCD, szCFGFALSE]);
end else begin
    if (CompareText(GDriver, 'INTRBASE') = 0)
    then FParams := Format('%s:"%s"', [szSERVERNAME, GAliasDir])
    else FParams := Format('%s:"%s"', [szDATABASENAME, GAliasDir]);

//add other Parameters here !!!!!!!!!!!!!!!!!
end;

DbiInit(nil);
try
    if FDelete then
      try
        DbiDeleteAlias(nil, PChar(GAlias));
      except
      end;

    try
      DbiAddAlias(nil, PChar(StrToOem(GAlias)),
                       PChar(StrToOem(FDrvName)),
                       PChar(FParams), True);
      DbiCfgSave(nil, nil, True);
    except
    end;

finally
DbiExit();
end;

end.

杂感：

一、InnoSetup这个安装制作工具非常好用，它短小精致、公开源码、无需注册可免费使用，能满足绝大多数需要，我经常向人建议抛弃InstallShield这个庞然大物，使用InnoSetup。

二、原来的印象中，BDE也是个庞然大物，有10兆之巨，但这次的安装包只有3兆，很出乎意料。

信息周刊：宝洁公司拥抱Web2.0宝洁|web2.0| - 使用 Google 工具栏进行发送

2007-07-11T02:19:00.000-07:00

信息周刊：宝洁公司拥抱Web2.0宝洁|web2.0|

雷

富礼(A.G. Lafley)自2000年担任宝洁公司(P&G，下称宝洁)的首席执行官(CEO)后，便不遗余力地推动公司员工改善彼此间以及与合作伙伴之间的合作方式，以更迅捷地开发出新产品。既得到了CEO的全力支持，现在又有无数的Web 2.0工具可供选择，乔・舒尔勒(Joe Schueller)还有可能面临哪些问题呢?他肩负着在宝洁公司部署、应用新协作工具的重任。

　　电子邮件算得上一个，舒尔勒将之形容为阻碍宝洁员工应用交互式更强、也更有效的工具的最大障碍。"作为邮件的发送者，我控制着身边每个人的日程安排，"舒尔勒表示。电子邮件的发送者可以决定，谁能阅读某个消息;而"回复所有人"按钮所确保的，只是在周围所有参与者都完全丧失兴趣之后才对之发出提示。相形之下，网络日志(Blog)所寻求的则是那些兴趣最为浓厚的人的反馈意见。同时，舒尔勒还得面对来自某些员工的不满之声，这些人将处理电子邮件以外的任何事都视为加重了其工作负担。"我们接连不断地听到这样的抱怨：即往内部网上发帖是额外工作。"他补充道。

　　在前不久于波士顿举行的Enterprise 2.0大会上，商业科技主管们已经结束了新概念的探讨，开始寻求部署实用技术。"一年前，我曾会晤过一些入选《财富》杂志前25名CEO的人，那时他们对Wiki一无所知。"现在，他们开始问我如何将Web 2.0工具与其现有内容管理系统集成起来。开源系统集成商SpikeSource公司CEO金・波莱斯(Kim Polese)介绍说。SpikeSource销售的Web 2.0工具包括Movable Type Blog和Socialtext Wiki。

　　宝洁根据自己的项目范围及其从初创公司和知名厂商选购Web 2.0工具的途径，就如何发展Enterprise 2.0进行了研究。2005年，宝洁制定了以微软公司(Microsoft，下称微软)产品为核心的部署计划，该计划包括采用即时通讯、统一通信、以及实时通讯Live Communications Server等;网络会议采用Live Meeting;内容管理和协作通过SharePoint实现。现在，约有8万名宝洁员工使用微软IM系统，另外2万名已经迁移至Outlook。宝洁还有几个采用微软SharePoint技术的网站，并将于8月开始大规模部署该技术。

　　去年，在首席信息官(CIO)菲力波・帕瑟里尼(Filippo Passerini)的支持下，舒尔勒出任宝洁Enterprise 2.0计划的负责人，该计划旨在帮助宝洁员工应用更为多样化的工具集。目前，宝洁已部署了Movable Type网络日志软件，并且员工们已开始应用该软件创建了几百个网络日志;其中包括，公司设计副总裁由于受到了通用汽车公司(GM)设计大师鲍勃・鲁兹(Bob Lutz)的网络日志启发，而建立的网络日志;此外，公共关系部门也围绕着如何与外界讨论公司问题而创建的网络日志;当然，还有舒尔勒自己的网络日志，读者多为IT人员。未来几个月内，宝洁还会发布社会网络，以使员工更便捷地找到具有某种专业特长的人。

　　即使微软和国际商业机器公司(IBM)都在不断扩充各自产品的Web 2.0协作特性，比如莲花(Lotus)的Connections和微软的SharePoint Server 2007等社会网络工具都支持网络日志、Wiki、以及日历共享，但许多公司仍然下结论说：仅靠单一平台是远远不够的。

　　"如果做什么事都用微软的东西，这对你的系统模块性和灵活性意味着什么呢?"舒尔勒表示，他的头衔是宝洁公司全球商业服务部门的创新经理。"我不会全部选用微软的产品，老是那些大厂商。"而且，IT部门还需要学会如何集成员工自行引入的工具，他补充道。

　　超越谷歌和微软

　　在企业搜索领域，宝洁所瞄准的也不仅仅是其主要的供货商。该公司现在用的是谷歌公司(Google)的搜索产品，但是舒尔勒发现，网页等级背后隐含的概念，即基于链接的相关性，对企业而言并非始终都能说明问题，这是由于企业内部的信息并非总是建有链接。此外，他也担心，谷歌搜索过于依赖关键词，而对于那些描述得含混不清的想法，如果没有准确捕捉其中的一两个单词，那很可能就会无功而返。

　　因此，宝洁开始测试Connectbeam公司的产品，该产品可与谷歌搜索一同使用。企业员工可使用Connectbeam产品，共享书签、标签文章、页面、以及带描述性词汇的文档。如果某个员工用谷歌工具搜索某些内容，Connectbeam系统会将结果――相关的标签和书签，与谷歌搜索结果一同返回。

　　同时，宝洁也开始修复其基于BEA系统的门户网站，添加新闻和商业信息类RSS种子，以帮助用户对网站进行个性化。该公司希望，随着时间的推移，他们可据员工的岗位和其经常访问的网站，为之推荐所需的种子。

　　但是，如果这些工具被视为额外工作的话，舒尔勒怎么才能让所有人参与进来，都使用这些工具呢?

　　思路之一，是以相对宽松的视角看待今天人们做事的方法，进而提供能助其实现此过程的工具。舒尔勒举了一个例子，宝洁的一名主管，每当其出差去会晤某个区域经理时，都会将所获取信息做到PowerPoint文件中，然后再将这些文件通过电子邮件发给其他人。与此不同，IT部门在微软SharePoint中建立了一个页面，主管可于此张贴其演示文档，这些文档会被存成远比电子信箱更为高效的数据格式。

　　CIO帕瑟里尼(Passerini)对于如何评估Web 2.0工具对于宝洁的重要性所持的战略一向是，"先让我们试试再说，"让IT团队先拿这些新技术试验一下，并且每个Web 2.0产品区域由不同的IT经理管理，舒尔勒介绍道。而IT团队亦将此视为改变自身地位的一个良机，因为在宝洁，地位举足轻重的是是品牌经理而非技术专家。"IT部门，特别是在一家生产肥皂的公司，只是后台支持的角色，"舒尔勒不无调侃地说道。他接着表示，"现在，我们大显身手的时机到了。"

　　其他公司的IT部门也将这一轮Enterprise 2.0热潮视为自己出人头地、扬眉吐气的大好机会。出席Enterprise 2.0大会的上百家组织中，赫然在内的就有美国银行(Bank of America)、中央情报局(CIA)、联邦快递公司(FedEx)、摩根士丹利银行(Morgan Stanley)、以及辉瑞制药公司(Pfizer)等知名组织。

　　摩托罗拉公司(Motorola)是部署Web 2.0技术的先行者之一。迄今，该公司已用Scuttle软件建立了4,400个网络日志，4,200个Wiki页面，并且有2,600人积极对内容进行分类，而访问该系统的人数更多。摩托罗拉发起了一项名为Intranet 2.0的运动，Web 2.0工具大多被用于研究和信息共享，而销售人员则利用这些工具，针对每个客户都开发出一套全新的销售办法，他们还可重新利用发表在Wiki上的任何销售方法。使用Visible Path公司的社会网络软件，或者通过查看Wiki上的作者页，摩托罗拉员工还能轻而易举地发现具有某些特长的人。"这种办法，确实能让人们以新的视角看问题，如他们会看到聪明人和与自己相似的人是如何处理问题的。"摩托罗拉公司负责Enterprise 2.0技术的副总裁托比・莱德肖(Toby Redshaw)指出。依此思路，该公司开始围绕某些特定的问题和产品建立知识中心。

　　这也是舒尔勒的最终目标，员工及合作伙伴可以在企业内部网上搜索信息，创建档案，对文档进行分类，并共享书签，所有这些都会提升网站内容的价值。无论你叫它作社会软件还是用户创建的内容，其中的风险在于如果人们发现这些Web 2.0工具不那么好用，他们便不会为丰富内容贡献自己的一份力量，而这恰是构建整个完美周期所不可或缺的。IT团队需要把握住这个关键机会，向人们证明花时间在Web 2.0上是值得的。就像一名IT主管在Enterprise 2.0大会上所阐述的那样，"如果他们接受Web 2.0，他们就能将之用起来。"

SQL2005报表参数大于2K问题的终极解决方案 - 技术频道 | IT168 - 使用 Google 工具栏进行发送

2007-06-18T00:29:00.001-07:00

SQL2005报表参数大于2K问题的终极解决方案 - 技术频道 | IT168

SQL2005报表参数大于2K问题的终极解决方案

[ 收藏此页] [打印]

作者：AnyJack 2007-06-15

内容导航：

第1页

第1页：第1页

【IT168 技术文档】

当通过表单提交信息给报表服务时，当参数值大于2K时，这时如果加入显示工具条参数时，IE会返回该页无法显示这样的错误信息，而如果不加显示工具条参数时，结果正常，但是就是没有工具条.

问题反馈：

据微软的专家说这是SQL2000/SQL2005的BUG，真是奇怪了，SQL2005研究了5年才发布，居然这一BUG依然保留，可以想象这是多么大的一个技术难题。

解决思路：

据微软提供的建议，建议编写一个自定义的报表工具条。

解决办法：

首先确定报表工具条的作用，它的作用是用于翻页和导出报表数据到其它类型的文档。可以看出，技术难点在于翻页，也就是当前报表总页数的获取。那么如何才能获得带指定参数的指定报表的页数呢？微软的建议是通过报表服务的WEB服务接口来获取，当服务器上装了报表服务时，也就相应的存在了报表服务的WEB服务接口，一般访问地址如下： http://****/reportserver/reportservice.asmx

通过这一公开的WEB服务，调用其相应功能可以实现报表服务的N多的功能，获取页数只是其中微不足道的功能之一，实现代码如下：

  public int GetNumber()
   ... {  string deviceinfo  =@"<DeviceInfo><Toolbar>False</Toolbar></DeviceInfo>"  ; string[] parameters  =_parameter.Split('&'  ); int parameterNumber  =parameters.Length;
RS.ParameterValue[] param =new  ReportNumber.RS.ParameterValue[parameterNumber]; for(  int i=0;i< 
parameterNumber;i++)
   ... { string[] p  =parameters[i].Split('='  ); param[i]=new   ParameterValue(); param[i].Name=p[  0];
param[i].Value= p[ 1];
 } RS.ReportingService rs=new   ReportNumber.RS.ReportingService();
rs.Url= this ._url+@"/ReportService.asmx"  ;   /**/ /*      注意，如果你的报表服务器和应用服务器不处于同一机器，那么你必须提供访问报表服务器的凭证，如下面的凭证是通过使用Negotiate 验证来传送用户名、密码。当然，如果2个服务器在同一台机器，那就非常简单了，直接使用本地凭证验证即可

  */ CredentialCache cache =   new CredentialCache();
cache.Add(new  Uri(rs.Url),  "Negotiate", new   NetworkCredential("administrator",   "crserver",   ""));
rs.Credentials =  cache;
  /**/ /*  rs.Credentials=System.Net.CredentialCache.DefaultCredentials;
 */ DataSourceCredentials[] credentials=null  ;
string  showHideToggle =null;
 string encoding;
string  mimeType;
Warning[] warnings=null  ; ParameterValue[] reportHistoryParameters=null  ;
string [] streamIDs =null;
SessionHeader sh =new  SessionHeader(); rs.SessionHeaderValue=sh;
 string historyID =null;
 byte[] result  =rs.Render(ReportName,"HTML4.0"  ,historyID,deviceinfo,param,credentials,showHideToggle,out encoding,out   mimeType,out reportHistoryParameters,out warnings, 
out streamIDs);
 string s =System.Text.UTF8Encoding.UTF8.GetString(result,0,result.Length  -1);
 string r =@"<hr/>";
 Regex regex=new  Regex(r); MatchCollection mc=regex.Matches(s);
 return mc.Count +1;
 }

母亲节送什么礼物最好？_百度知道 - 使用 Google 工具栏进行发送

2007-05-11T19:15:00.001-07:00

母亲节送什么礼物最好？_百度知道

母亲节，为老妈准备礼物？其实，你真的不用为此大伤脑筋，因为能让老妈最快乐的事莫过于全家人的团圆与平安。一枝鲜丽的康乃馨，一顿可口而轻松的团圆饭，这就是对老妈最好的礼物。

敬重母亲、弘扬母爱的母亲节，至今已成为一个约定俗成的国际性节日。
母亲节起源于美国。1906年5月9日，美国费城的安娜・贾薇丝的母亲不幸去世，她悲痛万分。在次年母亲逝世周年忌日，安娜小姐组织了追思母亲的活动，并鼓励他人也以类似方式来表达对各自慈母的感激之情。此后，她到处游说并向社会各界呼吁，号召设立母亲节。她的呼吁获得热烈响应。1913年5月10日，美国参众两院通过决议案，由威尔逊总统签署公告，决定每年5月的第二个星期日为母亲节。这一举措引起世界各国纷纷仿效，至1948年安娜谢世时，已有43个国家设立了母亲节。
日本的母亲节也是5月的第二个星期日。节日里人们送给母亲一枝红石竹，表示祝贺。
法国首次庆祝母亲节是在1928年，节日定在5月的最后一个星期日。节日这一天，数以百万计的妈妈们，怀着喜悦的心情接受各自子女们的"节日愉快"的美好祝愿。
泰国于1976年宣布8月12日为母亲节。这一天也是泰王后丽吉的生日。节日里，全国要开展"优秀母亲"的评选活动。儿女们手持芳香馥郁的茉莉花，献给自己的母亲。

康乃馨-
象征母亲的花。
别名：香石竹
植物分类：石竹科。
园艺分类：多年生草本。
原产地：地中海一带。
花色：红、深红、紫、
紫红、桃红、粉红、黄、
乳黄、橘红、白以及镶边
、斑点等复色。
栽种条件：康乃馨需植于
开放且具全日照的地点，
且富含腐植质、排水性、
中性至碱性土壤。
真情不变

组成： 11枝粉色康乃馨,1枝多头白香水百合,满天星,排草，内层粉色绵纸包装,外层粉色皱纹纸包装,淡紫色缎带打结.圆形花束.

永恒的爱

组成： 20支粉色康乃馨，绿叶，石松、满天星、粉红色布纹包装纸、红色丝带

吾爱吾家

组成： 5枝金百合+5枝玫瑰+2枝非洲菊给你一个心灵的港湾，给你一个永远的归宿，家，你不悔的选择！

母恩永远

组成： 2枝火百合+18枝康乃馨您曾说坚持虽不一定成功，但放弃的结果一定是失败。

给母亲的爱

组成： 18枝康乃馨+满天星

灿烂笑容

组成： 16枝非洲菊+6枝紫鸢花

幸福安康

组成： 4枝火百合+18枝红色康乃馨+黄莺总让你担心的我祝妈妈一生幸福！

深谷幽兰

组成： 6枝洋兰+星花是您给我的感觉

请问脚上长了瘊子怎么治疗啊？_百度知道 - 使用 Google 工具栏进行发送

2007-05-07T06:13:00.001-07:00

请问脚上长了瘊子怎么治疗啊？_百度知道

瘊子偏方大全

螳榔可治瘊

去年6月，我脸上、手上长出了很多瘊子，越长越大，已类似黄豆。到处求医无效，无意中听到有人议论螳螂能吃瘊子，便试验起来：用手捏住螳螂颈部，使它的嘴对准瘊子，它马上大口大口地吃起来，很快瘊子就被它吃掉，当然要流点儿血，但不疼。这时用清水对伤口进行冲洗，并用纱布擦掉血迹，几分钟后不再流血，两二天伤口就会愈合。至今已一年，一个瘊子也没再长。

香蕉皮可治瘊子

我曾得到一个小偏方：用香蕉皮敷在疣（俗称瘊子）的面，使其软化，并一点点地脱落，直至痊愈。我用这个方法已将我头及脸部的两个瘊子治好了。我是用香蕉皮多次敷，用手指一点一点掐掉的，治好后再未长出来。

4双极磁银针治刺瘊有效

亲友送我一支双极磁银针。我试用它在头部太阳穴长的一个如麦粒大小的刺瘊上进行刺激，经几次按压后，用手掐瘊子，一点血没出便自然脱落，长了多年的瘊子，根除了。梁惠敏

大蒜能治瘊子

数月前，我的右脸庞上长出一颗小米粒大小的瘊子，后来渐渐长到绿豆那么大。我试着将蒜瓣切成小块，用以擦抹患处。先是猴子表面出现干痂，最后竟至完全脱落．现在患处光洁如初，未留任何痕迹。

生猪油治瘊子

去年我手背上长了个瘊子，日渐增大。友人说可用生猪油（或肥肉）每天抹几次。我试用月余，瘊子竟自行脱落,一点迹也没留。

拉拉秧可治瘊子

拉拉秧的梗上有刺，像小挫一样。用拉拉秧的梗挫手上的瘊子，一挫即平，而且不感染。这是邻居告诉我的。我手上的瘊子，已经挫掉。

瘊子和皮肤熬生物简易治法

准备碘酒、75％酒精和细丝线一根（其他结实的细线也可）。用碘酒消毒瘊子，其面积要超过瘊子两倍，然后用酒精脱碘，用细丝线在瘊子根部勒紧系住（余线剪断），阻断血液供给，如瘊子蒂大，过三四天再紧一回。这样，小的瘊子和赘生物，四五天即干枯脱落，大的一周以后脱落。我从医多年，以此法治瘊子，无痛苦，不出血，不留瘢痕，效果甚佳。

鲜芝麻花可治瘊子

我小时候手背上长了一个玉米粒大的刺瘊。1948年秋，一位解放军战士告诉我可用鲜芝麻花在患处轻轻摩擦，经试用20次后，发现患处开始干裂，并逐步自行脱落，未留任何痕迹。 1960年手背上又长了一个瘊子，仍用此法消除。

紫药水治瘊子

我25岁时长了3个瘊子，后又发现3个。我无意中拿出棉花蘸紫药水涂在瘊子上作记号，以便去医院治疗、可是第二天一看，紫药水痕迹尚在，瘊子却只剩4个了，新生的小瘊子已消失。于是我每天用紫药水涂瘊子六七次，一周后瘊子全消失了，至今再没长过瘊子。

除瘊一得

1978年春，我右手掌长出一小刺瘊，不到半年竟有豌豆大。多方求医不见效。一次，我用唾液将刺瘊浸湿，又涂上吸烟时的热烟灰，一天一次，连续一星期。每次涂后有痛感，但慢慢结痂，痂掉后皮肤光滑如初，至今6年多未犯。

红荆花治瘊子

我邻居某君手背长了一些瘊子。去年夏天，他在地头休息时持红荆花（即荆条）搓着玩，第二天发现，手背的瘊子少了。他想这大概是红荆花的作用，于是到地里又用红荆花搓手背，不几天，瘊子全部消失，没有再生。

枸杞泡酒治瘊子

取数十粒枸杞浸泡白酒中，月余后，用枸杞沾酒涂在瘊子上，每天坚持数次，健忘者可家里、单位都预备药液，轻者数日就好，重者几周痊愈。经本人和我周围人的多次试验，治愈率100％，且不痛不痒。

蜘蛛网治瘊子

三十年前我腋下长了三个像黄豆粒大小的瘊子，听人讲，蜘蛛网治瘊子。后来我在民房内找了一个蜘蛛网，用根丝轻轻绕在瘊子上（绕时不要太紧），先松后紧，不几天三个瘊子全掉了。

蒲公英治瘊子

三年前我儿手上长了个瘊子，用了很多药不见效。朋友介绍一方，用蒲公英很快治愈。其方法：将新鲜的蒲公英整朵黄花折下，花茎就会流出乳白色的汁液，把汁液在瘊子上反复涂抹，每天涂1一2次，10天左右瘊子就消失。

大宝SOD可除瘊子

我右手面长了好多小瘊子，三年间用了各种方法医治无效，并且越来越多，很苦恼。自去年使用大宝SOD蜜，一个月后，竟发现手面上的瘊子全都消失了，且没有一点痕迹。我认为这是大宝SOD的功劳，现在我一直使用。

马齿苋可治扁平疣

我孩子4岁时脸上长满了扁平疣，多次去医院采用冷冻、摘除等方法治疗，然而从未根治，常常是过不了多久便复长如初，全家人为此苦恼不已。后邻居说马齿苋可治扁平疣，就去菜地边上采了一兜，将其洗净，剁成细末，纱布包好挤出汁液，每日早晚各一次涂抹于患处，两周后，孩子脸上的扁平疣消失了，且至今未复长。

野谷草茎可治刺瘊

前几年，我左手拇指的根部，长了一个瘊子，不久，在其周围又长了六七个小瘊子。涂药、削剪均无效。后来，一位同事说，用野谷草茎穿刺可根治。当时我半信半疑，软软的野谷草茎能穿透瘊子吗？于是，我在杂草中找到野谷草，抽出穗茎，借野谷茎底端湿润对瘊子底部反复捻动，还真把刺瘊穿透了。我把草茎沿瘊子的外沿把草茎用指甲剪去，留一小段在瘊子里，不疼不痒。过了两天，不知什么时候，瘊子了，周围的小瘊子也没有了，也没疤痕。后把此法告诉长刺瘊的同志，他们的瘊子也治好了。

土方治瘊子

小时候，脚上大脚趾处长了个刺瘊子，愈长愈大，上学走路都困难了。当时农村卫生医疗条件很差，无法根除。后来，村中一老人告诉我一个土方。就是找一个露天的碾子，当下雨时，用下在碾子上的雨水，去滴抹刺瘊子，就会好。趁一个雨大，我冒雨去碾子处用碾子上雨水滴抹患处。只一次，就在不知不觉中痊愈了。

茉莉花籽治瘊子

我脚上长了一个瘊子，大夫用刀剜去两个月后又长出来。一位伯伯告诉我将草茉莉花籽碾成粉末，拌上猪油，糊在瘊子上，数大后可使瘊子连根去除。果然，用这种方法，十二天后我脚上的瘊子连根掉下，不疼不痒。

香烟头烤治瘊子

我的右手背和手指上长出几个瘊子，我曾跑过多趟医院没能治好。听人说，用点燃的香烟每日烘烤3-5次可治。我取无花果实，将无花果的白汁滴在瘊疣上；几日后瘊疣会自行结痂脱落，再继续滴用，直至疣子完全脱去。滴无花果汁时不用将疣子刮破。

丝瓜叶治软疣

软疣俗称水猴子，是一种皮肤病。此病如不及时诊治，极易反复发作，重者蔓延胸背四肢，让人心烦"将丝瓜叶揉搓后，涂擦于患处，两三大后身上的疣体开始变小，直至消失。

蓖麻仁治顽瘊

20年前，本人曾用民间士方治愈手背之顽瘊，至今未再犯，现介绍如下：取鲜蓖麻仁1枚，分成两半，以其切面，反复涂擦母瘊。每天1至2次，每次数分钟，1周内治愈。

治瘊子一法

看了《生活中来》"紫药水治瘊子"的报道，我想起了又一治瘊子的方法。那是1974年，我的手上长了几个瘊子。有人治病时服用乌洛托品，没想到同时也治好了瘊子。他把这经过情况介绍给我。我一试果然有效，手上的瘊子全部消失。只按药品说明用量及服法两周即可痊愈。

水泡瘊子除瘊法

我小时候常到河里游泳，在水里泡的时间一长手背上的3个瘊子就变的松软了，我用指甲一点一点把它们抠掉，长在内部的都是一根一根的紫筋。此时就用大拇指和食指的指甲卡住，一根一根地向外揪，并不感到疼痛。前后大约两个小时，没去医院手术就除掉了瘊子。几十年来不但没长连疤痕也没落下。请注意，也可用热水泡后再揪，效果是一样的。

薏米粥除瘊法

用薏米熬粥或生吃可治瘊子。几年前，我曾为长瘊子苦恼，按上述方法治疗，不久即愈。

鸡内金治瘊子

用鲜鸡内金擦患处，几次即愈，不留瘢痕。

星星草籽治瘊子

准备星星草籽（华北地区普遍生长的一年生小草，穗上有好多鳞状小片，内含极小的棕红色颗粒，即种子）若干，洗净消毒。洗净患处，用消过毒的针把瘊子顶端挑个小坑，即敷入星星草籽，然后贴上橡皮膏。此后即使发痒发胀也不要管它，一个星期后揭开，瘊子即随橡皮膏脱落，永不再发。这是一位老农告诉我的，曾把它介绍给长瘊子的患者，均治好，且不留瘢痕。

用醋浸泡鸡蛋治瘊子

鸡蛋洗干净后用针在蛋壳上轻轻地扎几个小针眼，把它放在同样大小的酒杯内，用醋浸泡24小时。把鸡蛋与醋一起煮熟吃下。一连吃3天，这是一个疗程。如瘊子多，可以再吃3天。我家两个孩子用这个方法全部治好了。

活蜈蚣浸香油治瘊子

陕西境内主要旅游景点概述 - 使用 Google 工具栏进行发送

2007-05-03T10:43:00.001-07:00

陕西境内主要旅游景点概述

陕西境内主要旅游景点概述

　　未央湖

　　北大街乘坐236路2.5元人，门票20元，学生15元，年票免门票，划船不限时,可坎价出租烤具，及其他配料，整套租金30元，押金50元，租一套烤具送10元肉，不让自带酒水，违者会扣烤具的押金，有露营区，30元帐篷

　　动物园

　　南二环320直接到动物园终点站，单程路费3.5rmbp。学生票40

　　兵马俑

　　火车站坐306或者西临高速的车，306是比较大的那种公交车，西临高速小一些，车身绿色，不要做私人旅行社的车，学生证半价45元，研究生证也适用，兵马俑有免票的机会
　　1、免票对象：在校本科生团体。（注意不包括研究生，更不包括博士生）
　　2、免票时间：每周一至周五下午3点～5点。4月15日～5月15日是黄金周旺季，不接待免票团体，所以要去的话只能预约5月15日以后的，咨询电话：029-81399047
　　3、手续：
　　去学院开介绍信，要一式两联的那种介绍信，不是拿稿纸写的那种，介绍信上要写明人数，要学院公章，还要院领导的亲笔签名（不能盖章代替），一般找负责学生工作的院党委副书记就可以了。带学生证

　　法门寺

　　火车站广场的东边乘坐游2，每天一次，早8点出发，下午3点从法门寺返回，单程票价18元，不要轻易上火车站周围的旅行社的车，门票28，学生两人一张，珍宝馆，32元，学生16，有年票就免了（年票检查不严）

　　丰裕口

　　401到城南客运站，车很多，单程不超过1小时，从丰裕口大转盘向右拐，上107省道，也就是环山公路，7，8公里左右，有不少鱼塘农家乐，可以钓鱼，烧烤！

　　罔�O寺

　　在�u市拐，东南门外乘坐607可到，�拇笙愀埘U翅北�鹊男〉劳��|一直走，150米左右就到了。免门票，游人不必买香

　　鲸鱼沟

　　交大电脑城坐240路到终点，一人1块钱改坐蹦蹦车到入口处，买票一个人5块钱，骑马10元人到沟底，自由选择，有烤炉出租，很小的那种，10块钱一个，一般2个就够用了，划船20元小时

　　蔡家坡

　　西安火车站坐火车到蔡家坡10元（城西客运站坐高速客车25元，推荐岐山臊子面，岐山锅盔，岐山臊子肉夹馍，岐山擀面皮，详见3796贴

　　汉阳陵

　　408到万寿路北口坐3-16，车站在万寿路北口西边约300米，票价4.5元,回来在张家堡倒228,来回各需要一个半小时左右，15门票（没有年票是45。另外，有学生票，但是研究生不算）详见3826贴

　　楼观台

　　在北门坐402到水司（西南城角）的客运站，乘坐到眉县或亚柏的汽车在终台路口下车，再坐三轮车到入口。记得要问到眉县或亚柏的汽车是否在终台路口停车。从西安－终台路口6～7元，终台路口－楼观台森林公园2元。门票好像是30元

　　太平峪

　　北门402路到水司，车票8元，在太平口下车，坐小面包车上山，5元人，学生门票20一人，成人票35，有农家住宿，可烧烤，建议自带肉

　　太平森林公园

　　401城南客运站乘西安至户县班车到户县至三球仪汽车站，乘户县至太平森林公园的班车，每天三个班次，早9：00持、中午12：00、下午3：30，西安接待站电话81498222

　　翠华山

　　城南客运站座4－01（始发）票价2＋6，或者408到电视塔换4―01 票价1＋6，从城南客运站到翠华山约1个半小时，翠华山学生票35元

　　蓝田汤峪

　　南门401到城南客运站坐车，门票15，可泡温泉，烧烤建议自带烤炉，农家乐提供住宿，5元人，风景一般，适合班级休闲旅游

　　金丝峡

　　火车站旁边的西安汽车站坐西安到商南的汽车，票价35，从早上6：40开始，每40分钟一趟。下午2：00有商南到金丝峡专线，票价15。这条线路一天只有早7点和下午2点两班商南有两个汽车站，相距500米左右，去金丝峡的车在秦东宾馆旁边的那个汽车站坐。
门票团体20

　　王顺山

　　乘车路线：现在西蓝高速公路的终点都设在火车站三府湾停车场，有直达旅游景点的大巴和中巴，大巴一般是宇通客车，中巴是红色的金龙。中巴一般只到县城，大巴视旅游人数多少决定是否去旅游地。可以做到蓝田县城，在乘车前往。
　　应该直接到火车站附近的长途汽车站坐西安－商洛的车，那车途径王顺山倒是给司机说声就可以了
门票不详，一说10元人，一说20元人，可坎价

　　茂陵

　　交大南门坐612到城西客运站西安--兴平，到茂陵站下，5.5人
5块钱一车的蹦蹦车蹦到茂陵博物馆
门票28，今年4月13号以后调价至45元，无学生票，可坎价

　　华山

　　火车站做游1，早8点出发，一天一趟，或者乘坐火车去华山。现在票价学生票90人,保险好像是5人缆车单程60人，全程110

　　韩城

　　火车：西安至韩城有三趟火车，以及宝鸡经韩城至太原的路线，票价19元，时间4小时
不过春运期间停开
汽车：西安的城东客运站有大巴，票价50，走高速（西安至禹门口），时间2小时40分
到达韩城的汽车总站
司马迁祠墓：韩城市内坐101路小中巴公交到南关汽车站，0.5元人；换乘公交旅游专线
直达司马迁祠门口，2.5元人，门票是20元，学生10元；返回仍坐公交旅游专线，
可以直达文庙，还是每人2.5元。开放时间8：00-18：00（4月1日―10月31日）
紧靠司马迁祠的是红军抗日渡黄河纪念碑（不收门票）
文庙：韩城火车站坐101路到南关（终点站，车费1元），到斜对面换乘102路，
三站就到了东学巷口，步行3-5分钟就可到达文庙。门票10元，导游讲解10元
　　开放时间――8：00-18：00
党家村：韩城开往下峪口的中巴车途经党家村，车费3元。票30元，学生半价导游讲解20元
　　开放时间――全天详情参见3489贴
　　
　　黄陵到壶口两日游

　　第一日，早起，火车站坐西安到黄陵的车，三小时到，走高速，下午一点，黄陵到宜川，35元人，住宿
第二日，出租车到壶口，下午返回宜川，做宜川到富县的车，在从富县到西安，或者直接乘坐宜川到西安，早八点下午五点各一趟，75元人

　　太白

　　从城西客运站乘坐西安到眉县的车，23.5元人，每20分钟一辆，做到大桥口下车（说去太白山，司机就会告诉你的），大桥口有中巴车做到离汤浴比较近的地方，1.5元人，有小车包车上到汤浴，15元车，能做4，5个人的那种。
回：1，汤浴每天早上6点半会有车直接到西安，票价18人。
2，乘坐游二。下午4点回西安。
3，汽车站作车，到大桥口，换蹦蹦过桥到高速口，等梅县回西安的车

求陕西商南金丝峡旅游详细情况_百度知道 - 使用 Google 工具栏进行发送

2007-05-01T23:08:00.001-07:00

求陕西商南金丝峡旅游详细情况_百度知道

在这里我提供一些情况,我是去过的
首先在西安长途车站坐到商南的车,早上8点,每人大概40多块钱,具体记不清了,然后下车后再坐到金丝峡景区的车,每人15元,2个小时多点会到,下车后先找住的地方,个人推荐农家乐,山里的住宿太贵,划不来,如果2个人去的话包一个单间只要30元,住下后先去买门票,门票50元,工作人员会在票上盖个章,当天进去一次第二天还可以进,因为你买票的时候已经是下午很晚了,进去后大概看看转转就出来,晚上在外面有夜市,吃点小吃,然后回去睡觉,第二天一大早就进山,至于进去怎么玩就看你们自己了,里面有路标的,主要就是看瀑布,里面有很多瀑布,还有漂流.
需要注意的是,如果你们想玩的尽兴,那么就好好玩,到晚上太阳下山再出来,然后在农家乐再住一晚,第3天清早再坐车回商南,然后回西安,如果赶时间的话,那么就要在进山当天下午1点之前一定要出来,因为商南回西安的车最晚是下午3点的,这样你们玩的时间就很紧张,根据你们自己的情况定吧,基本情况就是这么多,风景我就不给你描述了.

求inetinfo.exe 消耗%100的CPU资源的解决方法!!!!!!! - 【 Windows操作系统】 - 《我是网管》论坛 - 畅通网络因为有我 - 使用 Google 工具栏进行发送

2007-05-01T02:33:00.001-07:00

求inetinfo.exe 消耗%100的CPU资源的解决方法!!!!!!! - 【 Windows操作系统】 - 《我是网管》论坛 - 畅通网络因为有我

inetinfo.exe主要是IIS admin进程调用，所以一般当出现进程里inetinfo.exe占用CPU近100%资源时，很有可能是以下两种情况引起。
*Xaul?8`;AMi《我是网管》论坛第一种是机器之前有非正常断电重起，导致IIS日志进程异常，在internet管理器里关闭所有站点的IIS日志写记录即可恢复正常。
or.r/v\网管,网管论坛,网管软件,网管下载,网管技术,网络技术,网管社区,网管博客,企业网管,网吧网管,网吧管理,病毒,木马,下载,服务器,操作系统,数据库,路由器,交换机,防火墙,网络工程,布线,网络编程,游戏,网络基础,硬件,网页制作第二种是遭攻击，主要在135端口，上网查查IP策略，屏蔽任何端口源到本地的135端口即可

李文雄：总结几个产生上万流量的方法-SEO,流量,

2007-04-20T22:05:00.001-07:00

李文雄：总结几个产生上万流量的方法-SEO,流量,草根网IT资讯精读(20ju.com)

总

结几个做网站过程中学到和实践中的增加网站流量的方法:

1. 网站分流:利用现有的流量，带动新站的流量，比如可以在现有的网页中加入弹出代码，在显眼的位置上放上引人注目的字眼，都可以吸引人点击，一旦新网站的内容足够吸引人，则可以守住固定访问群.

2. 搜索引擎优化:一个新网站没有做过广告，它的流量大部分是从搜索而来的.总结一些心得如下:
从新站0IP到3000IP以上的基本流程:

A. 网站建好，没有断链，结构不能太深，网站目录结构一次就定好，因为网站结构的更改容易使排名下滑，最好两级目录，每个目录都优化一个关键词，每页都仔细优化，加上关键字，不要多，每页放一两个关键字就可以.每页都能有清淅的导航，最好每页都能进入网站的任一页(虽不可能，但尽量.要做个全站的索引页，地图页.)，如果不会做网页，就下载一个博客程序吧，生成静态那种，，这是SEO是很有用的，因为你可以把关键词用拼音或是英文作为文件名，容易被搜到.

B. 提交搜索入口，有条件就和有些PR的站交换链接，没有的话就到搜索引擎常光顾的论坛上发带链接的贴子(site:xxx.com/bbs/就可以看出搜索引擎是不是常收录这个论坛的东东了)

C. 每天更新首页一次，加点内容，增加些外部链接等，哪怕是对方没有和你链接，你也是可以链接别人的，不要以为吃了亏，大概搜索引擎的算法体现了互联网"分享"的精神吧，向搜索引擎推荐外部链接的好处是大大的，由其是链一些和你站内容相关而又流量大的，PR分高些的网站.网站的活跃度越高，搜索爬虫就越是经常光顾你的网站，当然收录的机会和收录网页的数量也越多喽.

D. 每星期至少与他人交换一个链接，毕竟，反链还是需要的.

E. 在百度热门词列表中找到流量大的词，做一个有关这个词的的网页，这个网页最好控制在20KB之内.然后做些这个网页的反链.

F. 这样子过了一些时候，你在计数器中会发现网站被一些搜索引擎收录了，那就非常好做了，每每看看哪些词的网页点的人多些，这时你就改改这个网页，可以为这个网页多加些内容，或者为个关键词建一个目录，做成一个小小的站中站等等，当然要花些功夫了.

G. 这样过了一年，可能你的网页数量就有了300至400页了，如果每页都能有10个人通过搜索引擎找到你的网站，那不就是3000-4000IP了吗，如果每个人都看两三页，那PV不就是1万左右了吗，这样子流量就产生了.

H. 利用网摘来增加流量，网摘站最近好多，但有流量的不是很多.可以在这些网站上注册个帐号，收录自己的网页，如能在首页出现，流量是不少的.

4. 常常看到有些热门关键词的第一位点击进去却跑到别的网站内容去了，听说这些高手用的方法是cloaking，这个方法比较冒险，成本高些，但效果是不错的，不过方法不太道德，我也不会.

5. 到流量大的论坛发些好贴子，就像我这样，可能也能带些流量过来，但比做SEO累多了，文采好就试试吧

如何提高网站的PageRank值及计算公式-SEO,PageRank,

2007-04-20T22:01:00.001-07:00

如何提高网站的PageRank值及计算公式-SEO,PageRank,草根网IT资讯精读(20ju.com)

什

么是pagerank? PageRank 是 Google 对网页重要性的评估；

　　PageRank值的提高可有效提升你的网页在Google搜索引擎中的页面排名，但并不是说PageRank越高则排名越靠前。有一些网站尽管PageRank不算高，但却较一些PageRank高的网站排名还要靠前。所以你应该在对网站优化的同时，也要努力提高网站的PR值。提高PR最佳和最简单的办法在于：

　　 1. 提供有趣、有价值的网站内容，这样站长们会主动和你进行友情链接，从而提高你的外部链接值。

　　 2. 将网站提交到各大搜索引擎，这样可显著改善你的网站在Google上的排名。

　　 3. 可将网站添加到行业门户站点、网上论坛、留言簿等等各种允许添加网址链接的地方。

　　 4. 与其他网站交换链接来提高链接权值。

　　 5. 与其他网站交换链接时首先要查看对方站点是否被Google删除，或是否被Google收录，没有被Google收录的站点最好不要做连接。

获得友情链接的PR值计算方式：
PR(A) = (1-d)+ d(PR(t1)/C(t1)+ ... + PR(tn)/C(tn))
如果blog.sina.com.cn/seo的PR=4， blog.sina.com.cn/seo只有1个链接，并且链接到您的站点
PR(A) = (1-0.85) + 0.85*(4/1)
=0.15+0.85*4
=0.15+3.40
=3.55
那么你就会获得3.55分！这还不算其它网站给您的分。

如果blog.sina.com.cn/seo只有2个链接，并且链接到您的站点
PR(A) = (1-0.85)+ 0.85*(4/2)
=0.15+0.85*2
=0.15+1.70
=1.85

如果10个PR=0的网站链接到您的站点
PR(A) = (1-0.85) + 0.85*(0/N) + 0.85*(0/N) + ... + 0.85*(0/N)
=0.15+0
=0.15
所以你只能获得0.15PR分。

jsp图片验证码错误问题的解决

2007-04-13T02:05:00.001-07:00

今天在给客户安装系统的时候发现在登录页面的图片验证码不能显示出来，单独请求这个文件的时候就出现下面的提示
javax.imageio.IIOException: Can't create output stream!
经过对源程序的追踪分析，最后发现错误是在

createOutputStreamInstance

函数中产生的，查找该函数的api文档如下：

createOutputStreamInstance

public ImageOutputStream createOutputStreamInstance( Object output)
                                            throws IOException

返回与此服务提供程序关联的 ImageOutputStream 实现的实例。如果需要，将在系统相应的默认临时文件目录中创建缓存文件。

参数：: output - 一个由 getOutputClass 返回的类类型的对象。
返回：: 一个 ImageOutputStream 实例。
抛出：: IllegalArgumentException - 如果 output 不是一个正确的类的实例，或者为 null。; IOException - 如果需要缓存文件但无法创建。
另请参见：: getOutputClass()
呵呵~，原来是少临时目录呀，在tomcat目录下创建temp的文件夹，然后刷新页面。。。。OK!问题解决

TOMCAT5在WINDOWS下的系统服务相关的命令行

2007-04-12T23:42:00.001-07:00

TOMCAT5在WINDOWS下的系统服务相关的命令行

来源：作者：发布时间：2007-02-13

先说说Tomcat5.exe和Tomcat5w是干什么的。
Tomcat5.exe可以把Tomcat加入服务；Tomcat5w.exe可以辅助配置已经添加的服务。

Tomcat5w.exe 监控程序
Tomcat5w是一个监控和配置Tomcat服务的图形界面应用程序。可用的命令行选项如下：

//ES// 编辑服务配置，这是缺省的选项。如果没有提供任何选项，却把tomcat5w.exe重命名为%SERVICE_NAME%.exe 运行的话，这个选项就被调用。
//MS// 监控服务，讲图标放置到系统托盘中。

Tomcat5.exe 服务程序
命令行选项
每一个命令行指令都形如//XX//ServiceName

可用的命令行选项如下：

The ServiceName is the name of the executable without exe sufix, meaning Tomcat5
//TS// 控制台应用程序模式运行服务，这是缺省的操作。在没有提供任何选项开关的时候，它被调用。服务名是执行文件没有exe后缀的部分，如Tomat5。
//RS// Run Service的缩写，运行服务，在服务管理器(Sevices.msc)中启动服务的时候被调用。
//SS// Stop Service的缩写，停止服务，在服务管理器中停止服务时被调用。
//US// Update Service的缩写，更新服务参数。
//IS// Install service 的缩写，安装服务。
//DS// Delete service的缩写，删除服务，如果服务正在运行，首先删除服务。

命令行参数
每一个命令行参数以"--"开头。如果命令行以" "为前缀，则它的值附加到存在的选项上。如果存在和命令行参数有同样的名字，但是以PR_开头的环境变量，它将被优先使用。例如：
set PR_CLASSPATH=xx.jar
等同于
--Classpath=xx.jar
作为命令行参数。

参数名缺省值描述
--Description 服务名描述 (最多1024个字符)
--DisplayName ServiceName 服务显示名称
--Install procrun.exe //RS//ServiceName 安装服务
--Startup manual Service 服务启动模式，可以是自动或者手动，值分别为：auto和manual
--DependsOn 列举此服务依赖的所有服务. 被依赖的服务用#或者;分隔。
--Environment 列决提供给服务使用的环境变量，形如key=value。多个环境变量之间用#或者;分隔。
--User 运行服务使用的用户账号。只有在运行于没有"作为服务登录"权限下的账户中使用StartMode java 或者作为服务的exe可运行程序选项的情况下才被使用。
--Password --User参数中用户的密码
--JavaHome JAVA_HOME 定义了JAVA_HOME环境变量时，设置一个不同的JAVA_HOME环境变量
--Jvm auto 用auto或指定jvm.dll的全路径。这里可以使用环境变量表达式。
--JvmOptions -Xrs 列举形如-D 或 -X 的开关传递给JVM虚拟机。多个选项开关之间用#或者;分隔。
--Classpath 设置Java的ClassPath环境变量。
--JvmMs 设置初始使用的内存池容量，单位为MB。
--JvmMx 设置最大使用的内存池容量，单位为MB。
--JvmSs 线程堆栈容量，单位为KB
--StartImage 要被运行的可执行文件
--StartPath 开始运行可执行文件的工作路径
--StartClass 启动时使用的类
--StartParams 列决要传递给StartImage 或 StartClass的参数。多个参数之间用#或者;分隔。
--StartMethod Main 启动服务调用的方法，如果不是main，这里写上方法名
--StartMode executable 可以是jvm、java或exe 之一
--StopImage 停止服务调用的可执行文件
--StopPath 停止服务执行的文件的工作路径
--StopClass 停止服务调用的类
--StopParams 列决要传递给 StopImage 或 StopClass 的参数。多个参数之间用#或者;分隔。
--StopMethod Main 停止服务调用的方法，如果不是main，这里写上方法名
--StopMode executable 可以是jvm、java或exe 之一
--StopTimeout No Timeout 定义一个服务顺利退出的延时，单位为秒。
--LogPath 定义日志路径
--LogPrefix jakarta_service 定义日志文件名前缀
--LogLevel INFO 定义日志等级，可选值：error, info, warn或debug
--StdOutput 重定向stdout文件名
--StdError 重定向Stderr文件名

安装服务
手动安装服务最安全的方法就是使用service.bat脚本。

使用service.bat安装名字为Tomcat5的服务
C:/> service.bat install Tomcat5

如果使用tomcat5.exe安装名字为Tomcat5的服务，你需要使用//IS//参数。
C:/> tomcat5 //IS//Tomcat5 --DisplayName=Apache Tomcat 5 --Install=C:/Program Files/Tomcat/bin/tomcat5.exe --Jvm=auto --StartMode=jvm --StopMode=jvm --StartClass=org.apache.catalina.startup.Bootstrap --StartParams=start --StopClass=org.apache.catalina.startup.Bootstrap --StopParams=stop

更新服务
要更新服务的参数，你需要使用tomcat5.exe的//US//参数。

更新名字为Tomcat5的服务
C:/> tomcat5 //US//Tomcat5 --Description=Apache Tomcat Server - http://jakarta.apache.org/tomcat --Startup=auto --Classpath=%JAVA_HOME%/lib/tools.jar;�TALINA_HOME%/bin/bootstrap.jar

移除服务
要移除服务，你需要使用tomcat5.exe的//DS//参数。如果服务正在运行，将首先关闭然后删除。

移除名字为Tomcat5的服务
C:/> tomcat5 //DS//Tomcat5

调试服务
如果需要在控制台模式运行服务，应该使用//TS//参数。此时若要关闭服务必须使用CTRL C 或者 CTRL BREAK关闭控制台。如果你将tomcat5.exe 更名为 testservice.exe那么你应该运行testservice.exe，命令模式将被缺省运行。
在控制台模式下运行命称为Tomcat5 的服务
C:/> tomcat5 //TS//Tomcat5 [additional arguments]
或者简单地运行：
C:/> tomcat5

食品相克列表

2006-12-03T01:41:00.000-08:00

食品相克列表

1.猪肉菱角若共食,肚子疼痛不好受. 2.牛肉栗子一起吃,食后就会发呕吐.
3.羊肉滋补大有用,若遇西瓜定相侵. 4.狗肉滋补需注意,若遇绿豆定伤身.
5.兔肉芹菜本不合,同食之后头发脱. 6.鸡肉芹菜也相忌,同食就会伤元气.
7.鹅肉鸡蛋不同窝,一同入胃伤身体. 8.鲤鱼甘草性相反,兼食而之定伤身.
9.黄鳝皮蛋皆佳肴,不可同桌结伴行. 10.鸡蛋若遇消炎片,同室操戈两相争.
11.鸡蛋糖精更相克,同食中毒更伤身. 12.柿子红薯若同吃,体内结石易形成.
13.柿子螃蟹也相背,同食之后会腹泻. 14.柿子白酒更不合,食后使你心发闷.
15.豆腐蜂蜜伴着吃,味道虽好耳要聋. 16.洋葱蜂蜜也不合,同食就会伤眼睛.
17.香蕉芋头本不合,同时入胃腹胀痛. 18.香蕉相克马铃薯,同食面部要起斑.
19.黄瓜生熟都可以,进食之际忌花生. 20.萝卜木耳不同食,食了容易生皮炎.
21.萝卜水果更相背,甲状腺肿会诱发.

　*　以下食物两小时内不能同时食用，否则会发生中毒，甚至有生命危险，千万不可大意,提供中毒解救小窍门，供参考：

脚鱼与苋菜：食则死亡。解救：吃空心菜汁
鲤鱼与甘草：食则死亡。解救：吃麻油二两；
狗肉和绿豆：食则胀腹。解救：甘草一两煎水服；
桃子下烧酒：食则昏倒，多吃死亡。解救：服牛黄解毒丸三粒；
黄瓜与花生：食则泻肚。解救：吃藿香正气丸二粒；
蜂糖与生葱：食则死亡。解救：米炒枯研末，再用甘草二两煎水冲枯米吃；
茶煮青蛙：食则死亡，无法解救；
蚕豆与田螺：食则绞畅痛。解救：吃儿童小便二两；
香蕉与芋头：食则中毒。解救：吃桐油五钱；
冰棒与西红柿：食则中毒。解救：吃穿心莲二两煎水服；
羊肉和西瓜：食则中毒。解救：甘草二两煎水服；
猪肉和芝麻花：食则死亡。解救：吃空心菜汁二两；
芥菜与兔肉：食则死亡。解救：吃杨梅水二两；
不可单用生姜下酒：食则胃脘痛，多吃则烂肝脏；
冬笋和龟肉：食则中毒。解救：甘草二两煎水服；
鲫鱼与冬瓜：食则脱水。解救：吃空心菜汁二两；
黄疸病忌马肉：食则死亡。无法解救
甜酒与味精：食则中毒。解救：甘草煎水服；
牛肉与香附子：食则生九子疡；
油煎鸡蛋与糖精：食则中毒。解救：牛黄五分，开水服；
鹿肉与南瓜：食则死亡。无法解救；
抬头黄鳝不能吃：食则死亡。无法解救；
洋葱与癞蛤蟆：食则死亡。解救：车钱子一两水煎服；
红薯与柿子：食则胃结石，多吃死亡；
螃蟹与柑桔：食则中毒。解救：吃大蒜汁；
螃蟹与柿子：食则中毒。解救：吃藕节（煮水）
螃蟹与泥鳅：食则中毒。解救：吃黄泥水
螃蟹与茄子：食则中毒。解救：吃藕节（煮水）
螃蟹与香瓜：食则中毒。解救：吃柑桔皮
螃蟹与生花生：食则中毒。解救：吃黄泥水
螃蟹与冰水：食则中毒。解救：吃藕节（煮水）
田螺与玉米：食则中毒。解救：吃黄泥水。
田螺与香瓜：食则中毒。解救：吃黄泥水。
鲫鱼与蜂糖；食则中毒。解救：吃黑豆甘汤草
牛奶与酸醋物：食则腹结石。解救：吃绿豆汤
牛肉与韭菜：食则中毒。解救：吃人奶或豉汁
蟮鱼与红枣：吃则脱发。解救：吃蟹
牛奶与菠菜：食则拉痢。解救：吃绿豆汤
鳝鱼与南瓜：食则中毒。解救：吃蟹
竹笋与麦芽糖；食则中毒。解救：吃绿豆汤
番茄与石榴：食则中毒。解救：吃韭菜汁
鸡肉与李子：食则拉痢，解救：吃鸡屎白
鸭蛋与李子：食则中毒。解救：吃黄泥水
竹笋与羊肝：食则中毒。解救：吃黄泥水
雀肉与李子：食则中毒。解救：吃鸡屎白
黑枣与柿子：食则解释。解救：无方
以上仅供参考，若发生中毒症状，应及时送医院为妥。

1、萝卜：严禁与桔子同食，同食患甲状腺肿；忌何首乌、地黄；服人参时忌食；忌与胡萝卜同食。
2、胡萝卜：不宜和西红柿、萝卜、辣椒、石榴、莴苣、木瓜等水果同吃。最好单独吃肉类烹调。
3、黄瓜：不宜和维生素c含量高的蔬菜如西红柿、辣椒等同烹调。
4、甘薯： (红薯、白薯、地瓜、山芋)；不能与柿子同食，二者相聚会形成胃柿石，引起胃胀、腹痛、
呕吐，严重时可导致胃出血等，危及生命；也不宜与香蕉同吃。
5、韭菜：不可与菠菜同食，二者同食有滑肠作用，易引起腹泻；不可与蜂蜜同食，同食则令人心痛；
不可与牛肉同食，同食令人发热动火。
6、茄子：忌与黑鱼、蟹同食，同食有损肠胃；过老熟的茄子不宜食，易中毒。
7、菠菜：忌韭菜；不宜与豆腐同食，同食使人缺钙。
8、小白菜：忌兔肉。
9、南瓜：不可与羊肉同食，否则易发生黄疸和脚气；不可与富含维生素c 的蔬菜、水果同食。
10、竹笋：不宜与豆腐同食，同食易生结石；不可与鹧鸪肉同食，同食令人腹胀；不可与糖同食;不宜与羊肝同食。
11、辣椒：忌与羊肝、南瓜同食。
12、香菜：不可与一切补药同食；忌白术、牡丹皮。
13、莼菜：忌与醋同食。
14、茭白：不宜与豆腐同食，否则易形成结石。
15、芹菜：忌同醋食，否则易损齿；不宜与黄瓜同食。
16、芥菜：忌与鲫鱼同食，否则易引发水肿。
17、蕨菜：忌与黄豆、花生、毛豆等同吃。
18、菜瓜：忌与牛奶、奶酪、鱼类同食，否则易生疾病。
19、山药：忌鲫鱼、甘遂。
20、豆腐(豆浆)：不要与牛奶同食；不要与菠菜同烹调；忌用豆浆冲鸡蛋；忌与四环素同用。
21、木耳：忌与田螺、雉鸡、野鸭、鹌鹑肉同食；忌与四环素同服
22、苋菜：不宜与菠菜、蕨粉同食
23、苦菜：不可与蜂蜜同食
24、花生：忌蕨菜、毛蟹、黄瓜。
25、马齿苋：不宜与鳖甲同食。
26、香瓜：忌与蟹、田螺、油饼同吃
27、猪肉：忌与鹌鹑同食，同食令人面黑；忌与鸽肉、鲫鱼、虾同食，同食令人滞气；忌与荞麦同食,同食令人落毛发；忌与菱角、黄豆、蕨菜、桔梗、乌梅、百合、巴豆、大黄、黄连、苍术同食；忌与牛肉、驴肉、羊肝同食。
28、猪脑髓：不可与酒、盐同食，影响男子性功能；
29、羊肉：忌与豆酱、荞麦面、乳酪、南瓜、醋、赤豆、梅干菜同食；忌铜、丹砂。
30、鸡肉：老鸡鸡头不能吃，因毒素滞留在脑细胞内，民间有"十年鸡头生砒霜"的说法；忌与糯米、李子、大蒜、鲤鱼、鳖鱼、虾、兔肉同食；忌芥末、菊花。
31、猪油：不宜与梅子同食。
32、牛肉：不可与鱼肉同烹调；不可与栗子、黍米、蜂蜜同食；不宜与韭菜、白酒、生姜同食。
33、猪肝：忌与荞麦、黄豆、豆腐同食，同食发痼疾；忌与鱼肉同食，否则令人伤神；忌与雀肉、山鸡、鹌鹑肉同食。
34、牛肝：忌鲍鱼、鲇鱼；不宜与富含维生素c的食物同食。
35、鸭肉：反木耳、胡桃；不宜与鳖肉同食，同食令人阴盛阳虚，水肿泄泻。
36、狗肉：忌与绿豆、杏仁、菱角、鲤鱼、泥鳅同食；忌用茶；不宜与大蒜同食。
37、猪血：忌黄豆，同食令人气滞；忌地黄、何首乌。
38、羊心、羊肝：忌与生椒、梅、赤豆、苦笋、猪肉同食；不宜与富含维生素c的蔬菜同食。
39、驴肉：忌荆芥；不宜与猪肉同食，否则易致腹泻。
40、马肉：不宜与大米（粳米）、猪肉同食；忌生姜、苍耳。
41、鹅肉：不宜与鸭梨同吃。
42、鹿肉：不宜与雉鸡、鱼虾、蒲白同食
43、雀肉：春夏不宜食，冬三月为食雀季节。不宜与猪肝、牛肉、羊肉同食；忌李子、白术。
44、鸡蛋：忌与柿子同食，同食可引起腹痛、腹泻，易形成"柿结石"；不宜与兔肉、鲤鱼、豆浆同食；民间有吃"毛蛋"之习，其实"毛蛋"中含有大量病菌，易中毒。
45、鸭蛋：不宜与李子、桑椹子同食。
46、野鸭：忌与木耳、核桃、荞麦同食
47、鹧鸪肉：忌与竹笋同食
48、水獭肉：忌与兔肉、柿子同吃
49、獐肉：不宜与虾、生菜、梅子、李子同食
50、鹌鹑肉：不宜与猪肉、猪肝、蘑菇、木耳同食。
51、雉鸡（野鸡）不宜与猪肝、鲇鱼、鲫鱼、木耳、胡桃、荞麦同食
52、猫肉：忌藜芦；猫肉有伤胎之弊，孕妇忌服。
53、虾：严禁同时服用大量维生素c。否则，可生成三价砷，能致死,不宜与猪肉同食损精；忌与狗、鸡肉同食；忌糖。
54、鲤鱼：忌朱砂、狗肉。葵菜、赤小豆、咸菜不宜与狗肉同食。
55、泥鳅：不宜与狗肉同食。
56、海带：不宜与甘草同食。
57、鲫鱼：不宜与芥菜、猪肝、猪肉、蒜、鸡肉、鹿肉等同食；忌山药、厚朴、麦冬、甘草。
58、鳖肉：忌猪肉、兔肉、鸭蛋、苋菜；忌与薄荷同煮；忌与鸭肉同食，久食令人阴盛阳虚，水肿泄泻。
59、带鱼、平鱼、银鱼、黄花鱼：忌用牛、羊油煎炸；凡海味均禁甘草；反荆芥。
60、龟肉：不宜与酒、果、瓜、猪肉、苋菜同食。
61、蜗牛：忌蝎子。
62、田螺：忌与香瓜、木耳、蛤蚧、冰糖同食；忌与四环素同用。
63、鲶鱼：不宜与牛肝同食；忌用牛、羊油煎炸；不可与荆芥同用。
64、鳝鱼：忌狗血、狗肉，同食助热动风；忌荆芥，同食令人吐,青色鳝鱼有毒，黄色无毒。有毒鳝鱼一次吃250克，可致死。
65、海鳗鱼：不宜与白果、甘草同食。
66、青鱼：忌用牛、羊油煎炸；不可与荆芥、白术、苍术同食。
67、牡蛎肉：不宜与糖同食。
68、枣：不可与海鲜同食，否则令人腰腹疼痛；不可与葱同食，否则令人脏腑不合，头胀。
69、苹果：不宜与海味同食（海味与含有鞣酸的水果同吃，则易引起腹痛、恶心、呕吐等）。
70、鸭梨：忌鹅肉、蟹；忌多吃；忌与油腻、冷热之物杂食。
71、桔子：忌与萝卜同食，同食诱发甲状腺肿；忌与牛奶、蟹、蛤同食。
72、山楂、石榴、木瓜、葡萄：不宜与海鲜类、鱼类同食；服人参者忌用；忌铁器；忌和四环素同吃。
73、桃子：不宜与鳖肉、龟肉同食。
74、香蕉：不宜与白薯同食。
75、柿子：忌与蟹、水獭肉同食，同食腹痛、大泻；忌与红薯、酒同食。
76、杨梅：忌生葱；不宜与羊肛，鳗鱼同食。
77、杏：忌与小米同食，否则令人呕泻。
78、芒果：忌与大蒜等辛物同食。
79、银杏（白果）：严禁多吃，婴儿吃10颗左右可致命，三、五岁小儿吃30~40颗可致命；不可与鱼同吃，同食则产生不利于人体的生化反应，小儿尤忌。
80、柑子：忌与蟹同食。
81、大米（粳米）：不可与马肉同食，不可与苍耳同食，同食心痛；
82、黄豆：不宜与猪血、蕨菜同食；服四环素时忌用。
83、绿豆：不宜与狗肉、榧子同食
84、小米（粟米）不可与杏同食，同食易使人呕吐泄泻；气滞者忌用。
85、黑豆：忌与厚朴、蓖麻籽、四环素同用。
86、红豆：忌与米同煮，食之发口疮；不宜与羊肉同食；蛇咬伤，忌食百日；多尿者忌用。
87、葱：不宜与杨梅、蜜糖同食，同食易气壅胸闷；忌枣、常山、地黄。
88、醋：忌丹参、茯苓；不宜与海参、羊肉、奶粉同食；忌壁虎，可致死。
89、糖：忌虾；不可与竹笋同煮；不宜与牛奶、含铜食物同食。
90、酒：忌与汽水、啤酒、咖啡、奶、茶、糖同饮，不然对胃肠、肝、肾脏器官有严重的损害；不宜与牛肉、柿同食。
91、茶：贫血病人服用铁剂时，忌饮茶。不宜与狗肉同食；服人参等滋补药品时忌用。
92、蒜：一般不与补药同服。忌蜜、地黄、何首乌、牡丹皮；
93、花椒：忌防风、附子、款冬。
94、牛奶：忌牛奶中放钙粉；勿用牛奶冲鸡蛋；不宜与巧克力、桔子，四环素同食。
95、蜜：不宜与葱、蒜、韭菜、莴苣、豆腐同食，不然易引起腹泄

Delphi之面向对象程序开发

2006-11-24T02:41:00.000-08:00

Delphi之面向对象程序开发
作者：熊建峰网址：http://www.passtwo.com 邮箱:passtwo@gmail.com
　　使用Delphi编程也有一段时间了，Delphi开发程序效率很高，但是一直感觉和VB开发程序没有什么两样，除了语法的区别之外就是在控件、窗体等基础上进行程序开发了，Delphi面向对象开发的特点没有一点体现出来。
　　最近在开发一个应用程序的时候对系统代码进行查看，才恍然大悟，其实，基于Delphi的VCL组件下的开发实际上就已经遵循了面向对象的规则。举例说明如下：
例1：一个普通的Delphi窗体
我们利用Delphi进行程序开发的时候，首先就是一个窗体，设置好窗体的属性，好了，我们来看看窗体的代码。如下：
type
TForm1 = class(TForm)
Edit1: TEdit;
Button1: TButton;
private
{ Private declarations }
public
{ Public declarations }
end;
首先看看这段代码，定义了一个类型TForm1，它集成自TForm类，同时有两个属性：Edit1和Button1。同时还有可以添加private和public的地方。从面向对象的角度来讲，这属于面向对象的一个典型应用（使用了集成来生成新的类型）。那么，有人会说，在delphi下本来就是这样，跟我的程序有什么关系？我又怎样才能把面向对象的方法应用到我的程序中来呢？下面我来举一个例子说明。
例2：一个简单的继承
　　图1列出了一个大家比较熟悉的继承关系，图中包含三各类：水果，苹果，桔子。水果作为基类，它有两个属性：颜色和重量，另外水果都可以被食用，但是不同的水果有不同的方法，所以在水果类中有一个public abstract void 食用（），所有水果的子类必须实现该方法。苹果和桔子为水果的子类，它们集成了水果的基本特性：颜色和重量，另外它们分别实现了水果的食用（）方法。它们的代码看起来如下：
unit Ufruit;

interface

uses
SysUtils, Windows, Messages, Classes, Graphics, Controls,
Forms, Dialogs;

type
TFruit = class(TObject)
private
mColor: Integer;
weight: Integer;
public
procedure eat; virtual; abstract;
end;

TApple = class(TFruit)
public
procedure eat;
end;

TOrange = class(TFruit)
public
procedure eat;
end;

implementation

{
************************************ TApple ************************************
}
procedure TApple.eat;
begin
end;

{
*********************************** TOrange ************************************
}
procedure TOrange.eat;
begin
end;

end.
　　以上的代码是继承关系在Delphi下的编写，那么这些东西怎样才能和VCL组件结合起来，形成我们所熟悉的Form展现给用户呢？下面我们举例说明这个问题

图1
例三：使用Form实现水果的集成
有了我们水果的类图，我们使用Delphi的窗体来对水果集成关系做一个界面出来，首先是基类：TFruit，窗体界面如图2：

图2
它的代码如下：
unit UFruit;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;

type
TfrmFruit = class(TForm)
mColor: TEdit;
Button1: TButton;
Label1: TLabel;
Label2: TLabel;
Edit1: TEdit;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
procedure eat; virtual; abstract;
end;

var
frmFruit: TfrmFruit;

implementation

{$R *.dfm}

procedure TfrmFruit.Button1Click(Sender: TObject);
begin
eat;
end;

end.
接下来我们实现苹果类：选择File->New->Other->project1，如图3所示

图3
点击ok后，将出现苹果类的窗体（有没有感觉和水果类很像呀^_^），更改窗体的caption和name属性，然后实现fruit的eat方法，好了，我们的苹果类就做好了，如图4：

图4
它的代码如下：
unit UApple;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, UFruit, StdCtrls;

type
TfrmApple = class(TfrmFruit)
private
{ Private declarations }
public
{ Public declarations }
procedure eat;override;
end;

var
frmApple: TfrmApple;

implementation

{$R *.dfm}

{ TfrmApple }

procedure TfrmApple.eat;
begin
Application.MessageBox ('我是苹果，吃起来是甜的！','',32);
end;

end.
同样的方法，实现桔子类，程序界面如图：

图5
代码如下：
unit UOrange;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, UFruit, StdCtrls;

type
TfrmOrange = class(TfrmFruit)
private
{ Private declarations }
public
{ Public declarations }
procedure eat;override;
end;

var
frmOrange: TfrmOrange;

implementation

{$R *.dfm}

{ TfrmOrange }

procedure TfrmOrange.eat;
begin
Application.MessageBox('我是桔子，吃起来是酸的！','',32);
end;

end.
小结
以上我们使用Delphi的窗体实现了水果类、苹果类和桔子类，这样，就将实际的业务类和VCL组件类结合起来了。使用同样的方法，我们在进行数据库编程的时候可以首先考虑进行业务建模，然后画出类图，最后使用Delphi的窗体来完成整个程序的开发。我写这篇文章旨在抛砖引玉，欢迎大家一起讨论。

针对URL的SEO方法-随想飞翔

2006-11-06T18:10:00.000-08:00

针对URL的SEO方法-随想飞翔: "以下仅是个人经验，未经任何试验验证，请自行判断以下方法是否可行，使用如下方法进行SEO，任何后果自负。

作者：Cloudream http://www.5iya.com/blog/
转载请注明以上信息

匹配指匹配用户搜索关键字。

1. 主域名匹配优于目录名或网页名匹配。
2. 英文关键字之间应使用 - 或 _ 链接。
3. 针对中文关键字，中文目录名和网页名优于英文目录名和网页名。Google、百度可识别中文目录名和网页名，但其它搜索引擎未知。中文目录名和网页名可能导致部分浏览器无法识别该URL。
"

Google Adsense 提示100条-随想飞翔

2006-11-06T17:53:00.000-08:00

Google Adsense 提示100条-随想飞翔: "译注：少数条目有重复，不重新编排以遵从原文。

1. AdSense 收入 = 广告展示次数 x 点击率 x 点击单价 x 智能定价因素（Smart Price）
2. 广告展示次数基于你的网站流量，该项代表Adsense广告展示次数。（译注：废话－。－！）
3. 点击率为广告被点击次数÷广告展示次数，基本范围为0.1%-30%，大多数为1%-10%（译注：中文广告偏低，大陆地区平均点击率约0.2%）。
4. 点击单击为每次点击的收入，一般根据广告商付出的点击单价决定。
5. 智能定价机制为Google衡量你的网站刊登广�"

计算机二级上机考试评分方法 - QQread.com 教育频道

2006-11-02T07:01:00.000-08:00

计算机二级上机考试评分方法 - QQread.com 教育频道: "计算机二级上机考试评分方法
http://edu.qqread.com 　作者:玲珑草草来源:

　　上机必读
二级上机考试部分评分方法

　　自动评分系统有客观、公正的优点，但也有死板的缺点，要想得到比较好的分数，应当考虑到机器的这一特点。实际考试还有人工复查一项,由省级考试部门负责进行.但是人工复查如何进行，我们完全不得而知。因此我们下面的所有内容均不含人工复查内容，仅从考试系统本身来进行分析和说明。
　　我们从多次使用中摸索�"

给控件做数字签名之三:进行数字签名 - 阿泰的软件实用主义 - 博客园

2006-10-24T22:47:00.000-07:00

给控件做数字签名之三:进行数字签名 - 阿泰的软件实用主义 - 博客园: "双击工具包里的signcode.exe
文中提到的数字签名工具包，请在此处下载
http://www.cnblogs.com/Files/babyt/SignTool.rar

至此，数字签名完成
在DOS窗口下，输入
chktrust.exe E:\myTest\08\Package\WebRTF.CAB

对我们的成果进行检验

此时成功，对了，这个“恭喜”的红字是我做上去的，可别到时候这俩字出不来还觉得奇怪

最后就是发布了

将这两个文件拷贝到WEB目录下进行测试,出现证书安装提示后按是安装即可

"

请教如何获得所有当前用户可以访问的，不是系统表的表名和列名？ - ITPUB论坛

2006-10-17T23:58:00.001-07:00

请教如何获得所有当前用户可以访问的，不是系统表的表名和列名？ - ITPUB论坛: "SELECT OWNER ,TABLE_NAME,COLUMN_NAME
FROM all_col_comments
WHERE OWNER NOT IN('SYS','SYSTEM');"

如何有效地利用oracle的数据字典

2006-10-17T23:58:00.000-07:00

ORACLE的数据字典是数据库的重要组成部分之一，它随着数据库的产生而产生, 随着数据库的变化而变化, 体现为sys用户下的一些表和视图。数据字典名称是大写的英文字符。

数据字典里存有用户信息、用户的权限信息、所有数据对象信息、表的约束条件、统计分析数据库的视图等。我们不能手工修改数据字典里的信息。很多时候，一般的ORACLE用户不知道如何有效地利用它。

　　dictionary　　　全部数据字典表的名称和解释，它有一个同义词dict
dict_column　　全部数据字典表里字段名称和解释

如果我们想查询跟索引有关的数据字典时，可以用下面这条SQL语句:

SQL>select * from dictionary where instr(comments,'index')>0;

如果我们想知道user_indexes表各字段名称的详细含义，可以用下面这条SQL语句:

SQL>select column_name,comments from dict_columns where table_name='USER_INDEXES';

依此类推，就可以轻松知道数据字典的详细名称和解释，不用查看ORACLE的其它文档资料了。

下面按类别列出一些ORACLE用户常用数据字典的查询使用方法。

一、用户

查看当前用户的缺省表空间
SQL>select username,default_tablespace from user_users;

查看当前用户的角色
SQL>select * from user_role_privs;

查看当前用户的系统权限和表级权限
SQL>select * from user_sys_privs;
SQL>select * from user_tab_privs;

二、表

查看用户下所有的表
SQL>select * from user_tables;

查看名称包含log字符的表
SQL>select object_name,object_id from user_objects where instr(object_name,'LOG')>0;

查看某表的创建时间
SQL>select object_name,created from user_objects where object_name=upper('&table_name');

查看某表的大小
SQL>select sum(bytes)/(1024*1024) as size(M) from user_segments where segment_name=upper('&table_name');

查看放在ORACLE的内存区里的表
SQL>select table_name,cache from user_tables where instr(cache,'Y')>0;

三、索引

查看索引个数和类别
SQL>select index_name,index_type,table_name from user_indexes order by table_name;
查看索引被索引的字段
SQL>select * from user_ind_columns where index_name=upper('&index_name');

查看索引的大小
SQL>select sum(bytes)/(1024*1024) as size(M) from user_segments where segment_name=upper('&index_name');

四、序列号

查看序列号，last_number是当前值
SQL>select * from user_sequences;

五、视图

查看视图的名称
SQL>select view_name from user_views;

查看创建视图的select语句
SQL>select view_name,text_length from user_views;
SQL>set long 2000;说明：可以根据视图的text_length值设定set long 的大小
SQL>select text from user_views where view_name=upper('&view_name');

六、同义词

查看同义词的名称
SQL>select * from user_synonyms;

七、约束条件

查看某表的约束条件
SQL>select constraint_name, constraint_type,search_condition, r_constraint_name from user_constraints where table_name = upper('&table_name');

SQL>select c.constraint_name,c.constraint_type,cc.column_name
from user_constraints c,user_cons_columns cc
where c.owner = upper('&table_owner') and c.table_name = upper('&table_name')
and c.owner = cc.owner and c.constraint_name = cc.constraint_name
order by cc.position;

八、存储函数和过程

查看函数和过程的状态
SQL>select object_name,status from user_objects where object_type='FUNCTION';
SQL>select object_name,status from user_objects where object_type='PROCEDURE';

查看函数和过程的源代码
SQL>select text from all_source where owner=user and name=upper('&plsql_name');

九、触发器

查看触发器

set long 50000;
set heading off;
set pagesize 2000;

select
'create or replace trigger ' ||
trigger_name || '' || chr(10)||
decode( substr( trigger_type, 1, 1 ),
'A', 'AFTER', 'B', 'BEFORE', 'I', 'INSTEAD OF' ) ||
chr(10) ||
triggering_event || chr(10) ||
'ON ' || table_owner || '.' ||
table_name || '' || chr(10) ||
decode( instr( trigger_type, 'EACH ROW' ), 0, null,
'FOR EACH ROW' ) || chr(10) ,
trigger_body
from user_triggers;

trixbox官方网站

2006-10-17T22:12:00.000-07:00

http://www.trixbox.org/modules/smartsection/item.php?itemid=2/
构建中小企业语音电话平台

birt使用经验

2006-10-17T22:11:00.000-07:00

http://blogger.org.cn/blog/more.asp?name=lhwork&id=16583
该工具主要是使用图形化的界面来处理itext报表问题

上机必读二级上机考试部分评分方法

2006-10-12T23:27:00.000-07:00

作者：玲珑草草　来源：新浪　http://www.csai.cn　　2005年11月22日
自动评分系统有客观、公正的优点，但也有死板的缺点，要想得到比较好的分数，应当考虑到机器的这一特点。实际考试还有人工复查一项,由省级考试部门负责进行.但是人工复查如何进行，我们完全不得而知。因此我们下面的所有内容均不含人工复查内容，仅从考试系统本身来进行分析和说明。

　　我们从多次使用中摸索到的考生可能感兴趣的几点介绍如下：

　　 1. DOS操作题的评分比较复杂，评分系统在几次考试中标准似乎有一些变化。

　　按系统的操作说明，只要命令正确即可得分，但实际情况并非如此。机器评分只根据结果，结果正确即得分，命令正确而结果不正确，不能得分。

　　要注意使用规定的命令。比如考试系统不允许使用 deltree 命令，您如果习惯于用该命令来删除子目录，考试时将无法使用。

　　本人曾做过试验，将结果做得完全符合要求，而不让考试系统看到我所作的事（比如使用另外的工具来做），结果照样得分；而使用正确的命令（即使与答案完全相同），而结果不正确（自然使用了"不正当"的方法），评分结果是不能得分。

　　 2. 程序修改题的评分大约有下面一些特点：

　　有结果输出到文件中的，先检查结果文件。如果结果文件内容完全正确，给满分，并不再检查修改内容。

　　结果没有输出到文件，或结果文件不正确的，逐个错误语句进行检查。分数平均分配（如果共有两个错误，每修正一个得15分；共有三个错误，则每修正一个得10分……）。

　　检查标志为"***found***"。即机器死板地检查第X个"***found***"下面第N行（第X个错误语句应在的行）是否修改得和标准答案中的一个相同，相同则给分，否则不给分。

　　例如：您的修改是完全正确的，与标准答案也完全一致。但是您插入了一个空行在"***found***"和修改了的行之间，这显然不影响程序的正确性，但自动评分系统却会认定您"修改错误"。

　　更有甚者：如果您在程序的前面增加一个含有"***found***"的注释行，则不论您的程序修改得有多正确，评分系统会毫不留情地给您一个零分。

　　程序修改题中还应注意考虑原程序作者的思路，所作改动应尽量小。

　　这里有一个极端的例子：（1999年上半年二级BASIC）

'* 给定程序MODI1.BAS其功能是: 从键盘上每次输入两个100以下
'* 的正数分别赋给Y和Z(如不符合此条件的, 则重新输入)，累加到累
'* 加器X中,直到X的值超过500为止。请找出程序中的错误，将程序调
'* 试出所需结果。
'* 注意: 不得增行或删行, 也不得更改程序的结构!

X = 0
DO
　 DO
　　 t = 0
　　 INPUT "Y,Z="; Y, Z
　　 IF 0 < Y AND Y < 100 AND 0 < Z AND Z < 100 THEN
　　 t = 2
　　 ELSE
　　 PRINT "Out of Range! Input again"
　　 END IF
'**********found**********
　 LOOP WHILE t <> 1
　 X = X + Y + Z
'**********found**********
'WHILE X <> 500
PRINT "X="; X
END

　　这里共有两个错误：第一个为条件错，第二个语句和条件均有错。因此第一个错误可只改动条件为 t<>2 或 t=0，整个语句为
　　　 loop while t<>2 或者 loop while t=0
　　第二个错误可改为
　　　 LOOP WHILE X <= 500
　　总之，这里的思路就是用 DO ... LOOP WHILE <条件> 语句。
　　如果使用 do ... loop until <条件>，程序可以同样成立。如第一个错误改为
　　 loop until t=2
　　运行结果完全相同。
　　但是自动评分系统会认为您"修改错误！"扣掉您应得的15分！！！

　　过去 C 语言的考试题目一般都出的较为严谨，很少有错误发生(但2002上半年的题虽然没发现什么严重错误，其质量实在不敢恭维)。但在2001年下半年中，仍有错判现象。举一例如下：
/*
给定程序MODI1.C中函数fun的功能是：先将在字符串s中的字符
按逆序存放到t串中，然后把s中的字符按正序连接到t串的后面。
例如：当s中的字符串为："ABCDE"时，
则t中的字符串应为："EDCBAABCDE"。
请改正程序中的错误，使它能得出正确的结果。
注意：不要改动main函数，不得增行或删行，也不得更改程序
的结构！
*/
#include <conio.h>
#include <stdio.h>
#include <string.h>

void fun (char *s, char *t)
{
/************found************/
　 int i,sl;
// int i;
/* 由于C语言对书写格式不作要求，本错误如改为 int i, 其结果显然也是
　　正确的。然而遗憾的是，自动批改系统此时会判错！ */
　 sl = strlen(s);
　 for (i=0; i < sl; i++)
/************found************/
　　 t[ i ] = s[sl-i-1];
// t[i] = s[sl-i];
　 for (i=0; i 　　t[sl+i] = s[i];
　 t[2*sl] = '\0';
}

main()
{ char s[100], t[100];
　 clrscr();
　 printf("\nPlease enter string s:"); scanf("%s", s);
　 fun(s, t);
　 printf("The result is: %s\n", t);
}
　有的考生怕修改过程中忘记了原来的内容,把原来的内容用注释的方法保留在程序中（应该说，这是一个好的习惯）。比如把上面的内容写成
　　 t[ i ] = s[sl-i-1]; // t[ i ] = s[sl-i]; 或者
　　 t[ i ] = s[sl-i-1]; /* t[ i ] = s[sl-i]; */

　　毫无疑问，这是正确的。但是评分系统竟然会判为"错误"，不给分。考试系统会出现这种低级错误，倒是我以前未曾想到的，而且直至目前，这种错误仍未得到修正。

　　因此考生必须注意把错误的内容全部删除掉。

　　3. 编程题除去少部分类似填空或改错的BASIC程序外，均有结果输出到文件。自动评分时检查结果文件，如果结果文件内容正确，则给满分；如果没有结果文件（即使程序是正确的，但没有运行），则得零分；如果应有若干个结果，则得分一般按结果数平均分配（比如应有两个结果，其中一个正确，另一个错误，则一般可得40/2=20分）。在多数情况下，编程题往往不是满分就是零分。

　　要注意的是，在FoxBASE编程题中，如果要生成新的数据库，只要库结构正确，哪怕其他都是错误的，也可得10到20分（随题目不同而有所变化）。因此做不到编程题的考生不可轻言放弃。

　　部分BASIC的编程题实际上是填空题，因此是一个个空来改的，分数按空数平均分配。与程序修改题不同的是，它没有使用"***found***"标记，即使有添行等，也能正确进行评分。

　　有的编程题对考生提出了一些限制，比如不许使用某个或某类函数，或不许使用某种方法等。在评分时，却很可能没有考虑如何限制这一点。我曾试过专门用"不许"的方法去做题，在结果正确的情况下，照样得满分。看来考试系统也是"撑死胆大的，饿死胆小的"。当然，本人绝不鼓励考生不按要求做。如果你看了我的贴子，去做一个"胆大的"，得不到分可不要找我负责哟！！！

　　首先，我讲一下考试评分系统的工作原理：

　　考试评分系统是不看源程序。而是对你的源程序编译时所产生的.obj文件和.exe文件进行测试。测试分为两部份组成:

一、运行：完成输入、输出。
二、评分：与预期的结果对比。

运行：

　　1、运行.exe文件（由你的源程序生成的），运行时，它会调用一个读函数，把in.dat文件里的测试数据读入主函数；一般二级有20组数据，三级、四是一大组数据（一篇英文、400个四位数、100个记录等）

　　2、调用你所编写的函数，把这些数代入。

　　3、调用写函数，把运行结果写入out.dat文件里。一般二级有20行结果（就是每组数据的运行结果），三级、四级有一大组结果（如一组字符流）或二到三个结果（如求平均值、公差、符合条件的数的个数等）

　　以上这三个过程二级里是调用NONO函数完成，三级、四级是分别调用ReadDat()和WriteDat()函数来完成。

评分：

　　运行test.exe文件，把out.dat文件里的内容与评分系统内的内容（预期结果）比较，在二级里，每对一行（就是这组数据的测试结果），给5分。

　　三级、四级的就要看具体情况给分了，如：字符流处理的，那只要错一个小部分就0分，因为字符流是连续的。如果是数值处理的（有2-3个结果），那就是每对一个结果结20-30分，但错了一个答案就很难及格了，因为数值处理很多数是互相关联的，如：求平均值，如果符合条件的数的个数错了，那平均值也一定是错的。还有那个100个记录的，那它是以那一行上的内容是不是与预期的一样，每对一行给1分。（因为这个测试数据刚好一百行），这就是三级或四级里有： 0<成绩<100 分的原故。（很多人都说三级四级上机成绩不是0分就是一百分，这个观点是错的）

　　以上文件名、函数名应以源程序调用时的名为准。

　　由上述可知：一个题如果通过编译、能运行就一定有分，那是错的，因为一个题，如果你一点都不做（放空），那是一定能通过编译和运行的。但这时，out.dat文件为空，如果你编写了程序，而运行的结果都是错的，那和空是一样的。这样是不能得分的。

　　还有是有人说我做了题，通过了编译，也出了"正确"结果，那为什么会不及格呢？是不是考试系统有问题，这个可能很小，一般是因为你的程序有问题，如以前考网上有一个题：

求一子字符串在主字符串出现的次数；
例如：子串：go
主串：good yjgocel liugo ygoygong
结果为： 5

以下是两个人的回复：

一、int fun(char *str,char *s)
{
int m=0;
char *p=s;
while(*str!='\0')
{ if(*str==*p)
{ str++;
p++;
} /*两字符相同就同时移动指针。*/
else
{p=s;
str++ ; /*不同只移动一个指针，并把另一指针指向初始位置 */
}
if(*p=='\0') /*如果是连续的同时移动到了后一个字符串尾，就计一次数 */
{ m++;
p=s ;
}
}
return m;
}

二、int fun(char *str,char *s)
{
int i,j,m=0;
for(i=0;i<strlen(str);) {
for(j=0;j<strlen(s);)
if(str[i]==s[j]) {
i++;
j++;
}
else {
i++;
break;
}
if(j==strlen(s))
m++;
}
return m;
}

　　其实这两个答案，对于上面的那个主串和子串也许是可以的，但，如果主串是aaa aa,子串是aa,那上面这两个程序就不行了，因为，aa在aaa aa里出现了3次，而不是2次，字符串是可以嵌套出现的，而测试数据里的数据一般什么情况都有，而象这种嵌套的多，这就是他认为自已程序是对的，而结果是不及格的原故。

　　以上两位如果是考生的话，他们肯定会说他们的程序是绝对对的，是评分系统问题。

正确的应这样写：

fun(char *str,char *s)
{char str1[10]="";
int i,k=0;
for(;*str;str++)
{for(i=0;i<strlen(s);i++)
str1[i]=*(str+i);
if(!strcmp(str1,s)) k++;
}
return k;
}

　　下面我再讲一个测试上述程序的实例：

　　主串为：ababcabcacbab。子串为abc或ab。有兴趣的考生可以上机试一下看对不对

共享软件防破解的实用招法

2006-10-09T21:09:00.000-07:00

1、检测主程序大小，防止破解补丁之类： Function TForm1.GesSelfSf: integer; var F: file of byte; begin Filemode:=0; Assignfile(F,'.\FileName.exe'); Reset(f); Result:=Filesize(F); Closefile(F); end; 2、检测创建日期和时间，让破解补丁实效： Function TForm1.FinDate:String; var t:TDate; begin ShortDateFormat:='yyyy-mm-dd'; t:=FileDateToDateTime(FileAge('FileName.exe')); Result:=DateToStr(t); end; 3、注册码加密函数嵌入数学函数，增加破解难度：（略） 4、必要时自己删除自己（主程序）： procedure TForm1.Funll; var hModule:THandle; buff:array[0..255]of Char; hKernel32:THandle; pExitProcess,pDeleteFileA,pUnmapViewOfFileointer; begin hModule:=GetModuleHandle(nil); GetModuleFileName(hModule, buff, sizeof(buff)); CloseHandle(THandle(4)); hKernel32:=GetModuleHandle('KERNEL32'); pExitProcess:=GetProcAddress(hKernel32, 'ExitProcess'); pDeleteFileA:=GetProcAddress(hKernel32, 'DeleteFileA'); pUnmapViewOfFile:=GetProcAddress(hKernel32, 'UnmapViewOfFile'); asm LEA EAX, buff PUSH 0 PUSH 0 PUSH EAX PUSH pExitProcess PUSH hModule PUSH pDeleteFileA PUSH pUnmapViewOfFile RET end; begin Funll; end; end; 　　具体怎么使用，那要看你自己的意愿了和需要了。反正我是这样做的，我的软件ADSL拨号计时器只在很早版本上出过注册机，后来的v3.70出过破解补丁 ——其实只是破掉了启动时提示注册的对话框，实质上根本没破解。用了上述的着法以后，到现在的v5.28版本，再没有过什么破解补丁或注册机。　　如果现在的v5.28版本谁能破解，将立即公布程序源码。附：注册机破解法的原理以及应对方法认识注册机破解法　　顾名思义，写注册机来破解软件注册的方法，就是模仿你的注册码生成算法或者逆向注册码验证算法而写出来的和你一模一样的注册机。如果被写出注册机，你的软件只好免费了。或者你必须更换算法，但以前注过册的合法用户都得被迫更换注册码了。　　Cracker要写注册机必须详细研究你软件的验证模块，这必须先将你的软件脱壳，再反汇编或者用调试器跟踪。市面上许多加壳和保护软件都吹嘘不可能被脱壳，但到目前为止没有一个软件兑现了自己的诺言。由于CPU最终执行的都是有效指令，所以等你的程序自解压完成后再从内存中Dump出来就可以实现脱壳。因此不要在壳上面花很多功夫，因为没有这个必要。第一招：制造假相　　反汇编和调试器跟踪都是不可能防止的，因为所有的Win32程序都必须通过API来调用Windows系统中的关键DLL的（如Kernel32.dll、GDI32.dll等），然而API是可以Hook的。我们只能从自己的代码着手来保护我们的劳动果实了。　　为了自己调试和以后维护的方便，我们一般采用有意义的名字给我们的函数命名，可这给了Cracker可乘之机。例如这样的函数是什么意思大家应该一目了然吧?IsRegistered（），IsLicensed（），LicenseVerify（），CheckReg（）……这样Cracker就可以轻松地从数千个函数中找到他的目标——你的注册码校验函数!而且破解Delphi编写的软件还有一件TMG小组的破解利器——DeDe。它可以轻松地看到你软件里的Form、Unit和函数名，还可以反汇编一部分代码，更可以和Win32DASM合作反汇编更多的代码，对Delphi编出的程序威胁极大。　　为了不给Cracker创造温馨舒适的破解环境，要故意混乱（Obfuscate）我们的代码，将软件中所有的函数名全部替换成随机生成的函数名。例如Func_3dfsa_fs32zlfv这个函数是什么意思?恐怕只有天知道了。网上有现成的代码混乱器，按你使用的编程语言的种类可以找到一些。但要注意，只有当你要发布软件时才使用它，而且一定注意备份源代码。否则，当你看不懂你自己的代码时就着急了：）第二招：用公匙，并改名　　另外，一定要使用公开密匙算法保护你的软件。RSA、DSA和El Gamal之类的算法都可以从网上找到。但注意：将你算法单元中所有涉及到算法名称的字符串全部改名。避免被Cracker发现你用的算法而模仿写出注册机来!你还可以张冠李戴，明明用的DSA，将名字全部替换成RSA。　　其它算法，如对称算法和Hash算法也要注意改名，否则这样：　　EncryptedCode = Blowfish（MD5（UserName），MD5（Key））；　　//你的加密算法，使用了Blowfish（对称算法）和MD5（Hash算法）　　虽然那些Cracker不了解Blowfish和MD5算法的原理，也不会逆向推测它们，但他们了解你的校验算法的流程和算法名，便可马上从网上找到类似的Blowfish和MD5算法包，从而模拟你的软件仿造出注册机。　　如果你用不常见的，算法如Skipjack（NASA美国航天局标准算法）、LOKI、3-WAY、Safer之类不出名但保密程度很高的算法，并且全部改名，这样就会伤透他们脑筋了。　　当然，最好把Hash算法也全部改名，会给他们制造更多的困难。但注意，MD5和SHA之类的Hash初始值会被Cracker从内存中找到，这样他就知道你用的Hash了。所以建议同时使用MD5的变形算法Ripe-MD（RMD）128或160或其它的Hash，如Tiger、Haval等算法。第三招：阻止别人调试　　还有一点，调试器对我们的威胁很大，我们不会让Cracker们舒舒服服地使用SoftICE、TRW或OllyDbg来调试我们的程序。除了常用的MeItICE方法外，这里我给一个笔者写的方法：　　{检查自己的进程的父进程是否为Explorer.exe，否则是被调试器加载了}  　　{不过注意，控制台程序的父进程在WinNT下是Cmd.exe!} 　　{注意加载TlHelp32.pas单元} 　　procedure CheckParentProc；　　var //检查自己的进程的父进程　　Pn: TProcesseNtry32；　　sHandle:THandle；　　H，ExplProc，ParentProc:Hwnd；　　Found:Boolean；　　Buffer:array[0..1023]of Char；　　　Path:string；　　begin 　　H:= 0；　　ExplProc:= 0；　　ParentProc:= 0；　　//得到Windows的目录　　SetString（Path，Buffer）　　GetWindowsDirectory（Buffer，Sizeof（Buffer）- 1））；　　Path:= UpperCase（Path）+ '\EX PLORER.EXE'；//得到Explorer的路径　　//得到所有进程的列表快照　　sHandle:= CreateToolHelp32Snap Shot（TH32CS_SNAPALL，0）；　　Found:= Process32First（sHandle，Pn）；//查找进程　　while Found do //遍历所有进程　　begin 　　if Pn.szExeFile = ParamStr（0）then //自己的进程　　begin 　　ParentProc:= Pn.th32ParentProcessID://得到父进程的进程ID 　　//父进程的句柄　　H:= OpenProcess（PRO CESS_ALL_ACCESS，True，Pn.th32Parent ProcessID）；　　end 　　else if UpperCase（Pn.szExeFile）= Path then 　　ExplProc:= Pn.th32ProcessID；//Ex plorer的PID 　　Found:= Process32Next（sHandle，Pn）；//查找下一个　　end；　　//父进程不是Explorer，是调试器…… 　　if ParentProc <> ExplProc then 　　begin 　　TerminateProcess（H，0）；//杀之!除之而后快也! :）　　//你还可以加上其它什么死机代码来消遣消遣这位可爱的Cracker:）　　　end� 　　end � 　　你可以在Delphi或者VC中试试，这样可以把Delphi和VC杀掉了，因为你现在用的是Delphi和VC的内置调试器来运行你的程序。调试的时候你还是把它的注释删掉吧，发布时别忘记激活哟! 第四招：保护字符串　　最后一个问题，这也是一个非常重要的问题：保护你的字符串!字符串在注册模块中非常重要!当一个富有经验的Cracker破解你的软件时，首先做的就是窃取你的字符串。比如他会输入错误的注册码，得到你关于错误注册码的提示，通常是"无效的注册码，请重新输入!"或者"Invalid key（please input again）"等等，然后用OllyDbg进行断点调试或者用WinDASM、IDA Pro等静态分析工具在被他脱壳后的程序中查找那个字符串，找到后进行分析。因此，请一定加密你的字符串! 使用时再临时解密出来，而且要尽量少使用消息提示框，避免被Cracker找到漏洞。加密字符串不需要太复杂的算法，随便找一个快速的对称算法就可以了。　　最后提醒大家一句，不要在加密上花太多的功夫!你应该把更多的时间和精力都用来完善你的软件，这样会更合算。借用一位前辈的话来忠告大家吧：花点时间考虑你自己的软件，看看它是否值得保护?如果没人用你的软件，保护也就没有意义了，不要过高估计你的软件"对世界的重要性

oracle 942错误

2006-09-10T20:06:00.000-07:00

Imp正常，但Exp却无法完成
==============================
前日晚上准备对刚刚启用的Unix环境Oracle数据库做一次Exp逻辑备份，报如下错误：

EXP-00056: ORACLE error 942 encountered
ORA-00942: table or view does not exist
EXP-00000: Export terminated unsuccessfully

感觉很奇怪，因为数据库中的数据就是通过Imp转移来的，怎么这里的Exp不能用了呢？上网搜了一下，发现这个问题还并不鲜见，找到一篇文章解释为Oracle本身的一个bug，发生在从920升级到9206以后，因此建议在升级后用Exp命令来检验升级是否真正成功，但事已至此，我又检查了测试环境和开发环境，发现都有这样的我问题，于是根据作者提供的方法，执行了/rdbms/admin/catpatch.sql脚本，然后手动编译了 sys schema下的所有package，再使用Exp命令导出数据就可以了，具体命令如下：

SQL>shutdown immediate;
SQL>startup migrate;
SQL>@?/rdbms/admin/catpatch.sql

SQL>shutdown immediate;

SQL>startup;

========================

XP-00056: 遇到 ORACLE 错误 942

ORA-00942: 表或视图不存在

EXP-00000: 导出终止失败

解决办法：报此错误并不是因为你的权限不够，也不是因为你的命令有误，而是ORACLE本身的问题，是由于你的客户端版本低于服务器端的版本造成的。最好的办法就是装一个与服务器端版本相同客户端。要不就到服务器端去导吧。

在Oracle中存取BLOB对象实现文件的上传和下载

2006-09-08T01:30:00.000-07:00

最近做一个J2EE项目，需要在JSP页面实现对文件的上传和下载。很早以前就知道JDBC支持大对象（LOB）的存取，以为很容易，做起来才发现问题多多，读了一大堆文章，反而没有什么头绪了。正如一位网友文章所讲：“…网络上的教程99%都是行不通的，连SUN自己的文档都一直错误……”，实际情况大致如此了。

存取BLOB出现这么多问题，我认为大半是由数据库开发商、应用服务器商在JDBC驱动上的不兼容性带来的。而实际应用中，每个人的开发运行环境不同，使得某个网友的solution没有办法在别人的应用中重现，以至于骂声一片。至于为什么会不兼容、有哪些问题，我没有时间去弄清，这里只说说我们怎样解决了问题的。

基于上述原因，先列出我们的开发环境，免得有人配不出来，招人唾骂。

数据库 Oracle 9i

应用服务器 BEA Weblogic 8.11

开发工具 JBuilder X

在JSP实现文件Upload/Download可以分成这样几块：文件提交到形成InputSteam；InputSteam以BLOB格式入库；数据从库中读出为InputSteam；InputStream输出到页面形成下载文件。先说BLOB吧。

1． BLOB入库

（1）直接获得数据库连接的情况

这是Oracle提供的标准方式，先插入一个空BLOB对象，然后Update这个空对象。代码如下：

//得到数据库连接（驱动包是weblogic的，没有下载任何新版本）

Class.forName("oracle.jdbc.driver.OracleDriver");

Connection con = DriverManager.getConnection(

"jdbc:oracle:thin:@localhost:1521:testdb", "test", "test");

//处理事务

con.setAutoCommit(false);

Statement st = con.createStatement();

//插入一个空对象

st.executeUpdate("insert into BLOBIMG values(103,empty_blob())");

//用for update方式锁定数据行

ResultSet rs = st.executeQuery(

"select contents from BLOBIMG where id=103 for update");

if (rs.next()) {

//得到java.sql.Blob对象，然后Cast为oracle.sql.BLOB

oracle.sql.BLOB blob = (oracle.sql.BLOB) rs.getBlob(1).;

//到数据库的输出流

OutputStream outStream = blob.getBinaryOutputStream();

//这里用一个文件模拟输入流

File file = new File("d:\\proxy.txt");

InputStream fin = new FileInputStream(file);

//将输入流写到输出流

byte[] b = new byte[blob.getBufferSize()];

int len = 0;

while ( (len = fin.read(b)) != -1) {

outStream.write(b, 0, len);

//blob.putBytes(1,b);

}

//依次关闭（注意顺序）

fin.close();

outStream.flush();

outStream.close();

con.commit();

con.close();

（2）通过JNDI获得数据库连接

在Weblogic中配置到Oracle的JDBC Connection Pool和DataSource，绑定到Context中，假定绑定名为”orads”。

为了得到数据库连接，做一个连接工厂，主要代码如下：

Context context = new InitialContext();

ds = (DataSource) context.lookup("orads");

return ds.getConnection();

以下是BLOB写入数据库的代码：

Connection con = ConnectionFactory.getConnection();

con.setAutoCommit(false);

Statement st = con.createStatement();

st.executeUpdate("insert into BLOBIMG values(103,empty_blob())");

ResultSet rs = st.executeQuery(

"select contents from BLOBIMG where id=103 for update");

if (rs.next()) {

//上面代码不变

//这里不能用oracle.sql.BLOB，会报ClassCast 异常

weblogic.jdbc.vendor.oracle.OracleThinBlobblob = (weblogic.jdbc.vendor.oracle.OracleThinBlob) rs.getBlob(1);

//以后代码也不变

OutputStream outStream = blob.getBinaryOutputStream();

File file = new File("d:\\proxy.txt");

InputStream fin = new FileInputStream(file);

byte[] b = new byte[blob.getBufferSize()];

int len = 0;

while ( (len = fin.read(b)) != -1) {

outStream.write(b, 0, len);

}

fin.close();

outStream.flush();

outStream.close();

con.commit();

con.close();

2． BLOB出库

从数据库中读出BLOB数据没有上述由于连接池的不同带来的差异，只需要J2SE的标准类java.sql.Blob就可以取得输出流（注意区别java.sql.Blob和oracle.sql.BLOB）。代码如下：

Connection con = ConnectionFactory.getConnection();

con.setAutoCommit(false);

Statement st = con.createStatement();

//这里的SQL语句不再需要”for update”

ResultSet rs = st.executeQuery(

"select contents from BLOBIMG where id=103 ");

if (rs.next()) {

java.sql.Blob blob = rs.getBlob(1);

InputStream ins = blob.getBinaryStream();

//用文件模拟输出流

File file = new File("d:\\output.txt");

OutputStream fout = new FileOutputStream(file);

//下面将BLOB数据写入文件

byte[] b = new byte[1024];

int len = 0;

while ( (len = ins.read(b)) != -1) {

fout.write(b, 0, len);

}

//依次关闭

fout.close();

ins.close();

con.commit();

con.close();

3．从JSP页面提交文件到数据库

（1）提交页面的代码如下：

<form action="handle.jsp" enctype="multipart/form-data" method="post" >

<input type="hidden" name="id" value="103"/>

<input type="file" name="fileToUpload">

<input type="submit" value="Upload">

</form>

（2）由于JSP没有提供文件上传的处理能力，只有使用第三方的开发包。网络上开源的包有很多，我们这里选择Apache Jakarta的FileUpload，在http://jakarta.apache.org/commons/fileupload/index.html 可以得到下载包和完整的API文档。法奥为adajspException

处理页面（handle.jsp）的代码如下

<%

boolean isMultipart = FileUpload.isMultipartContent(request);

if (isMultipart) {

// 建立一个新的Upload对象

DiskFileUpload upload = new DiskFileUpload();

// 设置上载文件的参数

//upload.setSizeThreshold(yourMaxMemorySize);

//upload.setSizeMax(yourMaxRequestSize);

String rootPath = getServletConfig().getServletContext().getRealPath("/") ;

upload.setRepositoryPath(rootPath+\\uploads);

// 分析request中的传来的文件流，返回Item的集合，

// 轮询Items，如果不是表单域，就是一个文件对象。

List items = upload.parseRequest(request);

Iterator iter = items.iterator();

while (iter.hasNext()) {

FileItem item = (FileItem) iter.next();

//如果是文件对象

if (!item.isFormField()) {

//如果是文本文件，可以直接显示

//out.println(item.getString());

//将上载的文件写到服务器的\WEB-INF\webstart\下，文件名为test.txt

//File uploadedFile = new File(rootPath+"\\uploads\\test.txt");

//item.write(uploadedFile);

//下面的代码是将文件入库（略）：

//注意输入流的获取

…

InputStream uploadedStream = item.getInputStream();

…

}

//否则是普通表单

else{

out.println("FieldName: " + item.getFieldName()+"<br>");

out.println("Value: "+item.getString()+"<br>"); }

}

}

%>

4．从数据库读取BLOB然后保存到客户端磁盘上

这段代码有点诡异，执行后将会弹出文件保存对话窗口，将BLOB数据读出保存到本地文件。全文列出如下：

<%@ page contentType="text/html; charset=GBK" import="java.io.*" import="java.sql.*" import="test.global.ConnectionFactory"%><%

Connection con = ConnectionFactory.getConnection();

con.setAutoCommit(false);

Statement st = con.createStatement();

ResultSet rs = st.executeQuery(

"select contents from BLOBIMG where id=103 ");

if (rs.next()) {

Blob blob = rs.getBlob(1);

InputStream ins = blob.getBinaryStream();

response.setContentType("application/unknown");

response.addHeader("Content-Disposition", "attachment; filename="+"output.txt");

OutputStream outStream = response.getOutputStream();

byte[] bytes = new byte[1024];

int len = 0;

while ((len=ins.read(bytes))!=-1) {

outStream.write(bytes,0,len);

}

ins.close();

outStream.close();

outStream = null;

con.commit();

con.close();

}

%>

注意，在<% … … %>之外，绝对不能有任何字符，空格或回车都不行，不然会导致outputStream出错，对非ASCII输出文件来说就是格式错误不可读。

在Oracle中存取BLOB对象实现文件的上传和下载_站长技术站 -

2006-09-08T01:25:00.000-07:00

最近做一个J2EE项目，需要在JSP页面实现对文件的上传和下载。很早以前就知道JDBC支持大对象（LOB）的存取，以为很容易，做起来才发现问题多多，读了一大堆文章，反而没有什么头绪了。正如一位网友文章所讲：“…网络上的教程99%都是行不通的，连SUN自己的文档都一直错误……”，实际情况大致如此了。

存取BLOB出现这么多问题，我认为大半是由数据库开发商、应用服务器商在JDBC驱动上的不兼容性带来的。而实际应用中，每个人的开发运行环境不同，使得某个网友的solution没有办法在别人的应用中重现，以至于骂声一片。至于为什么会不兼容、有哪些问题，我没有时间去弄清，这里只说说我们怎样解决了问题的。

基于上述原因，先列出我们的开发环境，免得有人配不出来，招人唾骂。

数据库 Oracle 9i

应用服务器 BEA Weblogic 8.11

开发工具 JBuilder X

在JSP实现文件Upload/Download可以分成这样几块：文件提交到形成InputSteam；InputSteam以BLOB格式入库；数据从库中读出为InputSteam；InputStream输出到页面形成下载文件。先说BLOB吧。

1． BLOB入库

（1）直接获得数据库连接的情况

这是Oracle提供的标准方式，先插入一个空BLOB对象，然后Update这个空对象。代码如下：

//得到数据库连接（驱动包是weblogic的，没有下载任何新版本）

Class.forName("oracle.jdbc.driver.OracleDriver");

Connection con = DriverManager.getConnection(

"jdbc:oracle:thin:@localhost:1521:testdb", "test", "test");

//处理事务

con.setAutoCommit(false);

Statement st = con.createStatement();

//插入一个空对象

st.executeUpdate("insert into BLOBIMG values(103,empty_blob())");

//用for update方式锁定数据行

ResultSet rs = st.executeQuery(

"select contents from BLOBIMG where id=103 for update");

if (rs.next()) {

//得到java.sql.Blob对象，然后Cast为oracle.sql.BLOB

oracle.sql.BLOB blob = (oracle.sql.BLOB) rs.getBlob(1).;

//到数据库的输出流

OutputStream outStream = blob.getBinaryOutputStream();

//这里用一个文件模拟输入流

File file = new File("d:\\proxy.txt");

InputStream fin = new FileInputStream(file);

//将输入流写到输出流

byte[] b = new byte[blob.getBufferSize()];

int len = 0;

while ( (len = fin.read(b)) != -1) {

outStream.write(b, 0, len);

//blob.putBytes(1,b);

}

//依次关闭（注意顺序）

fin.close();

outStream.flush();

outStream.close();

con.commit();

con.close();

（2）通过JNDI获得数据库连接

在Weblogic中配置到Oracle的JDBC Connection Pool和DataSource，绑定到Context中，假定绑定名为”orads”。

为了得到数据库连接，做一个连接工厂，主要代码如下：

Context context = new InitialContext();

ds = (DataSource) context.lookup("orads");

return ds.getConnection();

以下是BLOB写入数据库的代码：

Connection con = ConnectionFactory.getConnection();

con.setAutoCommit(false);

Statement st = con.createStatement();

st.executeUpdate("insert into BLOBIMG values(103,empty_blob())");

ResultSet rs = st.executeQuery(

"select contents from BLOBIMG where id=103 for update");

if (rs.next()) {

//上面代码不变

//这里不能用oracle.sql.BLOB，会报ClassCast 异常

weblogic.jdbc.vendor.oracle.OracleThinBlobblob = (weblogic.jdbc.vendor.oracle.OracleThinBlob) rs.getBlob(1);

//以后代码也不变

OutputStream outStream = blob.getBinaryOutputStream();

File file = new File("d:\\proxy.txt");

InputStream fin = new FileInputStream(file);

byte[] b = new byte[blob.getBufferSize()];

int len = 0;

while ( (len = fin.read(b)) != -1) {

outStream.write(b, 0, len);

}

fin.close();

outStream.flush();

outStream.close();

con.commit();

con.close();

2． BLOB出库

从数据库中读出BLOB数据没有上述由于连接池的不同带来的差异，只需要J2SE的标准类java.sql.Blob就可以取得输出流（注意区别java.sql.Blob和oracle.sql.BLOB）。代码如下：

Connection con = ConnectionFactory.getConnection();

con.setAutoCommit(false);

Statement st = con.createStatement();

//这里的SQL语句不再需要”for update”

ResultSet rs = st.executeQuery(

"select contents from BLOBIMG where id=103 ");

if (rs.next()) {

java.sql.Blob blob = rs.getBlob(1);

InputStream ins = blob.getBinaryStream();

//用文件模拟输出流

File file = new File("d:\\output.txt");

OutputStream fout = new FileOutputStream(file);

//下面将BLOB数据写入文件

byte[] b = new byte[1024];

int len = 0;

while ( (len = ins.read(b)) != -1) {

fout.write(b, 0, len);

}

//依次关闭

fout.close();

ins.close();

con.commit();

con.close();

3．从JSP页面提交文件到数据库

（1）提交页面的代码如下：

name="fileToUpload">

value="Upload">

（2）由于JSP没有提供文件上传的处理能力，只有使用第三方的开发包。网络上开源的包有很多，我们这里选择Apache Jakarta的FileUpload，在http://jakarta.apache.org/commons/fileupload/index.html 可以得到下载包和完整的API文档。法奥为adajspException

处理页面（handle.jsp）的代码如下

<%

boolean isMultipart = FileUpload.isMultipartContent(request);

if (isMultipart) {

// 建立一个新的Upload对象

DiskFileUpload upload = new DiskFileUpload();

// 设置上载文件的参数

//upload.setSizeThreshold(yourMaxMemorySize);

//upload.setSizeMax(yourMaxRequestSize);

String rootPath = getServletConfig().getServletContext().getRealPath("/") ;

upload.setRepositoryPath(rootPath+\\uploads);

// 分析request中的传来的文件流，返回Item的集合，

// 轮询Items，如果不是表单域，就是一个文件对象。

List items = upload.parseRequest(request);

Iterator iter = items.iterator();

while (iter.hasNext()) {

FileItem item = (FileItem) iter.next();

//如果是文件对象

if (!item.isFormField()) {

//如果是文本文件，可以直接显示

//out.println(item.getString());

//将上载的文件写到服务器的\WEB-INF\webstart\下，文件名为test.txt

//File uploadedFile = new File(rootPath+"\\uploads\\test.txt");

//item.write(uploadedFile);

//下面的代码是将文件入库（略）：

//注意输入流的获取

…

InputStream uploadedStream = item.getInputStream();

…

}

//否则是普通表单

else{

out.println("FieldName: " + item.getFieldName()+"
");

out.println("Value: "+item.getString()+"
"); }

}

}

%>

4．从数据库读取BLOB然后保存到客户端磁盘上

这段代码有点诡异，执行后将会弹出文件保存对话窗口，将BLOB数据读出保存到本地文件。全文列出如下：

<%@ page contentType="text/html; charset=GBK" import="java.io.*" import="java.sql.*" import="test.global.ConnectionFactory"%><%

Connection con = ConnectionFactory.getConnection();

con.setAutoCommit(false);

Statement st = con.createStatement();

ResultSet rs = st.executeQuery(

"select contents from BLOBIMG where id=103 ");

if (rs.next()) {

Blob blob = rs.getBlob(1);

InputStream ins = blob.getBinaryStream();

response.setContentType("application/unknown");

response.addHeader("Content-Disposition", "attachment; filename="+"output.txt");

OutputStream outStream = response.getOutputStream();

byte[] bytes = new byte[1024];

int len = 0;

while ((len=ins.read(bytes))!=-1) {

outStream.write(bytes,0,len);

}

ins.close();

outStream.close();

outStream = null;

con.commit();

con.close();

}

%>

注意，在<% … … %>之外，绝对不能有任何字符，空格或回车都不行，不然会导致outputStream出错，对非ASCII输出文件来说就是格式错误不可读。

"><$BlogItemTitle$>

动态SQL和PL/SQL的EXECUTE IMMEDIATE选项--ORACLE

2006-09-08T01:15:00.000-07:00

EXECUTE IMMEDIATE代替了以前Oracle8i中DBMS_SQL package包.它解析并马上执行动态的SQL语句或非运行时创建的PL/SQL块.动态创建和执行SQL语句性能超前，EXECUTE IMMEDIATE的目标在于减小企业费用并获得较高的性能，较之以前它相当容易编码.尽管DBMS_SQL仍然可用，但是推荐使用EXECUTE IMMEDIATE,因为它获的收益在包之上。
　　
　　使用技巧
　　
　　1. EXECUTE IMMEDIATE将不会提交一个DML事务执行，应该显式提交
　　如果通过EXECUTE IMMEDIATE处理DML命令，那么在完成以前需要显式提交或者作为EXECUTE IMMEDIATE自己的一部分. 如果通过EXECUTE IMMEDIATE处理DDL命令,它提交所有以前改变的数据
　　
　　2. 不支持返回多行的查询,这种交互将用临时表来存储记录(参照例子如下)或者用REF cursors.
　　
　　3. 当执行SQL语句时，不要用分号，当执行PL/SQL块时，在其尾部用分号.
　　
　　4. 在Oracle手册中，未详细覆盖这些功能。下面的例子展示了所有用到Execute immediate的可能方面.希望能给你带来方便.
　　
　　5. 对于Forms开发者,当在PL/SQL 8.0.6.3.版本中，Forms 6i不能使用此功能.
　　
　　EXECUTE IMMEDIATE用法例子
　　
　　1. 在PL/SQL运行DDL语句
　　
　　 begin
　　　execute immediate 'set role all';
　　 end;
　　
　　2. 给动态语句传值(USING 子句)
　　
　　 declare
　　　l_depnam varchar2(20) := 'testing';
　　　l_loc　　varchar2(10) := 'Dubai';
　　　begin
　　　execute immediate 'insert into dept values　(:1, :2, :3)'
　　　　using 50, l_depnam, l_loc;
　　　commit;
　　 end;
　　
　　3. 从动态语句检索值(INTO子句)
　　
　　 declare
　　　l_cnt　　varchar2(20);
　　 begin
　　　execute immediate 'select count(1) from emp'
　　　　into l_cnt;
　　　dbms_output.put_line(l_cnt);
　　 end;
　　
　　4. 动态调用例程.例程中用到的绑定变量参数必须指定参数类型.黓认为IN类型,其它类型必须显式指定
　　
　　 declare
　　　l_routin　 varchar2(100) := 'gen2161.get_rowcnt';
　　　l_tblnam　 varchar2(20) := 'emp';
　　　l_cnt　　　number;
　　　l_status　 varchar2(200);
　　 begin
　　　execute immediate 'begin ' || l_routin || '(:2, :3, :4); end;'
　　　　using in l_tblnam, out l_cnt, in out l_status;
　　
　　　if l_status != 'OK' then
　　　　 dbms_output.put_line('error');
　　　end if;
　　 end;
　　
　　5. 将返回值传递到PL/SQL记录类型;同样也可用%rowtype变量
　　
　　 declare
　　　type empdtlrec is record (empno　number(4),
　　　　　　　　　　　　　　　 ename　varchar2(20),
　　　　　　　　　　　　　　　 deptno　number(2));
　　　empdtl empdtlrec;
　　 begin
　　　execute immediate 'select empno, ename, deptno ' ||
　　　　　　　　　　　 'from emp where empno = 7934'
　　　　into empdtl;
　　 end;
　　
　　6. 传递并检索值.INTO子句用在USING子句前
　　
　　 declare
　　　l_dept　　pls_integer := 20;
　　　l_nam　　 varchar2(20);
　　　l_loc　　 varchar2(20);
　　 begin
　　　execute immediate 'select dname, loc from dept where deptno = :1'
　　　　into l_nam, l_loc
　　　　using l_dept ;
　　 end;
　　
　　7. 多行查询选项.对此选项用insert语句填充临时表，用临时表进行进一步的处理,也可以用REF cursors纠正此缺憾.
　　
　　 declare
　　　l_sal　 pls_integer := 2000;
　　 begin
　　　execute immediate 'insert into temp(empno, ename) ' ||
　　　　　　　　　　　 '　　　　　select empno, ename from emp ' ||
　　　　　　　　　　　 '　　　　　where　sal > :1'
　　　　using l_sal;
　　　commit;
　　 end;
　　
　　对于处理动态语句,EXECUTE IMMEDIATE比以前可能用到的更容易并且更高效.当意图执行动态语句时，适当地处理异常更加重要.应该关注于捕获所有可能的异常.

"><$BlogItemTitle$>

Oracle自定义函数——f_henry_GetStringLength_

2006-09-08T01:14:00.000-07:00

Oracle下的Length()函数不能区分中英文，只能得到字符数而不能得到字节数，很多时候插入string到字段中时总要先进行一次检查，防止 string长度超过了字段定义的长度，一般大家都是把这个检测放到应用程序中执行，用我写的这个小函数就可以实现在数据库服务器端对要插入的字段进行检测。

create or replace function f_henry_GetStringLength(pv_String in varchar2) return integer is
Result integer;
i number;
begin
Result:=0;
if length(pv_String)=0 then
return(Result);
end if;
for i in 1 .. length(pv_String) loop
if ascii(substr(pv_String,i,1))<256 then
Result:=Result+1;
else
Result:=Result+2;
end if;
end loop;
return(Result);
end f_henry_GetStringLength;

/*************************以下是测试***************************/

SQL> select length('啊$@oii发大幅') from dual;

LENGTH('啊$@OII发大幅')
-----------------------
9

SQL> select f_henry_GetStringLength('啊$@oii发大幅') from dual;

F_HENRY_GETSTRINGLENGTH('啊$@O
------------------------------
13

"><$BlogItemTitle$>

求在9i的存储过程中二维数组的完整例子及说明table ,varrry ,recor都行.

2006-09-08T01:12:00.000-07:00

---------------------- 单维数组 ------------------------

DECLARE
TYPE emp_ssn_array IS TABLE OF NUMBER
INDEX BY BINARY_INTEGER;

best_employees emp_ssn_array;
worst_employees emp_ssn_array;

BEGIN
best_employees(1) := '123456';
best_employees(2) := '888888';

worst_employees(1) := '222222';
worst_employees(2) := '666666';

FOR i IN 1..best_employees.count LOOP
DBMS_OUTPUT.PUT_LINE('i=' ¦ ¦ i ¦ ¦ ', best_employees= ' ¦ ¦best_employees(i)
¦ ¦ ', worst_employees= ' ¦ ¦worst_employees(i));
END LOOP;

END;

---------------------- 多维数组 ------------------------
DECLARE

TYPE emp_type IS RECORD
( emp_id number,
emp_name string(80),
emp_gender string(80));

TYPE emp_type_array IS TABLE OF
emp_type INDEX BY BINARY_INTEGER;

emp_rec_array emp_type_array;
emp_rec emp_type;

BEGIN
emp_rec.emp_id := 300000000;
emp_rec.emp_name := 'Barbara';
emp_rec.emp_gender := 'Female';

emp_rec_array(1) := emp_rec;

emp_rec.emp_id := 300000008;
emp_rec.emp_name := 'Rick';
emp_rec.emp_gender := 'Male';

emp_rec_array(2) := emp_rec;

FOR i IN 1..emp_rec_array.count LOOP
DBMS_OUTPUT.PUT_LINE('i=' ¦ ¦i
¦ ¦', emp_id =' ¦ ¦emp_rec_array(i).emp_id
¦ ¦', emp_name =' ¦ ¦emp_rec_array(i).emp_name
¦ ¦', emp_gender = ' ¦ ¦emp_rec_array(i).emp_gender);
END LOOP;

END;
-------------- Result --------------
i=1, emp_id =300000000, emp_name =Barbara, emp_gender = Female
i=2, emp_id =300000008, emp_name =Rick, emp_gender = Male

"><$BlogItemTitle$>

oracle错误信息大全

2006-09-08T01:10:00.000-07:00

ORACLE的这类错误在ORALCE的文档中有详细说明，但原因及措施说明不详细，本文当着重说明如何解决这类错误。

　　1、ORA-12571、ORA-03113、ORA-03114、ORA-01041

　　特征:客户端(代理或应用服务器)有时报这类断连错误

　　原因:如果偶尔出现一次，则可能为网络原因或用户异常中止，如果经常出现则为客户端与服务端的字符集不一致。

　　措施:如果偶尔出现，可在服务端的协议配置文件PROTOCOL.ORA中增加一行

　　TCP.NODELAY=YES;

　　如果经常出现，则为客户端与服务端字符集不一致或网络原因。

　　客户端的字符集在注册表里定义:　　　　HKEY__LOCAL__MACHINE/SOFTWARE/ORACLE/NLS__LANG

　　在客户端注册表中的TCP参数项中设置　　　TCPMAXDATARETRANSMITIONS=20。

　　2、ORA-01000

　　特征:达到会话允许的最大游标数

　　原因:达到会话允许的最大游标数

　　措施:有两种解决方法:

　　(1)在初始化文件INIT.ORA文件中增加OPEN_CURSORS的数量，一般要求大于200。

　　(2)在应用级，与开发工具有关，例如设置MAXOPEN_CURSORS等。

　　3、ORA-01545

　　特征:某个回滚段不可用

　　原因:(1)当使回滚段ONLINE时，但回滚段不可用，例如回滚段所在表空间OFFLINE;

　　(2) 当使回滚段ONLINE时，但回滚段已ONLINE，例如回滚段被使用两次，典型的案例如OPS方式时，回滚段不能公有;

　　(3)删除回滚段时，回滚段中有活动的事务;

　　措施:(1)确保回滚段可

　　(2)从初始化文件INIT.ORA的参数ROLLBACK)SEGMENTS中删除指定的回滚段。

　　(3)可以将回滚段所在表空间删除，取消UNDO事务

　　4、ORA-0165x

　　特征:表空间没有足够的空间供分配

　　原因:表空间已满;存储参数不合理，NEXT太小;没有连续的区间

　　措施:如果表空间已满，则需为表空间增加文件;如果存储参数不合理，则需增加INITIAL和NEXT;如果没有连续的区间，需要合并空闲的表空间。

　　查看空间碎片用DBA_FREE_SPACE

　　5、ORA-01555

　　特征:当前会话无法读到以前版本的数据

　　原因:原因很多，主要原因有下列:回滚段太小、太少;回滚段冲突;交叉提交(FETCH_ACROSS)

　　措施:增加回滚段数量;

　　6、ORA-04031

　　特征:共享池内存区内存不够，或产生内存碎片

　　原因:当试图装载一个大包时或执行一个较大的存储过程时，而共享池没有连续的内存空间。

　　措施:如果是内存不够，则增加SHARE)POOL_SIZE;

　　如果是内存碎片，执行alter system flush share_pool

　　7、ORA-04091

　　特征:触发器工作不正常

　　原因:一个行触发读取或修改变化的表(正在修改、插入)时，产生这种错误。

　　措施:检查触发器脚本，保证引用完整性

　　8、ORA-01242、ORA-01113

　　特征:介质故障导致数据库宕机

　　原因:介质故障。

　　措施:检查硬件故障;修改dbshut脚本，将其中的STARTUP命令修改为:

　　Startup open recover

　　Alter database open

"><$BlogItemTitle$>

ORACLE函数大全

2006-09-08T01:08:00.000-07:00

SQL中的单记录函数
1.ASCII
返回与指定的字符对应的十进制数;
SQL> select ascii('A') A,ascii('a') a,ascii('0') zero,ascii(' ') space from dual;

A A ZERO SPACE
--------- --------- --------- ---------
65 97 48 32

2.CHR
给出整数,返回对应的字符;
SQL> select chr(54740) zhao,chr(65) chr65 from dual;

ZH C
-- -
赵 A

3.CONCAT
连接两个字符串;
SQL> select concat('010-','88888888')||'转23' 高乾竞电话 from dual;

高乾竞电话
----------------
010-88888888转23

4.INITCAP
返回字符串并将字符串的第一个字母变为大写;
SQL> select initcap('smith') upp from dual;

UPP
-----
Smith

5.INSTR(C1,C2,I,J)
在一个字符串中搜索指定的字符,返回发现指定的字符的位置;
C1 被搜索的字符串
C2 希望搜索的字符串
I 搜索的开始位置,默认为1
J 出现的位置,默认为1
SQL> select instr('oracle traning','ra',1,2) instring from dual;

INSTRING
---------
9

6.LENGTH
返回字符串的长度;
SQL> select name,length(name),addr,length(addr),sal,length(to_char(sal)) from gao.nchar_tst;

NAME LENGTH(NAME) ADDR LENGTH(ADDR) SAL LENGTH(TO_CHAR(SAL))
------ ------------ ---------------- ------------ --------- --------------------
高乾竞 3 北京市海锭区 6 9999.99 7

7.LOWER
返回字符串,并将所有的字符小写
SQL> select lower('AaBbCcDd')AaBbCcDd from dual;

AABBCCDD
--------
aabbccdd

8.UPPER
返回字符串,并将所有的字符大写
SQL> select upper('AaBbCcDd') upper from dual;

UPPER
--------
AABBCCDD

9.RPAD和LPAD(粘贴字符)
RPAD 在列的右边粘贴字符
LPAD 在列的左边粘贴字符
SQL> select lpad(rpad('gao',10,'*'),17,'*')from dual;

LPAD(RPAD('GAO',1
-----------------
*******gao*******
不够字符则用*来填满

10.LTRIM和RTRIM
LTRIM 删除左边出现的字符串
RTRIM 删除右边出现的字符串
SQL> select ltrim(rtrim(' gao qian jing ',' '),' ') from dual;

LTRIM(RTRIM('
-------------
gao qian jing

11.SUBSTR(string,start,count)
取子字符串,从start开始,取count个
SQL> select substr('13088888888',3,8) from dual;

SUBSTR('
--------
08888888

12.REPLACE('string','s1','s2')
string 希望被替换的字符或变��
s1 被替换的字符串
s2 要替换的字符串
SQL> select replace('he love you','he','i') from dual;

REPLACE('H
----------
i love you

13.SOUNDEX
返回一个与给定的字符串读音相同的字符串
SQL> create table table1(xm varchar(8));
SQL> insert into table1 values('weather');
SQL> insert into table1 values('wether');
SQL> insert into table1 values('gao');

SQL> select xm from table1 where soundex(xm)=soundex('weather');

XM
--------
weather
wether

14.TRIM('s' from 'string')
LEADING 剪掉前面的字符
TRAILING 剪掉后面的字符
如果不指定,默认为空格符

15.ABS
返回指定值的绝对值
SQL> select abs(100),abs(-100) from dual;

ABS(100) ABS(-100)
--------- ---------
100 100

16.ACOS
给出反余弦的值
SQL> select acos(-1) from dual;

ACOS(-1)
---------
3.1415927

17.ASIN
给出反正弦的值
SQL> select asin(0.5) from dual;

ASIN(0.5)
---------
.52359878

18.ATAN
返回一个数字的反正切值
SQL> select atan(1) from dual;

ATAN(1)
---------
.78539816

19.CEIL
返回大于或等于给出数字的最小整数
SQL> select ceil(3.1415927) from dual;

CEIL(3.1415927)
---------------
4

20.COS
返回一个给定数字的余弦
SQL> select cos(-3.1415927) from dual;

COS(-3.1415927)
---------------
-1

21.COSH
返回一个数字反余弦值
SQL> select cosh(20) from dual;

COSH(20)
---------
242582598

22.EXP
返回一个数字e的n次方根
SQL> select exp(2),exp(1) from dual;

EXP(2) EXP(1)
--------- ---------
7.3890561 2.7182818

23.FLOOR
对给定的数字取整数
SQL> select floor(2345.67) from dual;

FLOOR(2345.67)
--------------
2345

24.LN
返回一个数字的对数值
SQL> select ln(1),ln(2),ln(2.7182818) from dual;

LN(1) LN(2) LN(2.7182818)
--------- --------- -------------
0 .69314718 .99999999

25.LOG(n1,n2)
返回一个以n1为底n2的对数
SQL> select log(2,1),log(2,4) from dual;

LOG(2,1) LOG(2,4)
--------- ---------
0 2

26.MOD(n1,n2)
返回一个n1除以n2的余数
SQL> select mod(10,3),mod(3,3),mod(2,3) from dual;

MOD(10,3) MOD(3,3) MOD(2,3)
--------- --------- ---------
1 0 2

27.POWER
返回n1的n2次方根
SQL> select power(2,10),power(3,3) from dual;

POWER(2,10) POWER(3,3)
----------- ----------
1024 27

28.ROUND和TRUNC
按照指定的精度进行舍入
SQL> select round(55.5),round(-55.4),trunc(55.5),trunc(-55.5) from dual;

ROUND(55.5) ROUND(-55.4) TRUNC(55.5) TRUNC(-55.5)
----------- ------------ ----------- ------------
56 -55 55 -55

29.SIGN
取数字n的符号,大于0返回1,小于0返回-1,等于0返回0
SQL> select sign(123),sign(-100),sign(0) from dual;

SIGN(123) SIGN(-100) SIGN(0)
--------- ---------- ---------
1 -1 0

30.SIN
返回一个数字的正弦值
SQL> select sin(1.57079) from dual;

SIN(1.57079)
------------
1

31.SIGH
返回双曲正弦的值
SQL> select sin(20),sinh(20) from dual;

SIN(20) SINH(20)
--------- ---------
.91294525 242582598

32.SQRT
返回数字n的根
SQL> select sqrt(64),sqrt(10) from dual;

SQRT(64) SQRT(10)
--------- ---------
8 3.1622777

33.TAN
返回数字的正��值
SQL> select tan(20),tan(10) from dual;

TAN(20) TAN(10)
--------- ---------
2.2371609 .64836083

34.TANH
返回数字n的双曲正切值
SQL> select tanh(20),tan(20) from dual;

TANH(20) TAN(20)
--------- ---------
1 2.2371609

35.TRUNC
按照指定的精度截取一个数
SQL> select trunc(124.1666,-2) trunc1,trunc(124.16666,2) from dual;

TRUNC1 TRUNC(124.16666,2)
--------- ------------------
100 124.16

36.ADD_MONTHS
增加或减去月份
SQL> select to_char(add_months(to_date('199912','yyyymm'),2),'yyyymm') from dual;

TO_CHA
------
200002
SQL> select to_char(add_months(to_date('199912','yyyymm'),-2),'yyyymm') from dual;

TO_CHA
------
199910

37.LAST_DAY
返回日期的最后一天
SQL> select to_char(sysdate,'yyyy.mm.dd'),to_char((sysdate)+1,'yyyy.mm.dd') from dual;

TO_CHAR(SY TO_CHAR((S
---------- ----------
2004.05.09 2004.05.10
SQL> select last_day(sysdate) from dual;

LAST_DAY(S
----------
31-5月 -04

38.MONTHS_BETWEEN(date2,date1)
给出date2-date1的月份
SQL> select months_between('19-12月-1999','19-3月-1999') mon_between from dual;

MON_BETWEEN
-----------
9
SQL>selectmonths_between(to_date('2000.05.20','yyyy.mm.dd'),to_date('2005.05.20','yyyy.mm.dd')) mon_betw from dual;

MON_BETW
---------
-60

39.NEW_TIME(date,'this','that')
给出在this时区=other时区的日期和时间
SQL> select to_char(sysdate,'yyyy.mm.dd hh24:mi:ss') bj_time,to_char(new_time
2 (sysdate,'PDT','GMT'),'yyyy.mm.dd hh24:mi:ss') los_angles from dual;

BJ_TIME LOS_ANGLES
------------------- -------------------
2004.05.09 11:05:32 2004.05.09 18:05:32

40.NEXT_DAY(date,'day')
给出日期date和星期x之后计算下一个星期的日期
SQL> select next_day('18-5月-2001','星期五') next_day from dual;

NEXT_DAY
----------
25-5月 -01

41.SYSDATE
用来得到系统的当前日期
SQL> select to_char(sysdate,'dd-mm-yyyy day') from dual;

TO_CHAR(SYSDATE,'
-----------------
09-05-2004 星期日
trunc(date,fmt)按照给出的要求将日期截断,如果fmt='mi'表示保留分,截断秒
SQL> select to_char(trunc(sysdate,'hh'),'yyyy.mm.dd hh24:mi:ss') hh,
2 to_char(trunc(sysdate,'mi'),'yyyy.mm.dd hh24:mi:ss') hhmm from dual;

HH HHMM
------------------- -------------------
2004.05.09 11:00:00 2004.05.09 11:17:00

42.CHARTOROWID
将字符数据类型转换为ROWID类型
SQL> select rowid,rowidtochar(rowid),ename from scott.emp;

ROWID ROWIDTOCHAR(ROWID) ENAME
------------------ ------------------ ----------
AAAAfKAACAAAAEqAAA AAAAfKAACAAAAEqAAA SMITH
AAAAfKAACAAAAEqAAB AAAAfKAACAAAAEqAAB ALLEN
AAAAfKAACAAAAEqAAC AAAAfKAACAAAAEqAAC WARD
AAAAfKAACAAAAEqAAD AAAAfKAACAAAAEqAAD JONES

43.CONVERT(c,dset,sset)
将源字符串 sset从一个语言字符集转换到另一个目的dset字符集
SQL> select convert('strutz','we8hp','f7dec') "conversion" from dual;

conver
------
strutz

44.HEXTORAW
将一个十六进制构成的字符串转换为二进制

45.RAWTOHEXT
将一个二进制构成的字符串转换为十六进制

46.ROWIDTOCHAR
将ROWID数据类型转换为字符类型

47.TO_CHAR(date,'format')
SQL> select to_char(sysdate,'yyyy/mm/dd hh24:mi:ss') from dual;

TO_CHAR(SYSDATE,'YY
-------------------
2004/05/09 21:14:41

48.TO_DATE(string,'format')
将字符串转化为ORACLE中的一个日期

49.TO_MULTI_BYTE
将字符串中的单字节字符转化为多字节字符
SQL> select to_multi_byte('高') from dual;

TO
--
高

50.TO_NUMBER
将给出的字符转换为数字
SQL> select to_number('1999') year from dual;

YEAR
---------
1999

51.BFILENAME(dir,file)
指定一个外部二进制文件
SQL>insert into file_tb1 values(bfilename('lob_dir1','image1.gif'));

52.CONVERT('x','desc','source')
将x字段或变量的源source转换为desc
SQL> select sid,serial#,username,decode(command,
2 0,'none',
3 2,'insert',
4 3,
5 'select',
6 6,'update',
7 7,'delete',
8 8,'drop',
9 'other') cmd from v$session where type!='background';

SID SERIAL# USERNAME CMD
--------- --------- ------------------------------ ------
1 1 none
2 1 none
3 1 none
4 1 none
5 1 none
6 1 none
7 1275 none
8 1275 none
9 20 GAO select
10 40 GAO none

53.DUMP(s,fmt,start,length)
DUMP函数以fmt指定的内部数字格式返回一个VARCHAR2类型的值
SQL> col global_name for a30
SQL> col dump_string for a50
SQL> set lin 200
SQL> select global_name,dump(global_name,1017,8,5) dump_string from global_name;

GLOBAL_NAME DUMP_STRING
------------------------------ --------------------------------------------------
ORACLE.WORLD Typ=1 Len=12 CharacterSet=ZHS16GBK: W,O,R,L,D

54.EMPTY_BLOB()和EMPTY_CLOB()
这两个函数都是用来对大数据类型字段进行初始化操作的函数

55.GREATEST
返回一组表达式中的最大值,即比较字符的编码大小.
SQL> select greatest('AA','AB','AC') from dual;

GR
--
AC
SQL> select greatest('啊','安','天') from dual;

GR
--
天

56.LEAST
返回一组表达式中的最小��
SQL> select least('啊','安','天') from dual;

LE
--
啊

57.UID
返回标识当前用户的唯一整数
SQL> show user
USER 为"GAO"
SQL> select username,user_id from dba_users where user_id=uid;

USERNAME USER_ID
------------------------------ ---------
GAO 25

58.USER
返回当前用户的名字
SQL> select user from dual;

USER
------------------------------
GAO

59.USEREVN
返回当前用户环境的信息,opt可以是:
ENTRYID,SESSIONID,TERMINAL,ISDBA,LABLE,LANGUAGE,CLIENT_INFO,LANG,VSIZE
ISDBA 查看当前用户是否是DBA如果是则返回true
SQL> select userenv('isdba') from dual;

USEREN
------
FALSE
SQL> select userenv('isdba') from dual;

USEREN
------
TRUE
SESSION
返回会话标志
SQL> select userenv('sessionid') from dual;

USERENV('SESSIONID')
--------------------
152
ENTRYID
返回会话人口标志
SQL> select userenv('entryid') from dual;

USERENV('ENTRYID')
------------------
0
INSTANCE
返回当前INSTANCE的标志
SQL> select userenv('instance') from dual;

USERENV('INSTANCE')
-------------------
1
LANGUAGE
返回当前环境变量
SQL> select userenv('language') from dual;

USERENV('LANGUAGE')
----------------------------------------------------
SIMPLIFIED CHINESE_CHINA.ZHS16GBK
LANG
返回当前环境的语言的缩写
SQL> select userenv('lang') from dual;

USERENV('LANG')
----------------------------------------------------
ZHS
TERMINAL
返回用户的终端或机器的标志
SQL> select userenv('terminal') from dual;

USERENV('TERMINA
----------------
GAO
VSIZE(X)
返回X的大小(字节)数
SQL> select vsize(user),user from dual;

VSIZE(USER) USER
----------- ------------------------------
6 SYSTEM

60.AVG(DISTINCT|ALL)
all表示对所有的值求平均值,distinct只对不同的值求平均值
SQLWKS> create table table3(xm varchar(8),sal number(7,2));
语句已处理。
SQLWKS> insert into table3 values('gao',1111.11);
SQLWKS> insert into table3 values('gao',1111.11);
SQLWKS> insert into table3 values('zhu',5555.55);
SQLWKS> commit;

SQL> select avg(distinct sal) from gao.table3;

AVG(DISTINCTSAL)
----------------
3333.33

SQL> select avg(all sal) from gao.table3;

AVG(ALLSAL)
-----------
2592.59

61.MAX(DISTINCT|ALL)
求最大值,ALL表示对所有的值求最大值,DISTINCT表示对不同的值求最大值,相同的只取一次
SQL> select max(distinct sal) from scott.emp;

MAX(DISTINCTSAL)
----------------
5000

62.MIN(DISTINCT|ALL)
求最小值,ALL表示对所有的值求最小值,DISTINCT表示对不同的值求最小值,相同的只取一次
SQL> select min(all sal) from gao.table3;

MIN(ALLSAL)
-----------
1111.11

63.STDDEV(distinct|all)
求标准差,ALL表示对所有的值求标准差,DISTINCT表示只对不同的值求标准差
SQL> select stddev(sal) from scott.emp;

STDDEV(SAL)
-----------
1182.5032

SQL> select stddev(distinct sal) from scott.emp;

STDDEV(DISTINCTSAL)
-------------------
1229.951

64.VARIANCE(DISTINCT|ALL)
求协方差

SQL> select variance(sal) from scott.emp;

VARIANCE(SAL)
-------------
1398313.9

65.GROUP BY
主要用来对一组数进行统计
SQL> select deptno,count(*),sum(sal) from scott.emp group by deptno;

DEPTNO COUNT(*) SUM(SAL)
--------- --------- ---------
10 3 8750
20 5 10875
30 6 9400

66.HAVING
对分组统计再加限制条件
SQL> select deptno,count(*),sum(sal) from scott.emp group by deptno having count(*)>=5;

DEPTNO COUNT(*) SUM(SAL)
--------- --------- ---------
20 5 10875
30 6 9400
SQL> select deptno,count(*),sum(sal) from scott.emp having count(*)>=5 group by deptno ;

DEPTNO COUNT(*) SUM(SAL)
--------- --------- ---------
20 5 10875
30 6 9400

67.ORDER BY
用于对查询到的结果进行排序输出
SQL> select deptno,ename,sal from scott.emp order by deptno,sal desc;

DEPTNO ENAME SAL
--------- ---------- ---------
10 KING 5000
10 CLARK 2450
10 MILLER 1300
20 SCOTT 3000
20 FORD 3000
20 JONES 2975
20 ADAMS 1100
20 SMITH 800
30 BLAKE 2850
30 ALLEN 1600
30 TURNER 1500
30 WARD 1250
30 MARTIN 1250
30 JAMES 950

"><$BlogItemTitle$>

关于firefox对style.display属性的解释问题

2006-09-07T22:24:00.000-07:00

最近在制作网站的过程中出现了一个问题，就是firefox下对遇style.display执行结果和ie不一样，真实郁闷，多方查找资料，终于发现了问题，代码如下：

<html>
<head>
<title>display</title>
<script type="text/javascript">

</script>
</head>
<body>
<table width="100%" >
<tr width="100%">
<td width="100%">
<font style="cursor:hand;" onclick="show()">
ddddddddddddddddd
</font>
</td>
</tr>
<tr id="showmsg" style="display:none;">
<td>dsffdafa</td>
</tr>
<tr><td>电风扇扩大发洒家艰苦</td></tr>
</table>
</body>
<html>

上面的HTML页面在IE和Firefox中的执行结果不同：
1)"display:none;"后面的内容站用原来块的内容空间//但Firefox好象把这个和"visibility:hidden;"一样处理的
2)"display:block;"将隐藏的内容显示出来//Firefox好象是为其重新开辟内容显示空间

最后正确有效的处理结果
发现个问题：
当将javascript脚本改下就可以了：
<script type="text/javascript">

</script>
呵呵~，搞定！

"><$BlogItemTitle$>

Windows2000下整合Mysql4.0.13与Tomcat4.1.24搭建Jsp环境

2006-09-07T20:30:00.000-07:00

原由：在资料浩瀚的互联网中，却找不到一份最新的Mysql4.0.13与Tomcat4.1.24的整合配置文档。在自己工作之余，总结了自己搭建JSP 环境的实际经验并参照以前版本Mysql、Tomcat相关配置文章，写了这篇配置文档。希望能给和我一样喜欢JAVA的广大初学者以作参考，以期少走些弯路；水平有限加之时间仓促，欢迎斧正！

一、软件准备

二、软件安装

三、首次配置及测试

四、整合配置

五、全线测试

六、补充说明

七、感谢

八、说明

具体实现步骤：

一、软件准备：

假设你有一台能正常运行win2000 的硬软软件环境。

1.J2sdk1.4.1 : 到http://java.sun.com/j2se/1.4.1/download.html下载；

2.Mysql4.0.13: 到http://www.mysql.com 下载;

3.Tomcat4.1.24：到 http://jakarta.apache.org/ 下载;

4.mm.mysql-2.0.4-bin.jar: 到 http://mysql.ihostunit.com/Downloads/Contrib/mm.mysql-2.0.4-bin.jar 下载;

二、软件安装：

1.安装J2sdk：

按照安装向导进行安装（一般安装到C:\j2sdk1.4.1下，方便操作）；

2.安装Mysql:

按照安装向导进行安装（选择安装目录为C:\，方便操作；安装成功后其路径为：C:\mysql）；

3.安装Tomcat:

按照安装向导进行安装（更改安装目录为C:\Tomcat4。1，其间会要你输入Admin（系统管理员）的口令）；

4.放置Mysql的Jdbc驱动：

将mm.mysql-2.0.4-bin.jar文件放到C:\j2sdk1.4.0-rc\lib下（其实放到哪都应该无所谓，主要是在系统变量里指一下就可以了，但有不少人说放到这里好，所以我就放这里了）；

三、首次配置及测试：

对以上安装的软件环境进行首次配置，并测试其环境：

(1)配置--环境变量：

1.新建系统变量JAVA_HOME，其值为：C:\j2sdk1.4.1 （若你没按以上路径安装请更改为您的安装路径）；

2.新建系统变量TOMCAT_HOME，其值为：C:\Tomcat4 （若你没按以上路径安装请更改为您的安装路径）；

3.系统变量CLASSPATH，添加，其值为：C:\Tomcat 4.1\common\classes;C:\Tomcat 4.1\common\lib

4.系统变量CLASSPATH，添加，其值为：C:\j2sdk1.4.0-rc\lib\mm.mysql-2.0.4-bin;

(2)测试默认服务：

1.请先启动Tomcat4.1(在开始-程序中找到Apache Tomcat4.1运行Start Tomcat)服务：

打开浏览器，在地址栏中输入： http://localhost:8080 检验：此时能在浏览器中看到Tomcat的欢迎界面.说明Tomcat工作正常（注意，Tomcat默认端口为8080，若有其它程序占用，请更改）；

2.启动Mysql服务（Mysql服务默认随操作系统启动，并有winmysqladmin.exe最小化在系统托盘上）：

进入CMD，到C:\mysql\bin目录下，执行mysql，回车，正常的话输出一些欢迎信息，说明Mysql工作正常；

四、整合配置：

对Mysql4与Tomcat4做相应的配置，让其共同为你工作：

1.将mm.mysql-2.0.4-bin.jar拷贝到Tomcat的common/lib目录下；

2.测试是否连接正常；将如下代码保存成test.jsp至C:\Tomcat 4.1\webapps\ROOT目录下：

;%@ page contentType="text/html;charset=gb2312" %;
;%
java.sql.Connection conn;
java.lang.String strConn;
Class.forName("org.gjt.mm.mysql.Driver").newInstance();
conn= java.sql.DriverManager.getConnection("jdbc:mysql://localhost/test","root","");
%;
;%--这里连接的是Mysql4默认自带的test库，用户与密码用的是默认的root与空--%;

3、在浏览器的地址中输入http://localhost:8080/test.jsp如果运行以后，出现空白页面，即表示Mysql4与Tomcat4整合成功；

五、全线测试：

1.启动Tomcat4.1；

2.建立数据库及表;

首先在mysql里面建立一个表，并且插如几条数据。sql代码如下：
create database test;--运行
use test;--运行
create talbe admin (id int(4) auto_increment primary key,name varchar(20));--运行
INSERT INTO user(name) VALUES('test');--运行
ok,你已经建立了数据库test，建立了表user，并且插入了一条记录。

3、显示数据库中的记录;

将如下代码保存成test2.jsp至C:\Tomcat 4.1\webapps\ROOT目录下：
;%@ page contentType="text/html;charset=GBK" %;
;%@ page language="java" import=" java.sql.*"%;
;%
Connection conn = null;
Class.forName("org.gjt.mm.mysql.Driver").newInstance();
conn = java.sql.DriverManager.getConnection("jdbc:mysql://localhost/test","root","");
if(conn==null){
System.out.println("get Conn Error");
}
Statement stmt=conn.createStatement();
ResultSet RS_result=null;
%;
;html;
;head;
;title;测试;/title;;/head;
;body;
;%
RS_result= stmt.executeQuery("select * from user");
String Name;
while(RS_result.next())
{
Name=RS_result.getString("name");
%;
;%=Name%;
;%
}
RS_result.close();
stmt.close();
conn.close ();
%;
;/body;
;/html;

4.打开你的浏览器，在地址栏中输入http://localhost:8080/test.jsp如果运行以后，页面上显示test，即表示读取数据库成功；

六、补充说明：

1.假设已有一项目在E:\test\oa目录下（包含index.jsp及其它jsp文件和bean，如WEB-INF\classes\下的servlet、javabean）；
设置Tomcat以支持你的项目，打开C:\Tomcat4.1\conf\server.xml文件，在";/Host;"之前,";/Context;"之后添加
;Context path="/oa" debug="0" docBase="E:\test\oa" reloadable="true"/;并保存。
说明：Context (表示一个web应用程序): docBase定义应用程序的路径；path 表示此web应用程序的url的前缀，这样请求的url
为http://localhost:8080/oa；reloadable 这个属性非常重要，如果为true，则tomcat会自动检测应用程序的/WEB-INF/lib
和/WEB-INF/classes目录的变化，自动装载修改或新的bean及servlet，我们可以在不重起tomcat的情况下看到bean带给jsp的变化;

2.启动Tomcat4.1，在浏览器的地址中输入http://localhost:8080/oa，如jsp及bean等没有错误，一般会将你的index.jsp/index.html
文件的内容给执行并显示。

七、感谢：

1.感谢Apache、Mysql组织，为大家提供了如此之好的免费的应用服务器与数据库；

2.感谢以前写过Tomcat3.x/Tomcat4.*配置文档的朋友们，为我今天写这篇文档作了参考；

八、说明：

1.若您觉得满意，想转载或收藏这篇文章，我非常感谢，但请您注明作者hoxisoft（hoxisoft@263.net）

使用Java编写oracle存储过程

2006-09-06T20:09:00.000-07:00

bromon原创请尊重版权

   通常我们都使用ps/sql为oracle编写存储过程，从oracle 8开始我们可以有另一种选择： Java。8.0开始，oracle自带一个jvm，内置对java的支持，任何java能做的事情你都可以放到oracle里面来做，你甚至可以在里面操作db2。这让oracle具备了极其巨大的扩展能力，只要你愿意，完全可以开发一个trigger，让它在适当的时候给管理员的msn发送一条即时消息。

    好消息说完了，现在是坏消息：由于ps/sql是过程化的语言，它基本上不具备多态的概念，供oracle使用的java方法必须申明为static，所以在oracle中你无法使用java的动态特性，比如接口、反射等。不过这并不妨碍你用java做爱做的事。

    我们以一个简单的hello world为例，我想任何一个有经验的java程序员都能够通过这个例子，派生出其他希奇古怪的应用，有好的创意记得要与我共享，我的msn是bromon@gmail.com

    首先是创建一个java类，你可以用jbuilder/eclipse来编写，也可以直接在oracle的控制台里面创建。前者不多说，看看后一种方式。

    启动sql plus，执行如下命令：

create or replace and compile java source named "hello_sp" as
/**
*创建oracle存储过程的java类
*@author bromon
**/
package org.bromon.oracle;
public class Hello
{
public static String say( String name)
{
return "你好," +name;
}
}

Java以创建。

然后在oracle中把这个类导入成为一个函数，执行命令：

create or replace function hello_sp(name varchar2) return varchar2
as language java name
'org.bromon.oracle.Hello.say(java.lang. String ) return java.lang. String ';

函数已创建

现在可以调用该函数，执行：

select hello('bromon') from dual;

返回结果：你好,bromon

有一个需要注意的问题是，假如我们的java方法是没有参数的，比如：

public static String say()
{
return "你好";
}

那么在创建函数的时候，函数名不应该有扩号：hello_sp
否则会报告函数有编译错误。

如果你的java类是在IDE里面编写的，那么只需要在oracle中加载编译过的class文件即可，方法是：

启动enterprise manage console，在"方案"下找到"源类型 "，右击"java类"，选择"加载java"，选择对应的class文件即可。

Oracle的换行符

2006-09-06T19:56:00.000-07:00

在SQL中，表示字符串得引号强烈建议使用单引号（'）。虽然MySQL也可以使用双引号（"），但是为了和SQL Server和Oracle统一，建议都使用单引号。如果在字符串中也有单引号出现的话，在SQL中需要将其替换为两个单引号（''），DBMS会将其解释为一个单引号的。

关于SQL的换行符和字符串连接符，在MySQL、SQL Server和Oracle中均有不同，下面以列表显示。

	MySQL	SQL Server	Oracle
换行符	\n或\r\n或CHAR(10)	CHAR(13)	CHR(10)
字符串连接符	CONCAT()	+	\|\|或CONCAT()

游标使用大全

2006-09-06T19:38:00.000-07:00

游标使用大全
查询

SELECT语句用于从数据库中查询数据，当在PL/SQL中使用SELECT语句时，要与INTO子句一起使用，查询的返回值被赋予INTO子句中的变量，变量的声明是在DELCARE中。SELECT INTO语法如下：

SELECT [DISTICT|ALL]{*|column[,column,...]}

INTO (variable[,variable,...] |record)

FROM {table|(sub-query)}[alias]

WHERE............

PL/SQL中SELECT语句只返回一行数据。如果超过一行数据，那么就要使用显式游标（对游标的讨论我们将在后面进行），INTO子句中要有与SELECT子句中相同列数量的变量。INTO子句中也可以是记录变量。

%TYPE属性

在PL/SQL中可以将变量和常量声明为内建或用户定义的数据类型，以引用一个列名，同时继承他的数据类型和大小。这种动态赋值方法是非常有用的，比如变量引用的列的数据类型和大小改变了，如果使用了%TYPE,那么用户就不必修改代码，否则就必须修改代码。

例：

v_empno SCOTT.EMP.EMPNO%TYPE;

v_salary EMP.SALARY%TYPE;

　不但列名可以使用%TYPE,而且变量、游标、记录，或声明的常量都可以使用%TYPE。这对于定义相同数据类型的变量非常有用。

DELCARE

V_A NUMBER(5):=10;

V_B V_A%TYPE:=15;

V_C V_A%TYPE;

BEGIN

DBMS_OUTPUT.PUT_LINE

('V_A='||V_A||'V_B='||V_B||'V_C='||V_C);

END

SQL>/

V_A=10 V_B=15 V_C=

PL/SQL procedure successfully completed.

SQL>

其他DML语句

其它操作数据的DML语句是:INSERT、UPDATE、DELETE和LOCK TABLE,这些语句在PL/SQL中的语法与在SQL中的语法相同。我们在前面已经讨论过DML语句的使用这里就不再重复了。在DML语句中可以使用任何在DECLARE部分声明的变量，如果是嵌套块，那么要注意变量的作用范围。

例：

CREATE OR REPLACE PROCEDURE FIRE_EMPLOYEE (pempno in number)

　AS

v_ename EMP.ENAME%TYPE;

BEGIN

　SELECT ename INTO v_ename

FROM emp

WHERE empno=p_empno;

INSERT INTO FORMER_EMP(EMPNO,ENAME)

VALUES (p_empno,v_ename);

DELETE FROM emp

WHERE empno=p_empno;

UPDATE former_emp

SET date_deleted=SYSDATE

WHERE empno=p_empno;

EXCEPTION

WHEN NO_DATA_FOUND THEN

DBMS_OUTPUT.PUT_LINE('Employee Number Not Found!');

END

DML语句的结果

当执行一条DML语句后，DML语句的结果保存在四个游标属性中，这些属性用于控制程序流程或者了解程序的状态。当运行DML语句时，PL/SQL打开一个内建游标并处理结果，游标是维护查询结果的内存中的一个区域，游标在运行DML语句时打开，完成后关闭。隐式游标只使用SQL%FOUND,SQL% NOTFOUND,SQL%ROWCOUNT三个属性.SQL%FOUND,SQL%NOTFOUND是布尔值，SQL%ROWCOUNT是整数值。

SQL%FOUND和SQL%NOTFOUND

在执行任何DML语句前SQL%FOUND和SQL%NOTFOUND的值都是NULL,在执行DML语句后，SQL%FOUND的属性值将是：

. TRUE :INSERT

. TRUE :DELETE和UPDATE，至少有一行被DELETE或UPDATE.

. TRUE :SELECT INTO至少返回一行

当SQL%FOUND为TRUE时,SQL%NOTFOUND为FALSE。

SQL%ROWCOUNT

在执行任何DML语句之前，SQL%ROWCOUNT的值都是NULL,对于SELECT INTO语句，如果执行成功，SQL%ROWCOUNT的值为1,如果没有成功，SQL%ROWCOUNT的值为0，同时产生一个异常 NO_DATA_FOUND.

SQL%ISOPEN

SQL%ISOPEN是一个布尔值，如果游标打开，则为TRUE, 如果游标关闭，则为FALSE.对于隐式游标而言SQL%ISOPEN总是FALSE，这是因为隐式游标在DML语句执行时打开，结束时就立即关闭。

事务控制语句

事务是一个工作的逻辑单元可以包括一个或多个DML语句，事物控制帮助用户保证数据的一致性。如果事务控制逻辑单元中的任何一个DML语句失败，那么整个事务都将回滚，在PL/SQL中用户可以明确地使用COMMIT、ROLLBACK、SAVEPOINT以及SET TRANSACTION语句。

COMMIT语句终止事务，永久保存数据库的变化，同时释放所有LOCK,ROLLBACK终止现行事务释放所有LOCK，但不保存数据库的任何变化, SAVEPOINT用于设置中间点，当事务调用过多的数据库操作时，中间点是非常有用的，SET TRANSACTION用于设置事务属性，比如read-write和隔离级等。

显式游标

当查询返回结果超过一行时，就需要一个显式游标，此时用户不能使用select into语句。PL/SQL管理隐式游标，当查询开始时隐式游标打开，查询结束时隐式游标自动关闭。显式游标在PL/SQL块的声明部分声明，在执行部分或异常处理部分打开，取数据,关闭。

使用游标

这里要做一个声明，我们所说的游标通常是指显式游标，因此从现在起没有特别指明的情况，我们所说的游标都是指显式游标。要在程序中使用游标，必须首先声明游标。

声明游标

语法：

CURSOR cursor_name IS select_statement;

在PL/SQL中游标名是一个未声明变量，不能给游标名赋值或用于表达式中。

例：

DELCARE

CURSOR C_EMP IS SELECT empno,ename,salary

FROM emp

WHERE salary>2000

ORDER BY ename;

........

BEGIN

在游标定义中SELECT语句中不一定非要表可以是视图，也可以从多个表或视图中选择的列，甚至可以使用*来选择所有的列。

打开游标

使用游标中的值之前应该首先打开游标，打开游标初始化查询处理。打开游标的语法是：

OPEN cursor_name

cursor_name是在声明部分定义的游标名。

例：

OPEN C_EMP;

关闭游标

语法：

CLOSE cursor_name

例：

CLOSE C_EMP;

从游标提取数据

从游标得到一行数据使用FETCH命令。每一次提取数据后，游标都指向结果集的下一行。语法如下：

FETCH cursor_name INTO variable[,variable,...]

对于SELECT定义的游标的每一列，FETCH变量列表都应该有一个变量与之相对应，变量的类型也要相同。

例：

SET SERVERIUTPUT ON

DECLARE

v_ename EMP.ENAME%TYPE;

v_salary EMP.SALARY%TYPE;

CURSOR c_emp IS SELECT ename,salary FROM emp;

BEGIN

OPEN c_emp;

FETCH c_emp INTO v_ename,v_salary;

DBMS_OUTPUT.PUT_LINE('Salary of Employee'|| v_ename ||'is'|| v_salary);

FETCH c_emp INTO v_ename,v_salary;

DBMS_OUTPUT.PUT_LINE('Salary of Employee'|| v_ename ||'is'|| v_salary);

FETCH c_emp INTO v_ename,v_salary;

DBMS_OUTPUT.PUT_LINE('Salary of Employee'|| v_ename ||'is'|| v_salary);

CLOSE c_emp;

END

这段代码无疑是非常麻烦的，如果有多行返回结果，可以使用循环并用游标属性为结束循环的条件，以这种方式提取数据，程序的可读性和简洁性都大为提高，下面我们使用循环重新写上面的程序：

SET SERVERIUTPUT ON

DECLARE

v_ename EMP.ENAME%TYPE;

v_salary EMP.SALARY%TYPE;

CURSOR c_emp IS SELECT ename,salary FROM emp;

BEGIN

OPEN c_emp;

LOOP

FETCH c_emp INTO v_ename,v_salary;

EXIT WHEN c_emp%NOTFOUND;

DBMS_OUTPUT.PUT_LINE('Salary of Employee'|| v_ename ||'is'|| v_salary);

END

记录变量

定义一个记录变量使用TYPE命令和%ROWTYPE，关于%ROWsTYPE的更多信息请参阅相关资料。

记录变量用于从游标中提取数据行，当游标选择很多列的时候，那么使用记录比为每列声明一个变量要方便得多。

当在表上使用%ROWTYPE并将从游标中取出的值放入记录中时，如果要选择表中所有列，那么在SELECT子句中使用*比将所有列名列出来要安全得多。

例：

SET SERVERIUTPUT ON

DECLARE

R_emp EMP%ROWTYPE;

CURSOR c_emp IS SELECT * FROM emp;

BEGIN

OPEN c_emp;

LOOP

FETCH c_emp INTO r_emp;

EXIT WHEN c_emp%NOTFOUND;

DBMS_OUT.PUT.PUT_LINE('Salary of Employee'||r_emp.ename||'is'|| r_emp.salary);

END LOOP;

CLOSE c_emp;

END;

%ROWTYPE也可以用游标名来定义，这样的话就必须要首先声明游标：

SET SERVERIUTPUT ON

DECLARE

CURSOR c_emp IS SELECT ename,salary FROM emp;

R_emp c_emp%ROWTYPE;

BEGIN

OPEN c_emp;

LOOP

FETCH c_emp INTO r_emp;

EXIT WHEN c_emp%NOTFOUND;

DBMS_OUT.PUT.PUT_LINE('Salary of Employee'||r_emp.ename||'is'|| r_emp.salary);

END LOOP;

CLOSE c_emp;

END;

带参数的游标

与存储过程和函数相似，可以将参数传递给游标并在查询中使用。这对于处理在某种条件下打开游标的情况非常有用。它的语法如下：

CURSOR cursor_name[(parameter[,parameter],...)] IS select_statement;

定义参数的语法如下：

Parameter_name [IN] data_type[{:=|DEFAULT} value]

　与存储过程不同的是，游标只能接受传递的值，而不能返回值。参数只定义数据类型，没有大小。

另外可以给参数设定一个缺省值，当没有参数值传递给游标时，就使用缺省值。游标中定义的参数只是一个占位符，在别处引用该参数不一定可靠。

在打开游标时给参数赋值，语法如下：

OPEN cursor_name[value[,value]....];

参数值可以是文字或变量。

例：

DECALRE

CURSOR c_dept IS SELECT * FROM dept ORDER BY deptno;

CURSOR c_emp (p_dept VARACHAR2) IS

SELECT ename,salary

FROM emp

WHERE deptno=p_dept

ORDER BY ename

r_dept DEPT%ROWTYPE;

v_ename EMP.ENAME%TYPE;

v_salary EMP.SALARY%TYPE;

v_tot_salary EMP.SALARY%TYPE;

BEGIN

OPEN c_dept;

LOOP

FETCH c_dept INTO r_dept;

EXIT WHEN c_dept%NOTFOUND;

DBMS_OUTPUT.PUT_LINE('Department:'|| r_dept.deptno||'-'||r_dept.dname);

v_tot_salary:=0;

OPEN c_emp(r_dept.deptno);

LOOP

FETCH c_emp INTO v_ename,v_salary;

EXIT WHEN c_emp%NOTFOUND;

DBMS_OUTPUT.PUT_LINE('Name:'|| v_ename||' salary:'||v_salary);

v_tot_salary:=v_tot_salary+v_salary;

END LOOP;

CLOSE c_emp;

DBMS_OUTPUT.PUT_LINE('Toltal Salary for dept:'|| v_tot_salary);

END LOOP;

CLOSE c_dept;

END;

游标FOR循环

在大多数时候我们在设计程序的时候都遵循下面的步骤：

1、打开游标

2、开始循环

3、从游标中取值

4、检查那一行被返回

5、处理

6、关闭循环

7、关闭游标

可以简单的把这一类代码称为游标用于循环。但还有一种循环与这种类型不相同，这就是FOR循环，用于FOR循环的游标按照正常的声明方式声明，它的优点在于不需要显式的打开、关闭、取数据，测试数据的存在、定义存放数据的变量等等。游标FOR循环的语法如下：

FOR record_name IN

(corsor_name[(parameter[,parameter]...)]

| (query_difinition)

LOOP

statements

END LOOP;

下面我们用for循环重写上面的例子：

DECALRE

CURSOR c_dept IS SELECT deptno,dname FROM dept ORDER BY deptno;

CURSOR c_emp (p_dept VARACHAR2) IS

SELECT ename,salary

FROM emp

WHERE deptno=p_dept

ORDER BY ename

v_tot_salary EMP.SALARY%TYPE;

BEGIN

FOR r_dept IN c_dept LOOP

DBMS_OUTPUT.PUT_LINE('Department:'|| r_dept.deptno||'-'||r_dept.dname);

v_tot_salary:=0;

FOR r_emp IN c_emp(r_dept.deptno) LOOP

DBMS_OUTPUT.PUT_LINE('Name:' || v_ename || 'salary:' || v_salary);

v_tot_salary:=v_tot_salary+v_salary;

END LOOP;

DBMS_OUTPUT.PUT_LINE('Toltal Salary for dept:'|| v_tot_salary);

END LOOP;

END;

在游标FOR循环中使用查询

在游标FOR循环中可以定义查询，由于没有显式声明所以游标没有名字，记录名通过游标查询来定义。

DECALRE

v_tot_salary EMP.SALARY%TYPE;

BEGIN

FOR r_dept IN (SELECT deptno,dname FROM dept ORDER BY deptno) LOOP

DBMS_OUTPUT.PUT_LINE('Department:'|| r_dept.deptno||'-'||r_dept.dname);

v_tot_salary:=0;

FOR r_emp IN (SELECT ename,salary

　　　FROM emp

　　　WHERE deptno=p_dept

　　　ORDER BY ename) LOOP

DBMS_OUTPUT.PUT_LINE('Name:'|| v_ename||' salary:'||v_salary);

v_tot_salary:=v_tot_salary+v_salary;

END LOOP;

DBMS_OUTPUT.PUT_LINE('Toltal Salary for dept:'|| v_tot_salary);

END LOOP;

END;

游标中的子查询

语法如下：

CURSOR C1 IS SELECT * FROM emp

WHERE deptno NOT IN (SELECT deptno

FROM dept

WHERE dname!='ACCOUNTING');

可以看出与SQL中的子查询没有什么区别。

游标中的更新和删除

在PL/SQL中依然可以使用UPDATE和DELETE语句更新或删除数据行。显式游标只有在需要获得多行数据的情况下使用。PL/SQL提供了仅仅使用游标就可以执行删除或更新记录的方法。

UPDATE 或DELETE语句中的WHERE CURRENT OF子串专门处理要执行UPDATE或DELETE操作的表中取出的最近的数据。要使用这个方法，在声明游标时必须使用FOR UPDATE子串，当对话使用FOR UPDATE子串打开一个游标时，所有返回集中的数据行都将处于行级（ROW-LEVEL)独占式锁定，其他对象只能查询这些数据行，不能进行 UPDATE、DELETE或SELECT...FOR UPDATE操作。

语法：

FOR UPDATE [OF [schema.]table.column[,[schema.]table.column]..

[nowait]

在多表查询中，使用OF子句来锁定特定的表,如果忽略了OF子句，那么所有表中选择的数据行都将被锁定。如果这些数据行已经被其他会话锁定，那么正常情况下Oracle将等待，直到数据行解锁。

在UPDATE和DELETE中使用WHERE CURRENT OF子串的语法如下：

WHERE{CURRENT OF cursor_name|search_condition}

例：

DELCARE

CURSOR c1 IS SELECT empno,salary

FROM emp

WHERE comm IS NULL

FOR UPDATE OF comm;

v_comm NUMBER(10,2);

BEGIN

FOR r1 IN c1 LOOP

IF r1.salary<500 THEN

v_comm:=r1.salary*0.25;

ELSEIF r1.salary<1000 THEN

v_comm:=r1.salary*0.20;

ELSEIF r1.salary<3000 THEN

v_comm:=r1.salary*0.15;

ELSE

v_comm:=r1.salary*0.12;

END IF;

UPDATE emp;

SET comm=v_comm

WHERE CURRENT OF c1l;

END LOOP;

END
Last edited Aug 17, 2006 - Note created Aug 16, 2006
▶

EditDelete
ORACLE 的这类错误在ORALCE的文档中有详细说明，但原因及措施说明不详细，本文当着重说明如何解决这类错误。 1、ORA-12571、ORA-03113、ORA-03114、ORA-01041 特征:客户端(代理或应用服务器)有时报这类断连错误原因:如果偶尔出现一次，则可能为网络原因或用户异常中止，如果经常出现则为客户端与服务端的字符集不一致。措施:如果偶尔出现，可在服务端的协议配置文件PROTOCOL.ORA中增加一行 TCP.NODELAY=YES; 如果经常出现，则为客户端与服务端字符集不一致或网络原因。客户端的字符集在注册表里定义: HKEY__LOCAL__MACHINE/SOFTWARE/ORACLE/NLS__LANG 在客户端注册表中的TCP参数项中设置 TCPMAXDATARETRANSMITIONS=20。 2、ORA-01000 特征:达到会话允许的最大游标数原因:达到会话允许的最大游标数措施:有两种解决方法: (1)在初始化文件INIT.ORA文件中增加OPEN_CURSORS的数量，一般要求大于200。 (2)在应用级，与开发工具有关，例如设置MAXOPEN_CURSORS等。 3、ORA-01545 特征:某个回滚段不可用原因:(1)当使回滚段ONLINE时，但回滚段不可用，例如回滚段所在表空间OFFLINE; (2) 当使回滚段ONLINE时，但回滚段已ONLINE，例如回滚段被使用两次，典型的案例如OPS方式时，回滚段不能公有; (3)删除回滚段时，回滚段中有活动的事务; 措施:(1)确保回滚段可 (2)从初始化文件INIT.ORA的参数ROLLBACK)SEGMENTS中删除指定的回滚段。 (3)可以将回滚段所在表空间删除，取消UNDO事务 4、ORA-0165x 特征:表空间没有足够的空间供分配原因:表空间已满;存储参数不合理，NEXT太小;没有连续的区间措施:如果表空间已满，则需为表空间增加文件;如果存储参数不合理，则需增加INITIAL和NEXT;如果没有连续的区间，需要合并空闲的表空间。查看空间碎片用DBA_FREE_SPACE 5、ORA-01555 特征:当前会话无法读到以前版本的数据原因:原因很多，主要原因有下列:回滚段太小、太少;回滚段冲突;交叉提交(FETCH_ACROSS) 措施:增加回滚段数量; 6、ORA-04031 特征:共享池内存区内存不够，或产生内存碎片原因:当试图装载一个大包时或执行一个较大的存储过程时，而共享池没有连续的内存空间。措施:如果是内存不够，则增加SHARE)POOL_SIZE; 如果是内存碎片，执行alter system flush share_pool 7、ORA-04091 特征:触发器工作不正常原因:一个行触发读取或修改变化的表(正在修改、插入)时，产生这种错误。措施:检查触发器脚本，保证引用完整性 8、ORA-01242、ORA-01113 特征:介质故障导致数据库宕机原因:介质故障。措施:检查硬件故障;修改dbshut脚本，将其中的STARTUP命令修改为: Startup open recover Alter database open
Note created Aug 16, 2006
Oracle常见错误诊断_站长技术站 - www.souzz.net/...
▶

EditDelete
摘自：求在9i的存储过程中二维数组的完整例子及说明,在线等.table ,varrry ,recor都行. ---------------------- 单维数组 ------------------------ DECLARE TYPE emp_ssn_array IS TABLE OF NUMBER INDEX BY BINARY_INTEGER; best_employees emp_ssn_array; worst_employees emp_ssn_array; BEGIN best_employees(1) := '123456'; best_employees(2) := '888888'; worst_employees(1) := '222222'; worst_employees(2) := '666666'; FOR i IN 1..best_employees.count LOOP DBMS_OUTPUT.PUT_LINE('i=' ¦ ¦ i ¦ ¦ ', best_employees= ' ¦ ¦best_employees(i) ¦ ¦ ', worst_employees= ' ¦ ¦worst_employees(i)); END LOOP; END; ---------------------- 多维数组 ------------------------ DECLARE TYPE emp_type IS RECORD ( emp_id number, emp_name string(80), emp_gender string(80)); TYPE emp_type_array IS TABLE OF emp_type INDEX BY BINARY_INTEGER; emp_rec_array emp_type_array; emp_rec emp_type; BEGIN emp_rec.emp_id := 300000000; emp_rec.emp_name := 'Barbara'; emp_rec.emp_gender := 'Female'; emp_rec_array(1) := emp_rec; emp_rec.emp_id := 300000008; emp_rec.emp_name := 'Rick'; emp_rec.emp_gender := 'Male'; emp_rec_array(2) := emp_rec; FOR i IN 1..emp_rec_array.count LOOP DBMS_OUTPUT.PUT_LINE('i=' ¦ ¦i ¦ ¦', emp_id =' ¦ ¦emp_rec_array(i).emp_id ¦ ¦', emp_name =' ¦ ¦emp_rec_array(i).emp_name ¦ ¦', emp_gender = ' ¦ ¦emp_rec_array(i).emp_gender); END LOOP; END; -------------- Result -------------- i=1, emp_id =300000000, emp_name =Barbara, emp_gender = Female i=2, emp_id =300000008, emp_name =Rick, emp_gender = Male
Note created Aug 17, 2006
求在9i的存储过程中二维数组的完整例子及说明,在线等.table ,varrry ,recor都行. - 开发源码常见问题 - faq.lvjiyong.com/...
▼

EditDelete

Oracle 下的Length()函数不能区分中英文，只能得到字符数而不能得到字节数，很多时候插入string到字段中时总要先进行一次检查，防止string长度超过了字段定义的长度，一般大家都是把这个检测放到应用程序中执行，用我写的这个小函数就可以实现在数据库服务器端对要插入的字段进行检测。

create or replace function f_henry_GetStringLength(pv_String in varchar2) return integer is
Result integer;
i number;
begin
Result:=0;
if length(pv_String)=0 then
return(Result);
end if;
for i in 1 .. length(pv_String) loop
if ascii(substr(pv_String,i,1))<256 then
Result:=Result+1;
else
Result:=Result+2;
end if;
end loop;
return(Result);
end f_henry_GetStringLength;

/*************************以下是测试***************************/

SQL> select length('啊$@oii发大幅') from dual;

LENGTH('啊$@OII发大幅')
-----------------------
9

SQL> select f_henry_GetStringLength('啊$@oii发大幅') from dual;

F_HENRY_GETSTRINGLENGTH('啊$@O
------------------------------
13

Note created Aug 17, 2006
Oracle自定义函数——f_henry_GetStringLength_ - www.tbnet.cn/...
▼

EditDelete
访问页面的人可以在线聊天

Note created Aug 17, 2006
Woocall首页 - woocall.sina.com.cn/...
▼

EditDelete

EXECUTE IMMEDIATE代替了以前Oracle8i中DBMS_SQL package包.它解析并马上执行动态的SQL语句或非运行时创建的PL/SQL块.动态创建和执行SQL语句性能超前，EXECUTE IMMEDIATE的目标在于减小企业费用并获得较高的性能，较之以前它相当容易编码.尽管DBMS_SQL仍然可用，但是推荐使用EXECUTE IMMEDIATE,因为它获的收益在包之上。
　　
　　使用技巧
　　
　　1. EXECUTE IMMEDIATE将不会提交一个DML事务执行，应该显式提交
　　如果通过EXECUTE IMMEDIATE处理DML命令，那么在完成以前需要显式提交或者作为EXECUTE IMMEDIATE自己的一部分. 如果通过EXECUTE IMMEDIATE处理DDL命令,它提交所有以前改变的数据
　　
　　2. 不支持返回多行的查询,这种交互将用临时表来存储记录(参照例子如下)或者用REF cursors.
　　
　　3. 当执行SQL语句时，不要用分号，当执行PL/SQL块时，在其尾部用分号.
　　
　　4. 在Oracle手册中，未详细覆盖这些功能。下面的例子展示了所有用到Execute immediate的可能方面.希望能给你带来方便.
　　
　　5. 对于Forms开发者,当在PL/SQL 8.0.6.3.版本中，Forms 6i不能使用此功能.
　　
　　EXECUTE IMMEDIATE用法例子
　　
　　1. 在PL/SQL运行DDL语句
　　
　　 begin
　　　execute immediate 'set role all';
　　 end;
　　
　　2. 给动态语句传值(USING 子句)
　　
　　 declare
　　　l_depnam varchar2(20) := 'testing';
　　　l_loc　　varchar2(10) := 'Dubai';
　　　begin
　　　execute immediate 'insert into dept values　(:1, :2, :3)'
　　　　using 50, l_depnam, l_loc;
　　　commit;
　　 end;
　　
　　3. 从动态语句检索值(INTO子句)
　　
　　 declare
　　　l_cnt　　varchar2(20);
　　 begin
　　　execute immediate 'select count(1) from emp'
　　　　into l_cnt;
　　　dbms_output.put_line(l_cnt);
　　 end;
　　
　　4. 动态调用例程.例程中用到的绑定变量参数必须指定参数类型.黓认为IN类型,其它类型必须显式指定
　　
　　 declare
　　　l_routin　 varchar2(100) := 'gen2161.get_rowcnt';
　　　l_tblnam　 varchar2(20) := 'emp';
　　　l_cnt　　　number;
　　　l_status　 varchar2(200);
　　 begin
　　　execute immediate 'begin ' || l_routin || '(:2, :3, :4); end;'
　　　　using in l_tblnam, out l_cnt, in out l_status;
　　
　　　if l_status != 'OK' then
　　　　 dbms_output.put_line('error');
　　　end if;
　　 end;
　　
　　5. 将返回值传递到PL/SQL记录类型;同样也可用%rowtype变量
　　
　　 declare
　　　type empdtlrec is record (empno　number(4),
　　　　　　　　　　　　　　　 ename　varchar2(20),
　　　　　　　　　　　　　　　 deptno　number(2));
　　　empdtl empdtlrec;
　　 begin
　　　execute immediate 'select empno, ename, deptno ' ||
　　　　　　　　　　　 'from emp where empno = 7934'
　　　　into empdtl;
　　 end;
　　
　　6. 传递并检索值.INTO子句用在USING子句前
　　
　　 declare
　　　l_dept　　pls_integer := 20;
　　　l_nam　　 varchar2(20);
　　　l_loc　　 varchar2(20);
　　 begin
　　　execute immediate 'select dname, loc from dept where deptno = :1'
　　　　into l_nam, l_loc
　　　　using l_dept ;
　　 end;
　　
　　7. 多行查询选项.对此选项用insert语句填充临时表，用临时表进行进一步的处理,也可以用REF cursors纠正此缺憾.
　　
　　 declare
　　　l_sal　 pls_integer := 2000;
　　 begin
　　　execute immediate 'insert into temp(empno, ename) ' ||
　　　　　　　　　　　 '　　　　　select empno, ename from emp ' ||
　　　　　　　　　　　 '　　　　　where　sal > :1'
　　　　using l_sal;
　　　commit;
　　 end;
　　
　　对于处理动态语句,EXECUTE IMMEDIATE比以前可能用到的更容易并且更高效.当意图执行动态语句时，适当地处理异常更加重要.应该关注于捕获所有可能的异常.

iText - Google 网上论坛

2006-07-26T20:53:00.000-07:00

iText - Google 网上论坛

精彩收藏－－收集所有我感兴趣的

好久没有登录blog了，试试能发不。

innosetup对bde打包安装

信息周刊：宝洁公司拥抱Web2.0宝洁|web2.0| - 使用 Google 工具栏进行发送

SQL2005报表参数大于2K问题的终极解决方案 - 技术频道 | IT168 - 使用 Google 工具栏进行发送

SQL2005报表参数大于2K问题的终极解决方案

母亲节送什么礼物最好？_百度知道 - 使用 Google 工具栏进行发送

请问脚上长了瘊子怎么治疗啊？_百度知道 - 使用 Google 工具栏进行发送

陕西境内主要旅游景点概述 - 使用 Google 工具栏进行发送

求陕西商南金丝峡旅游详细情况_百度知道 - 使用 Google 工具栏进行发送

求inetinfo.exe 消耗%100的CPU资源的解决方法!!!!!!! - 【 Windows操作系统 】 - 《我是网管》论坛 - 畅通网络 因为有我 - 使用 Google 工具栏进行发送

李文雄：总结几个产生上万流量的方法-SEO,流量,

如何提高网站的PageRank值及计算公式-SEO,PageRank,

jsp图片验证码错误问题的解决

createOutputStreamInstance

createOutputStreamInstance

TOMCAT5在WINDOWS下的系统服务相关的命令行

食 品 相 克 列 表

Delphi之面向对象程序开发

针对URL的SEO方法-随想飞翔

Google Adsense 提示100条-随想飞翔

计算机二级上机考试评分方法 - QQread.com 教育频道

给控件做数字签名之三:进行数字签名 - 阿泰的软件实用主义 - 博客园

请教如何获得所有当前用户可以访问的，不是系统表的表名和列名？ - ITPUB论坛

如何有效地利用oracle的数据字典

trixbox官方网站

birt使用经验

上机必读 二级上机考试部分评分方法

共享软件防破解的实用招法

oracle 942错误

在Oracle中存取BLOB对象实现文件的上传和下载

在Oracle中存取BLOB对象实现文件的上传和下载_站长技术站 -

动态SQL和PL/SQL的EXECUTE IMMEDIATE选项--ORACLE

Oracle自定义函数——f_henry_GetStringLength_

求在9i的存储过程中二维数组的完整例子及说明table ,varrry ,recor都行.

oracle错误信息大全

ORACLE函数大全

关于firefox对style.display属性的解释问题

Windows2000下整合Mysql4.0.13与Tomcat4.1.24搭建Jsp环境

使用Java编写oracle存储过程

Oracle的换行符

游标使用大全

iText - Google 网上论坛

求inetinfo.exe 消耗%100的CPU资源的解决方法!!!!!!! - 【 Windows操作系统】 - 《我是网管》论坛 - 畅通网络因为有我 - 使用 Google 工具栏进行发送

食品相克列表

上机必读二级上机考试部分评分方法