摘要: 日期开窗1 阅读全文
posted @ 2008-08-08 17:46 威尼斯的夏天 阅读(145) 评论(0) 推荐(0) 编辑
摘要: 目录 一、  环境配置 二、  ASP对Excel的基本操作 三、  ASP操作Excel生成数据表 四、  ASP操作Excel生成Chart图 五、  服务器端Excel文件浏览、下载、删除方案 六、  附录 阅读全文
posted @ 2008-08-08 17:45 威尼斯的夏天 阅读(216) 评论(0) 推荐(0) 编辑
摘要: page-break-before版本:CSS2  兼容性:IE4+ 继承性:无 语法: page-break-before : auto | always | avoid | left | right | null 阅读全文
posted @ 2008-08-08 17:44 威尼斯的夏天 阅读(232) 评论(0) 推荐(0) 编辑
摘要: unit Unit1; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,ComObj, StdCtrls, DscEdit; 阅读全文
posted @ 2008-08-08 17:42 威尼斯的夏天 阅读(911) 评论(0) 推荐(0) 编辑
摘要: Set ASPCom=CreateObject("TestCom.Class1") mTest=ASPCom.ADD(1111, 2222) 阅读全文
posted @ 2008-08-08 17:41 威尼斯的夏天 阅读(386) 评论(0) 推荐(0) 编辑
摘要: “又是一年毕业时”,看到一批批学子离开人生的象牙塔,走上各自的工作岗位;想想自己也曾经意气风发、踌躇满志,不觉感叹万千……本文是自己工作6年的经历沉淀或者经验提炼,希望对所有的软件工程师们有所帮助,早日实现自己的人生目标。本文主要是关于软件开发人员如何提高自己的软件专业技术方面的具体建议,前面几点旨在确定大的方向,算是废话吧。 阅读全文
posted @ 2008-08-08 17:40 威尼斯的夏天 阅读(149) 评论(0) 推荐(0) 编辑
摘要: winver---------检查windows版本 wmimgmt.msc----打开windows管理体系结构(wmi) wupdmgr--------windows更新程序 wscript--------windows脚本宿主设置 write----------写字板 阅读全文
posted @ 2008-08-08 17:38 威尼斯的夏天 阅读(555) 评论(0) 推荐(0) 编辑
摘要: SELECT (case when a.colorder=1 then d.name else '' end) N'表名', a.colorder N'字段序号', a.name N'字段名', (case when COLUMNPROPERTY( a.id,a.name,'IsIdentity')=1 then '√'else '' end) N'标识', (case when (SELECT count(*) FROM sysobjects 阅读全文
posted @ 2008-08-08 13:30 威尼斯的夏天 阅读(211) 评论(0) 推荐(0) 编辑
摘要: 体现了SQL Server中的四个知识点: 1. 获取SQL Server服务器上的默认目录 2. 备份SQL语句的使用 3. 恢复SQL语句的使用,同时考虑了强制恢复时关闭其他用户进程的处理 4. 作业创建SQL语句的使用 体现了SQL Server中的四个知识点: 1. 获取SQL Server服务器上的默认目录 2. 备份SQL语句的使用 3. 恢复SQL语句的使用,同时考虑了强制恢复时关闭其他用户进程的处理 4. 作业创建SQL语句的使用 阅读全文
posted @ 2008-08-08 13:18 威尼斯的夏天 阅读(297) 评论(0) 推荐(0) 编辑
摘要: /**//*************************************************************/ /**//** 功能:清除指定数据库的LOG日志以节约磁盘空间 **/ /**//** 参数说明:@Dname为指定的数据库名称, 传''则表示全部 **/ /**//** 日期:20080312 **/ /**//** 创建:ChengJie **/ /**//*************************************************************/ 阅读全文
posted @ 2008-08-08 13:14 威尼斯的夏天 阅读(191) 评论(0) 推荐(0) 编辑
摘要: 添加Web引用:http://www.webxml.com.cn/WebServices/WeatherWebService.asmx 具体代码如下: using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; namespace 天气助手 阅读全文
posted @ 2008-08-08 13:08 威尼斯的夏天 阅读(2307) 评论(5) 推荐(0) 编辑
摘要: 将一代码另存后缀:vbs ' '注意:1.编辑本文件时请不要用自动换行 阅读全文
posted @ 2008-08-08 13:02 威尼斯的夏天 阅读(549) 评论(0) 推荐(0) 编辑
摘要: 1. I see. 我明白了。 2. I quit! 我不干了! 3. Let go! 放手! 4. Me too. 我也是。 5. My god! 天哪! 6. No way! 不行! 7. Come on. 来吧(赶快) 8. Hold on. 等一等。 阅读全文
posted @ 2008-08-08 12:19 威尼斯的夏天 阅读(237) 评论(0) 推荐(0) 编辑
摘要: 目录 第一章 概述 4 规范制定原则 4 术语定义 4 Pascal 大小写 4 Camel 大小写 4 文件命名组织 4 1.3.1文件命名 4 阅读全文
posted @ 2008-08-08 12:12 威尼斯的夏天 阅读(190) 评论(0) 推荐(0) 编辑
摘要: 数据库管理10个最重要的特点 有关开发的10个最重要的特点 阅读全文
posted @ 2008-08-08 11:21 威尼斯的夏天 阅读(184) 评论(0) 推荐(0) 编辑
摘要: 下面是当时被leimin逼着写的,你可以做个参考: 一、数据库设计方面 1、字段类型。 varchar(max)\nvarchar(max)类型的引入大大的提高了编程的效率,可以使用字符串函数对CLOB类型进行操作,这是一个亮点。但是这就引发了对varchar和char效率讨论的老问题。到底如何分配varchar的数据,是否会出现大规模的碎片?是否碎片会引发效率问题?这都是需要进一步探讨的东西。 阅读全文
posted @ 2008-08-08 10:36 威尼斯的夏天 阅读(290) 评论(0) 推荐(1) 编辑
摘要: 一、 只复制一个表结构,不复制数据 select top 0 * into [t1] from [t2] 二、 获取数据库中某个对象的创建脚本 1、 先用下面的脚本创建一个函数 if exists(select 1 from sysobjects where id=object_id('fgetscript') and objectproperty(id,'IsInlineFunction')=0) drop function fgetscript go 阅读全文
posted @ 2008-08-05 14:15 威尼斯的夏天 阅读(190) 评论(0) 推荐(0) 编辑
摘要: CREATE TABLE [t] ( [id] [int] IDENTITY (1, 1) NOT NULL , [GUID] [uniqueidentifier] NULL ) ON [PRIMARY] GO 阅读全文
posted @ 2008-08-05 14:10 威尼斯的夏天 阅读(355) 评论(0) 推荐(0) 编辑
摘要: 程序员是一种技术工作,在IT的发展中有相当重要的地位,从底层硬件通讯协议的建立,到数据传输层的处理,到操作系统的建设,到数据库平台的建设,一直到应用层上各种数据营销平台的搭建,程序员在里面都扮演着举足轻重的角色并为IT事业的发展做出了巨大的贡献。 阅读全文
posted @ 2008-08-05 14:08 威尼斯的夏天 阅读(125) 评论(0) 推荐(0) 编辑
摘要: //判断是否包含字符串 sl := TStringList.Create; sl.LoadFromFile(Path + Rec.Name); for ii:=0 to sl.Count-1 do begin if Pos(trim(ed3.text), sl.Strings[ii]) > 0 then begin mmo1.Lines.Add(Path + Rec.Name); //mmo1.Lines.Add(Copy(sl.Strings[ii], Pos(trim(ed3.text), sl.Strings[ii]), 5)); BREAK; end; end; 阅读全文
posted @ 2008-08-05 13:55 威尼斯的夏天 阅读(179) 评论(0) 推荐(0) 编辑
摘要: tray2.cbSize:=sizeof(tray2); tray2.Wnd:=form1.Handle; tray2.uID:=0; tray2.uFlags:=NIF_ICON or NIF_TIP or NIF_MESSAGE; tray2.uCallbackMessage:=ghy_tray; tray2.hIcon:=ico2.Handle; tray2.szTip:='我的托盘程序'; 阅读全文
posted @ 2008-08-05 13:53 威尼斯的夏天 阅读(225) 评论(0) 推荐(0) 编辑
摘要: SQL.Add('BACKUP LOG '+Trim(qry09.FieldByName('name').AsString)+' WITH truncate_only'); SQL.Add('DBCC shrinkdatabase ('+qry09.FieldByName('name').AsString+')'); 阅读全文
posted @ 2008-08-05 13:51 威尼斯的夏天 阅读(272) 评论(0) 推荐(0) 编辑
摘要: 随着数据量的逐步增大,软件执行效率问题慢慢浮现,程序执行速度越来越慢, 甚至出现白屏、死机等。这种问题最常体现在我们关键的批处理和报表上面。比如 存货系统中的月结程序,进耗存统计表等。生产模块中的批次需求计划、物料需求 计划等。 阅读全文
posted @ 2008-08-05 13:42 威尼斯的夏天 阅读(352) 评论(0) 推荐(0) 编辑
摘要: 运用ActiveX控件cdonts.dll 首先在delphi里加入cdonts.dll 然后拖动到Form上,并命名为:mNewMail,配置好相关属性,相关代码如下: 阅读全文
posted @ 2008-08-05 13:04 威尼斯的夏天 阅读(158) 评论(0) 推荐(0) 编辑
摘要: postmessage.FromAddress :=edit6.Text ; postmessage.FromName :=edit7.Text ; postmessage.Subject :=edit5.Text ; postmessage.ToAddress.Add(edit4.Text ); postmessage.Body.Assign(memo1.Lines); 阅读全文
posted @ 2008-08-05 12:56 威尼斯的夏天 阅读(243) 评论(0) 推荐(0) 编辑
摘要: 原理很简单,找出汉字表中拼音首字符分别为“A”至“Z”的汉字内码范围,这样,对于要检索的汉字只需要检查它的内码位于哪一个首字符 阅读全文
posted @ 2008-08-05 12:51 威尼斯的夏天 阅读(284) 评论(0) 推荐(0) 编辑
摘要: Borland出品的Delphi,有着闪电般的编译速度,但是在界面控件使用较多、工程项目较大的时候,编译一个工程仍需要一段时间,打开庞大的Delphi IDE,也需要时间。其实,在一个工程开发结束,调试完成之后的Release编译,完全可以用命令行来执行,因为Delphi的编译器参数不像C++编译器那样复杂。 阅读全文
posted @ 2008-08-05 12:50 威尼斯的夏天 阅读(585) 评论(0) 推荐(0) 编辑
摘要: for i := 1 to Long do begin Temp := pchar(copy(AStrPass, i, 1)); c := Temp^; if c in ['A'..'Z'] then c := chr(ord(c) + 32); Pass := Pass + (ord(c) xor long) + (ord(c) and long); end; 阅读全文
posted @ 2008-08-05 12:45 威尼斯的夏天 阅读(203) 评论(0) 推荐(0) 编辑
摘要: 描述:取得本机的IP地址函数 阅读全文
posted @ 2008-08-05 12:44 威尼斯的夏天 阅读(290) 评论(0) 推荐(0) 编辑
摘要: 描述:取得计算机的名称函数 TODO:取得计算机的名称函数 阅读全文
posted @ 2008-08-05 12:43 威尼斯的夏天 阅读(170) 评论(0) 推荐(0) 编辑
摘要: 一.打开 Delphi 5.0 程序 二.关闭所有单元 三.单击“File”在菜单下的“New”子菜单,弹出“New Item”对话框,选择“ActiveX”下的“ActiveX Library”,单击“OK”。(此操作,创建一个“库工程”) 阅读全文
posted @ 2008-08-05 12:42 威尼斯的夏天 阅读(224) 评论(0) 推荐(0) 编辑
摘要: Ctrl+PageUp 将光标移至本屏的第一行,屏幕不滚动。 Ctrl+PageDown 将光标移至本屏的最后一行,屏幕不滚动。 Ctrl+↓ 向下滚动屏幕,光标跟随滚动不出本屏。 Ctrl+↑ 向上滚动屏幕,光标跟随滚动不出本屏。 Ctrl+Shift+NUM 在光标行设置最多九个临时标志号,对临时切换非常有用。 阅读全文
posted @ 2008-08-05 12:41 威尼斯的夏天 阅读(188) 评论(0) 推荐(0) 编辑
摘要: 一) 使用动态创建的方法 首先创建 Excel 对象,使用ComObj: var ExcelApp: Variant; ExcelApp := CreateOleObject( 'Excel.Application' ); 1) 显示当前窗口: ExcelApp.Visible := True; 阅读全文
posted @ 2008-08-05 12:38 威尼斯的夏天 阅读(17085) 评论(0) 推荐(0) 编辑
摘要: Abort 函数 引起放弃的意外处理 Abs 函数 绝对值函数 AddExitProc 函数 将一过程添加到运行时库的结束过程表中 Addr 函数 返回指定对象的地址 阅读全文
posted @ 2008-08-05 12:35 威尼斯的夏天 阅读(481) 评论(0) 推荐(0) 编辑
摘要: procedure ExportDBGridToExcel(Grid: TDBGrid; DisableScreenUpdating: Boolean; ReportCaption,ReportMemo,ReportTtl :string); const CLASS_ExcelApplication: TGUID = '{00024500-0000-0000-C000-000000000046}'; 阅读全文
posted @ 2008-08-05 12:34 威尼斯的夏天 阅读(180) 评论(0) 推荐(0) 编辑
摘要: 如果想将数据库表格转换为以逗号分割的文本文件(CSV格式),可以使用如下的过程代码: 阅读全文
posted @ 2008-08-05 12:33 威尼斯的夏天 阅读(741) 评论(0) 推荐(0) 编辑
摘要: 在Delphi中解析公式, 我们可以自己写相关函数, 当然亦可以把任务交给SQL去处理, 这里还有一个方法就是调用COM元件ScriptControl的Eval方法来处理。具体实例代码如下: 阅读全文
posted @ 2008-08-05 12:28 威尼斯的夏天 阅读(150) 评论(0) 推荐(0) 编辑
摘要: 我们知道在SQL中写四则运算表达式, SQL会帮我们做里面具体的逻辑运算, 因此,此方法就是把表达式用'SELECT'来执行处理 :)。在DELPHI中只要新加一 个Query来执行:(比如)SELECT 4*(5+8)-3。当然这里也可以把相关变量通 过参数的形式传递进来 阅读全文
posted @ 2008-08-05 12:19 威尼斯的夏天 阅读(147) 评论(0) 推荐(0) 编辑
摘要: if not(a in ['+','-','*','/','(',')','#']) or not(b in ['+','-','*','/','(',')','#']) then result:='e' else case a of '+','-': case b of '*','/','(':result:=''; end; '*','/':if b='(' then result:=''; '(': if b=')' then result:='=' else if b='#' then result:='e' else result:=''; '#': if b=')' then result:=' 阅读全文
posted @ 2008-08-05 11:45 威尼斯的夏天 阅读(249) 评论(0) 推荐(0) 编辑
摘要: 根据筛选条件把f_return中的符合条件的数据写入另一个变量中(由于f_return中的数据与LISTVIEW中的数据是一一对应的 因此可利用LISTVIEW的Items.Item[i].Checked是否为true来确定是否把f_return中的某条数据写入另一个变量中) 阅读全文
posted @ 2008-07-29 08:42 威尼斯的夏天 阅读(189) 评论(0) 推荐(0) 编辑