-
编辑 删除
不能给某人发邮件
这两天不知道为什么邮件发给某人A,总是发不出去,发给某人B ,可以发送出去,用一样的邮箱域名.回信提示:"找不到 [yahoo.com.cn] 的邮件服务器. No route found to yahoo.com.cn" [ mail.21cn.com]...
-
编辑 删除
TBComboBoxEh 下拉列表框數據表列資料
// TBComboBoxEh 下拉列表框，加載數據庫的選擇資料。// 通用 過程 // 調用方式： //procedure Tfrm_makep.FormCreate(Sender: TObject);// begin// AddComBoxStr(qry_sel,'YPSZ',DBComboBoxEh7);// END; procedure AddComBoxStr(vTableName,vType: string;vComBox: TDBComboBoxEh);//解決小廖的ComBox問題var lClientDataSet: TClientDataSet; li: integer;begin lClientDataSet := GetTmpDataSet(0); lClientDataSet.Close; lClientDataSet.CommandText := 'select id,mc from t_combo where app_id='+#39+vTableName+#39+
-
编辑 删除
采购、入库、退货的状况
/* 采购单号，项目，入库号，退货号，物料编号，单位，采购量，入库量，退货量 功能：采购、入库、退货的状况 格式：sp_pur_input_return '采购单号' --后缀含糊查询 作者：Sam 建立日期：2008-09-21 完成日期...
-
编辑 删除
left join, right join, inner join 区别和联系
left join, right join, inner join 区别和联系1，总论： LEFT JOIN返回”first_table”中所有的行尽管在” second_table”中没有相匹配的数据。RIGHT JOIN返回”second_table”中所有的行尽管在”first_table”中没...
-
编辑 删除
MSSQL 新建表
if exists ( select 1 from sysobjects where name='bas_edu' and type ='U' )begin drop table bas_edu ;end;gocreate table bas_edu( --学历表 eduNo varchar(10) not null , --编号 eduName varchar(20) not null, --名称 eduMemo varchar(30) not null default '' ,--备注 creater varchar(10) not null, --建立人 createDate date , -- 新增日期 constraint bas_edu_pk primary key(eduNo) --eduNo 为主键 ) go[@more@]
-
编辑 删除
在linux下的C程序例子
在linux下的C程序例子。检查 输入的年份 是否为闰年。1、编写一个布尔函数int is_leap_year(int year)，判断参数year是不是闰年。如果某一年的年份能被4整除，但不能被100整除，那么这一年就是闰年，此外，能被400整除的年份也是闰年。[@more@]#include <math.h>#include <stdio.h> void is_leap_year(int years){ if((years % 4==0 && years%100 !=0) || years % 400 == 0) { printf(" %d is leap year.n",years); return ; } else { printf("%d is not leap year . n",year
-
编辑 删除
SQL SERVER TRY CATCH功能
网络上看到 SQL SERVER TRY CATCH ，认为 比我以前用的@@error 的简单多了。想用于sqL SERVER 2000 ，在网网络 查找了一下，原来在2005版本以后 才能用的。sql server 2005中新增加的try catch，可以很容易捕捉异常了，今天大概学习看了下，归纳下要点如下 基本用法BEGIN TRY { sql_statement | statement_block }END TRYBEGIN CATCH { sql_statement | statement_block }END CATCH[@more@]
-
编辑 删除
PLSQL 自动增号
LCD预估申请单：自动增号过程 。-- AUTOmatic NUMBER PROCEDURE GET_NUMBER(EVENT VARCHAR2) IS V_APPLY_NUMBER NUMBER ;BEGINIF (EVENT ='WHEN-NEW-RECORD-INSTANCE') THEN SELECT MAX(APPLY_NUMBER) INTO V_APPLY_NUMBER FROM SGD_QOT_CST_APPLY_HEADERS_ALL WHERE DEPT_ID = :SGDLCD_QUO_CST.DEPT_ID ; IF (SUBSTR(V_APPLY_NUMBER,4,4) = TO_CHAR(SYSDATE,'YYMM')) THEN :SGDLCD_QUO_CST.APPLY_NUMBER :=SUBSTR(:SGDLCD_QUO_CST.DEPT_NO,-3,3) || SUBSTR(V_APPLY_NUMBER,4) +1 ; ELSE :SGDLC
-
编辑 删除
生成9月份考勤记录
attendance表是考勤记录表，alter table attendance add cMonth varchar(8),cdate varchar(4)生成9月份考勤记录。 begin declare @i int set @i=1 while (@i<=30) begin insert into attendance (empNo,first...
-
编辑 删除
MSSQL删除列
MSSQL 删除 列：--新建表CREATE TABLE test(testNo varchar(5),testName varchar(20)) --删除 表的某一列：ALTER TABLE test DROP COLUMN testNo;如果有约束，则先删除约束，再删除列。[@more@]
-
编辑 删除
MSSQL上、下 取整数函数
--MSSQL内置函数 ：上取整数 ceiling(2.01) ，返回3.select ceiling(2.01)下面自定义了此函数（没有找到内置时自己写的），[@more@]--自定义，上取整数 函数create function fn_ceils( @n float )returns intasbegin-- declare @n floatdeclare @m int --set @n =2.02set @m=0if convert( int,@n )< @n set @m =convert(int,@n)+1else set @m= convert(int,@n)return (@m)endselect dbo.fn_ceils(2.01) 结果：3--MSSQL内置函数 ：上取整数 返回2，与convert(int,2.9) 结果相同。select floor(2.9)
-
编辑 删除
delphi 取得、设置文件属性
label1.Caption:= intToStr(FileGetAttr('d:txt.txt') );// 取得文件属性，35:隐藏、只读，存档，32:存档，33:只读 ,34: 隐藏 edit1.Text:=intToStr( fileSetAttr('d:txt.txt',32)) ; //设置文件属性，设置成功则返回‘0’[@more@]
-
编辑 删除
如何查MYSQL有多少数据库或表
如何查MYSQL有多少数据库mysq > show databases如何查MYSQL有多少数据表mysql > show tables [@more@]
-
编辑 删除
Server sql 2000連接oracle數據庫
sqlserver2000连接oracle9i的方法2009-12-21 17:59一：应用环境OS:win servers2003 with sp2DB:sqlserver2K with sp2/oracle9i二：连接步骤 1.要求pc机上安装oralce9i客户端软件和sqlserver2000软件。 2.客户端的配置tnsnames.ora文件，配置所要连接的数据库服务器. 3.配置windows的ODBC数据源： 3.1)开始菜单—》设置—》管理工具—》数据源（ODBC）—》进入配置用户DSN 3.2)添加—》选择Microsoft ODBC for oracle—》 自定义数据源名称（最好跟tns中连接串同名！）—》 服务器名称（必填！填写tns文件
-
编辑 删除
Visual Studio 2005(C# ) 快捷键
调试快捷键 F6: 生成解决方案 Ctrl+F6: 生成当前项目 F7: 查看代码 Shift+F7: 查看窗体设计器 F5: 启动调试 Ctrl+F5: 开始执行(不调试) Shift+F5: 停止调试 Ctrl+Shift+F5: 重启调试 F9: 切换断点 Ctrl+F9: 启用/停止断点 Ctrl+Shift+F9: 删除全部断点 F10: 逐过程 Ctrl+F10: 运行到光标处 F11: 逐语句From:http://blog.sina.com.cn/s/blog_474b48e00100cf52.html[@more@] 编辑快捷键 Shift+Alt+Enter: 切换全屏编辑 Ctrl+B,T / Ctrl+K,K: 切换书签开关 Ctrl+B,N / Ctrl+K,N: 移动到下一书签 Ctrl+B,P: 移动到上一书签
-
编辑 删除
Editeplus注册码
EditPlus 3.12V注册码（英文版）－－本人测试可用Username: Pierre MAUCLAIRRegcode: 7DD09-3E850-EB836-EEA26-BD40EEditPlus 绿色特别版 注册码注册信息:kariryo5387D-12450-BCZ8B-D6W0B-85TE1[@more@]
-
编辑 删除
MSSQL 权限明细表(删除、新增、修改)
--用户权限--select top 5 * from rt_UserRight--模板信息表--select top 5 * from rt_ModuleList--用户表--select top 5 * from rt_UsersList use gksERPgo--权限明细 表（新增、删除、修改、审核、、、、、、） S...
-
编辑 删除
用REDHAT LINUX 產生的問題
用REDHAT LINUX 產生的問題:1. 安裝了五筆,但是不知道如何設置才能給我使用?2.設置字體路徑是什麼?3.設置輸入法路徑是什麼?4.如何安裝*,bin, *.sh 和*.tar.tar軟件?5.如何卸載 *,bin, *.sh,*.tat.gz和*.tar.tar軟件?...
-
编辑 删除
规格查找
--库存拉链类规格与规格档案的规格不相同的记录.CSVselect md.mdmodel from model , ( select f.code as code,s.model as mdmodel from stock s ,mmf f , model m where s.matid=f.matid and substring(f.code,...
-
编辑 删除
如何 实现 delphi edit 里指定输入时间格式
如何 实现 delphi edit 里指定输入时间格式，如：2008-12-25 15:58 ， 当月超过12时，自定返回当前月份；当日超过该月最大日，则返回当前日期。 当小时大于24则返回当前小时，当分钟大于59则返回当前分钟...
