zhangjinbao66

摘要： delphi文件打包方式 在Delphi项目中，通常有一个和项目名称主文件名相同的.RES文件，该文件用于保存应用程式图标等资源，对应于此文件，在项目文件中一定含有编译指示“{$R *.res}”，告诉编译器编译时需要包含和项目主文件名相同的.RES文件。同样，如果需要在应用程式中以资源形式包含所有 阅读全文

摘要： create or replace procedure put_line_unlimit(p_string in varchar2)is StrTemp long default p_string; begin loop if instr(StrTemp,chr(13))=0 then ... 阅读全文

摘要： cd 路径--文件转移for /R %i in (*.*) do MOVE %i 新文件夹路径\--去掉XXXX@echo offfor %%a in (*.xls) do for /f "tokens=1 delims=XXXX" %%b in ("%%a") do ren "%%a" "%%b.... 阅读全文

摘要： 首 先谈一下浏览器，虽然现在ie依然是浏览器市场的老大，大约占有67%的份额，但是由于其各方面的欠缺，用户开始选择其他浏览器作为自己浏览网页的主要 工具，比如firefox、theworld、maxthon、chrome、opera等等，在用户使用比较多的浏览器中，分为2大派系 - ie内核和非i... 阅读全文

摘要： uses DateUtils;const IntMultiplication: Array[1..17] Of Integer=(7,9,10,5,8,4,2,1,6,3,7,9,10,5,8,4,2);//函数名：IsRightID//参数：sID，身份证号码 （输入）// sSex,性别 （输出... 阅读全文

摘要： SQL 异地 备份 阅读全文

摘要： C#写的dll为非标准的windows下dll，故 一般其他语言不能直接调用，当然基于.net平台下的编程语言是可以调用，要让其他语言调用C#写的dll一般通过webservice服务或者是Com 方式。经过在网上找资料以及自身的实践发现可以通过以下方式在Delphi和VB语言中调用。1.编写C#写... 阅读全文

摘要： CREATE FUNCTION dbo.GetJZZH(@StrJZZH nvarchar(200))RETURNS nvarchar(100) ASBEGIN --声明变量 --函数返回值 declare @iRet nvarchar(100) --循环用的变量 declare @i int --记录字符串长度 declare @LenStr int --记录字符串中当前字符 declare @CurStr varchar(1) --初始化函数返回值 set @iRet='' --如果字符串里没有数字,直接返回 if PATINDEX('%[0-9]%',@S 阅读全文

摘要： 老一辈的身份证号码是15位的，今天写了个函数转成18位的。放在日志里，备份一下。恐以后用的到。const IntMultiplication: Array[1..17] Of Integer=(7,9,10,5,8,4,2,1,6,3,7,9,10,5,8,4,2);//转换身份证号//参数：旧15位身份证号。返回值：新18位身份证号function IdNoTransform(OldIdNo:string):string; //判断是否存在非法字符 function JudgeIllegal(str:string):Boolean; var i:Integer; begin Result:. 阅读全文

摘要： ALTER FUNCTION CheckSNID(@snid nvarchar(50))RETURNS bit ASBEGIN declare @iRet bit declare @id_num varchar(1) declare @i int declare @sn_sum int declar... 阅读全文