ITPub博客

控件smtp: TIdSMTP;MgeSend: TIdMessage;代码procedure TForm1.Button1Click(Sender: TObject);beginSMTP.Host:='smtp.163.com';smtp.Username:='zhm001x@163.com';smtp.Password:='paswrd';smtp.Port:=25;smtp.Connect(); idsmtp1.AuthenticationType:=atLogin; MgeSend.Recipients.EMailAddresses:='zhm001x@qq.com';MgeSend.From.Text :='zhm001x@163.com';MgeSend.Subject:='test';MgeSend.Body.Text:='发邮件测试';SMTP.Authenticate;Smtp.Send(mgeSend);end; ==============================================在主form1上添加 两个bu

在实施ERP的过程中还必须注意以下“后天条件”，做不好，同样存在失败的风险。 1．任命得力的项目经理，项目组织人选得当 项目经理负责项目实施的全部具体工作，起着承上启下，沟通内外的作用。到一个实施ERP的企业，只要观察是什么人在担任项目经理，项目实施小组由什么成员组成，就可以八九不离十地判断出企业高层对ERP项目的重视程度，以及今后项目成败的命运。 2．重视培训教育，提高全体员工素质 长期习惯于传统管理的员工的知识如果得不到更新和充实，就不可能驾驭一个“从来不是这么干法的”ERP系统，项目将无法启动和

http://topic.csdn.net/u/20070321/09/f1fb9632-effc-42c3-8fc2-00a4ae125cc9.htmlselect dateadd(day,26,dateadd(month,-1,DATEADD(day,0-day(getdate()),getdate()))) as heheselect dateadd(day,25,DATEADD(day,0-day(getdate()),getdate())) as 本月25号select 上个月26号 = convert(varchar(8),DATEADD(m, -1, getdate()),21)+ '26 ' , 本月25号=convert(varchar(8),getdate(),21)+ '25 '---日期型select 上个月26号 = convert(datetime,convert(varchar(8),DATEADD(m, -1, getdate()),21)+ '26 ')

做好TOC工厂管理，不外乎于四大招——“一个机制、两个现场、三个M、四个挖尽。”第一、 建立产销协调机制 工厂和业务都要服务于销售指标。业务要根据工厂的产能来接单和答应客户交期；而不是以往的业务先跟客户确定好交货期，然后把订单丢给工厂，这样只能是造成工厂的混乱，而业务承诺客户的交货期也得不到“说到做到”的保证。产销协调机制的建立，需要生管一次性释放所有的已接订单，工厂根据CCR的产能进行排产，如果业务再接到订单，要根据CCR产能、各产品在CCR的加工工时、在CCR前排队的订单、缓冲大小四个数据来确定此订单的安全交

http://www.amteam.org/k/TOC/2009-6/625353.htmlTOC (Theory Of Constraints 制约法) 是以色列籍物理学家和企管大师高德拉特博士(Dr Eliyahu Moshe Goldratt)所发明的一套企业管理方法。 TOC 是一套先进的管理策略，针对企业的大难题，提供一系列突破性的解决方法。TOC指导企业人员如何找出运作上的『瓶颈』(或称『制约』 Constraints)，及如何尽量利用他们手上有限的资源(资金、设备、人员等)，令企业在极短时间内及无需大量额外投资下，达致运作及盈利上的显著 改善。 TOC幷不复杂，很多业界的专家誉之为「简单而有效的常识管理」，

CREATE TABLE company ( comp_code_id int(10) NOT NULL auto_increment , org_id char(10) , mfg_comp_code char(20) , mfg_comp_name char(50) , process_plant_code char(20) , process_plant_name char(50) , max_turnover_sum decimal(18, 2) , prod_capacity decimal(18, 2) , wh_cubage decimal(18, 2) , wh_acreage decimal(18, 2) , file_id char(20), PRIMARY KEY (`comp_code_id`))ENGINE=MyISAM DEFAULT CHARSET=utf8;CREATE TABLE [company] ( [comp_code_id] [int] IDENTITY (1, 1

### 指定加载struts2配置文件治理器，默认为org.apache.struts2.config.DefaultConfiguration### 开发者可以自定义配置文件治理器，该类要实现Configuration接口，可以自动加载struts2配置文件。# struts.configuration=org.apache.struts2.config.DefaultConfiguration### 设置默认的locale和字符编码# struts.locale=en_USstruts.i18n.encoding=UTF-8### 指定struts的工厂类# struts.objectFactory = spring### 指定spring框架的装配模式### 装配方式有: name， type， auto， and constructor struts.objectFactory.spring.autoWire =

v:* {behavior:url(#default#VML);} o:* {behavior:url(#default#VML);} w:* {behavior:url(#default#VML);} .shape {behavior:url(#default#VML);} Normal 0 false false false MicrosoftInternetExplorer4 /* Style Definitions */ table.MsoNormalTable {mso-style-name:"Table Normal"; mso-tstyle-rowband-size:0; mso-tstyle-colband-size:0; mso-style-noshow:yes; mso-style-parent:""; mso-padding-alt:0in

CREATE TABLE [dbo].[time_dimension] ( [time_id] [int] IDENTITY (1, 1) NOT NULL , [the_date] [datetime] NULL , [the_day] [nvarchar] (15) NULL , [the_month] [nvarchar] (15) NULL , [the_year] [smallint] NULL , [day_of_month] [smallint] NULL , [week_of_year] [smallint] NULL , [month_of_year] [smallint] NULL , [quarter] [nvarchar] (2) NULL , [fiscal_period] [nvarchar] (20) NULL ) ON [PRIMARY] DECLARE @WeekString varchar(12), @dDate SMALLDATETIME, @sMonth

select * from dbo.calendar(7,2009)create function calendar(@month int,@year int)returns @DAY1 table(Sun char(3),Mon Char(3),Tue Char(3),Wed Char(3),Thu Char(3),Fri Char(3),Sat Char(3))asbegindeclare @i intdeclare @j intdeclare @intchk intdeclare @dnum intdeclare @curdate intdeclare @month1 char(2)declare @year1 char(4)declare @date char(2)declare @dtchk intdeclare @dtval intset @date='01'set @month1=@monthset @year1=@yearset @dtchk=1set @i=1set @j=1declare @DAY2 table(SUN char(3) default '',MON

Hibernate工作原理及为什么要用？原理：1.读取并解析配置文件2.读取并解析映射信息，创建SessionFactory3.打开Sesssion4.创建事务Transation5.持久化操作6.提交事务7.关闭Session8.关闭SesstionFactory为什么要用：1. 对JDBC访问数据库的代码做了封装，大大简化了数据访问层繁琐的重复性代码。2. Hibernate是一个基于JDBC的主流持久化框架，是一个优秀的ORM实现。他很大程度的简化DAO层的编码工作3. hibernate使用Java反射机制，而不是字节码增强程序来实现透明性。4. hibernate的性能非常好，因为它是个轻量级框架。映射的灵活性很出色。

事务日志（Transaction logs）是数据库结构中非常重要但又经常被忽略的部分。由于它并不像数据库中的schema那样活跃，因此很少有人关注事务日志。　　 事务日志是针对数据库改变所做的记录，它可以记录针对数据库的任何操作，并将记录结果保存在独立的文件中。对于任何每一个事务过程，事务日志都有非常全面 的记录，根据这些记录可以将数据文件恢复成事务前的状态。从事务动作开始，事务日志就处于记录状态，事务过程中对数据库的任何操作都在记录范围，直到用户 点击提交或后退后才结束记录。每个数据库都拥有至少一个事务日志以及

http://www.cnblogs.com/ghd258/archive/2006/03/20/354147.htmlSET QUOTED_IDENTIFIER ON GOSET ANSI_NULLS ON GOALTER procedure usp_ImportMultipleFiles @filepath varchar(500), @pattern varchar(100), @TableName varchar(128)asset quoted_identifier offdeclare @query varchar(1000)declare @max1 intdeclare @count1 intDeclare @filename varchar(100)set @count1 =0create table #x (name varchar(200))set @query ='master.dbo.xp_cmdshell "dir '+@filepath+@pattern +' /b"'insert #x exec (@query)delete fro

把长日期转换为短日期 Convert(char(10),getdate(),120) MS-SQL数据库开发常用汇总 1.按姓氏笔画排序:Select * From TableName Order By CustomerName Collate Chinese_PRC_Stroke_ci_as 2.数据库加密:select encrypt('原始密码')select pwdencrypt('原始密码')select pwdcompare('原始密码','加密后密码') = 1--相同；否则不相同 encrypt('原始密码')select pwdencrypt('原始密码')select pwdcompare('原始密码','加密后密码') = 1--相同；否则不相同3.取回表中字段:declare @list varchar(1000),@sql nvarchar(1000) select @list=@

把长日期转换为短日期 Convert(char(10),getdate(),120) MS-SQL数据库开发常用汇总 1.按姓氏笔画排序:Select * From TableName Order By CustomerName Collate Chinese_PRC_Stroke_ci_as 2.数据库加密:select encrypt('原始密码')select pwdencrypt('原始密码')select pwdcompare('原始密码','加密后密码') = 1--相同；否则不相同 encrypt('原始密码')select pwdencrypt('原始密码')select pwdcompare('原始密码','加密后密码') = 1--相同；否则不相同3.取回表中字段:declare @list varchar(1000),@sql nvarchar(1000) select @list=@

哥哥姐姐们我的查询需要根据开始时间和结束时间来查询，我不会写啊，不知道咋办了 jsp <table width="400" height="150"> <tr> <td>开始日期 </td> <td> <input type="text" style="width: 70px" onfocus="HS_setDate(this)"> </td> </tr> <tr> <td>结束日期 </td> <td> <input type="text" style="width: 70px" onfocus

摘要：企业在实施和推行ERP的阶段，会遇到来自内部的各种阻力。本文尝试对阻力产生的根源进行分析，提供给企业管理者作为改善的参考。 ERP在企业实施和维护的时候，经常会遇到来自各方面的阻力。很多企业的管理者和实施顾问都遇到过，例如以下一些比较典型的状况：1、 相关部门的管理层和执行层认为用了系统除了流程上更多的束缚，没有实际的效果2、 部门经理认为增加了机器和录入人员，效率没看到增高，到是单据多了很多3、 业务部门认为软件的实际应用效果太差，运算之后跑出来的计划不具备任何的价值，无法操作

********************************EXEC master..xp_cmdshell 'bcp "select * from iems.dbo.company for xml auto, elements " queryout c:a1.xml -c -S192 -Usa -Pmssql'BCP生成XML文件-- To allow advanced options to be changed.EXEC sp_configure 'show advanced options', 1GO-- To update the currently configured value for advanced options.RECONFIGUREGO-- To enable the feature.EXEC sp_configure 'xp_cmdshell', 1GO-- To update the currently configured value for this feature.RECONFIGUREGO EXEC('EXEC m

各位前辈大家好,请帮我解决一个棘手的问题,我不会写SQL存储过程,现在一个Delphi程序执行非常的慢,想将其用SQL存储过程替代请各位前辈帮忙,在线等主要 资料表单有 MRPplan,MRPplantou (生产单资料表), mrpplanpsn(物料需求单资料表),bom(BOM 资料表) 四个，其中关联字段为Psn(生产单号),materysn(物料编号)从 MRPplan 中依据Psn查找资料进行循环,a:假如mrpplanpsn 中有对应Psn的materysn则将MRPplan.planshu数量加到 mrpplanpsn.gr上b:假如mrpplanpsn 中没有有对应Psn的materysn则将MRPplan中相关资料写入 mrpplanpsnc:进行对MRPplan.mater

TXT文本文件是一种以ACSII吗存储数据的文件。在TXT文件中只能够存储一些字符数据，所以这种文件的移植性和通用性很强，具有较高的易用性，并且被广泛应用，所以Delphi对该类型文件提供了较好的支持。目前在Internet上最为流行的XML文件也是一种文本文件。TXT文本文件的操作非常简单，具体操作过程如下： 　　1．首先要声明一个TextFile类型的的文件指针。如：var MyFile:TEXTFile。 　　2．然后使用AssignFile方法将声明的文件指针与外部TXT文件相关联。AssignFile (FileName ) ；FileName 既可以是全路径名,也可以仅是文件名。对于后者系