随笔分类 -  工作代码

新系统查询是否有信息修改记录
摘要:qry: = TADOQuery.Create( nil ); try lblXxxg.Caption: = '' ;lblXxxgSfzh.Caption: = '' ;lblXxxg.visible: = false;lblXxxgSfzh.Visible: ... 阅读全文

posted @ 2011-06-23 16:28 步三少 阅读(291) 评论(0) 推荐(0)

快捷输入电大学号 delphi代码
摘要:Code highlighting produced by Actipro CodeHighlighter (freeware)http://www.CodeHighlighter.com/--> function easyinput(s:string):string; // use... 阅读全文

posted @ 2010-10-21 19:02 步三少 阅读(185) 评论(0) 推荐(0)

prtvu xsdabljc 视图代码
摘要:Code highlighting produced by Actipro CodeHighlighter (freeware)http://www.CodeHighlighter.com/--> prtvuxsdabljc视图代码 SELECT dbo.xsb.Xh AS xhj... 阅读全文

posted @ 2010-10-19 09:06 步三少 阅读(348) 评论(0) 推荐(0)

新系统班级名称规范化
摘要:代码Code highlighting produced by Actipro CodeHighlighter (freeware)http://www.CodeHighlighter.com/--//去掉一些代码,以及全角符号procedureTForm1.Button1Click(Sender:TObject);vars:string;i,j,k:Integer;beginwithqrydo... 阅读全文

posted @ 2010-10-08 11:36 步三少 阅读(196) 评论(0) 推荐(0)

毕业预警的SP
摘要:代码Code highlighting produced by Actipro CodeHighlighter (freeware)http://www.CodeHighlighter.com/--createproceduresp_byyujingasdeclare@njinteger--还剩下4年学籍无效,无通过门数少于5门set@nj=year(getdate())SELECTdwmc,x... 阅读全文

posted @ 2010-09-09 10:50 步三少 阅读(243) 评论(0) 推荐(0)

查询哪些学生没有做课程注册
摘要:[代码] 阅读全文

posted @ 2009-11-10 11:05 步三少 阅读(135) 评论(0) 推荐(0)

修改一个xsjbdab的视图
摘要:增加了学生类别层次,还有本部与分校的字段,方便统计。 Code highlighting produced by Actipro CodeHighlighter (freeware)http://www.CodeHighlighter.com/-->SELECT dbo.zyzb.zymc, dbo.zyjxjh.njzyid, dbo.bjxxb.bmc, dbo.dwdm.dwmc, ... 阅读全文

posted @ 2008-11-18 11:18 步三少 阅读(261) 评论(0) 推荐(0)

修改学籍异动的storeprocedure
摘要:修改原因: ydid总是有重复值,原来系统不是直接在xjydjzb中更新数据,而是在一个keytable中记录上一次的最大的ydid。--今天在错误信息反馈中才知道这个原理 。 所以直接在keytable中找ydid的最大值。 Code highlighting produced by Acti... 阅读全文

posted @ 2008-10-24 14:05 步三少 阅读(448) 评论(0) 推荐(0)

SQLServer中如何将一个用户与登录绑定
摘要:系统管理员,重装了数据库服务器,造成我们的用户都不能访问具体的数据库以及表了。 登录帐号与用户名同名,但在用户表中,没有相对应的登录帐号。如何将一个用户与登录绑定呢? 最后在网上找到了一个存储过程: exec sp_change_users_login 'update_one','lzc','lzc... 阅读全文

posted @ 2008-10-24 09:08 步三少 阅读(493) 评论(0) 推荐(0)

数字转换大写人民币的delphi实现
摘要:之前用Access作一个应用,但找不到货币转换成大写人民币的功能(当然可以通过excel 转换,但不在一个应用上,放弃)。以为比较简单,自己试写,谁知用了两个晚上,才基本实现,但没有小数点(元)以下货币的转换。也没有兆的判断。而且对字符的合法性也没有检验。今天有时间,将其完善一下。(可能还会有考虑不... 阅读全文

posted @ 2008-09-26 17:44 步三少 阅读(856) 评论(3) 推荐(0)

取消档案表上的触发器
摘要:Code highlighting produced by Actipro CodeHighlighter (freeware)http://www.CodeHighlighter.com/--> 1 CREATE TRIGGER tri_ChgXJzt ON dbo.xsjb*** 2 FOR UPDATE 3 AS insert into UmlChgXj 4 (xhjm,xm,x... 阅读全文

posted @ 2008-09-17 19:46 步三少

学籍异动存储过程
摘要:学籍异动存储过程: Code highlighting produced by Actipro CodeHighlighter (freeware)http://www.CodeHighlighter.com/--> CREATE procedure sp_xjyd @xhjm char ... 阅读全文

posted @ 2008-08-28 14:28 步三少 阅读(272) 评论(0) 推荐(0)

创建一个存储过程,查询在校生
摘要:一直都是临时写语句,现在一次性建立存储过程,日后直接调用就好。 create procedure sp_zaixiao as declare @curyear int declare @curmonth int declare @tolrow int decla... 阅读全文

posted @ 2008-07-10 11:00 步三少 阅读(977) 评论(0) 推荐(0)

在xsxxxg表中找出修改的项目
摘要:crtvu中,xsxxxg表没有识别究竟是哪个字段进行了信息修改(sfzh,xbdm,xm)。然尔却要求我们生成报表,找出哪个项目修改过的。但以上项目都有修改前、修改后的信息。因此,想法是对比修改前后数据,如果不一致,记录项目名称(有可能修改多个项目)。 关键:使用Tstringlist.comma... 阅读全文

posted @ 2008-06-25 14:24 步三少 阅读(463) 评论(0) 推荐(0)