摘要: Declare cur_k0 Cursor For Select distinct s_code From dbo.his_ypk_use ;Open cur_k0;Fetch cur_k0 Into :ls_code;Do Until sqlca.SQLCode = 100 Or sqlca.SQ... 阅读全文
posted @ 2015-08-07 08:51 figo361 阅读(354) 评论(0) 推荐(0) 编辑
摘要: IF dw_1.Update() > 0 THEN dw_1.ResetUpdate() //将窗口的属性设置为初始化 COMMIT USING sqlca; IF sqlca.SQLCode = 0 THEN MessageBox('提示', PARENT.Title + '保存成功!') EL... 阅读全文
posted @ 2015-08-06 08:30 figo361 阅读(211) 评论(0) 推荐(0) 编辑
摘要: String ls_filterDataWindowChild dwc_czrw,dwc_czx//定义子数据窗口变量dw_dy.Settransobject(sqlca)dw_dy.Retrieve()dw_dy.GetChild("dw_2",dwc_czrw)dw_dy.Getchild("d... 阅读全文
posted @ 2015-08-05 11:26 figo361 阅读(205) 评论(0) 推荐(0) 编辑
摘要: SELECT 表名=case when a.colorder=1 then d.name else '' end, 序号=a.colorder, 列名=a.name, 数据类型=b.name, 长度=COLUMNPROPERTY(a.id,a.name,'PRECIS... 阅读全文
posted @ 2015-01-28 17:25 figo361 阅读(160) 评论(0) 推荐(0) 编辑
摘要: Declare @Begindate Date; set @Begindate = getdate()Select cast(Convert(varchar(10),cast(@Begindate as date),112) as int) As Datekey, Year(@Begindate)... 阅读全文
posted @ 2014-09-04 17:18 figo361 阅读(141) 评论(0) 推荐(0) 编辑
摘要: // 过滤只修改的dw_1.SetFilter ("isRowModified()")dw_1.Filter ()//获取ipfunction boolean AnimateWindow ( ulong hwnd, ulong dwtime, ulong dwflags ) library "His... 阅读全文
posted @ 2014-06-03 10:50 figo361 阅读(161) 评论(0) 推荐(0) 编辑
摘要: 1.先备份刚删除的数据库usemasterBACKUPLOGtest2TOdisk='D:\ProgramFiles\test2'WITHNORECOVERY-2)恢复一个误删除之前的完全备份:usemasterRESTOREDATABASEtest2FROMDISK='D:\ProgramFile... 阅读全文
posted @ 2014-05-10 11:20 figo361 阅读(277) 评论(0) 推荐(0) 编辑
摘要: 要想知道某个端口被哪个应用程序占用了,有两种方法:1.Netstat命令1)“运行”中输入cmd2)在命令行中输入netstat -ano,得到端口号对应的PID 阅读全文
posted @ 2014-02-25 15:51 figo361 阅读(172) 评论(0) 推荐(0) 编辑
摘要: 服务器断电、异常关闭以及直接killall命令导致服务终止的情况都可能会被mondodb认为是unclean shutdown,因为unclean shutdown可能会导致数据不一致性或者数据损坏,所以必须要手动修复后才能继续提供服务。mongodb修复unclean shutdown的方式有:1、从journal修复,journal就是类似于Oracle数据库中的redo log,工作机制也是类似的,都是write-ahead的。2、从集群中其他节点的副本中修复。3、如果服务不是运行在集群环境中,也没有启用journal,那必须在再次启动服务时使用--repair或者--repair加上- 阅读全文
posted @ 2014-02-09 14:34 figo361 阅读(1067) 评论(0) 推荐(0) 编辑
摘要: string ls_msgchoose case error.number case 1//by zero ls_msg = "发生被 0 除错误" case 2//2 Null object reference ls_msg = "空对象引用" case 3//3 Array boundary exceeded ls_msg = "数组越界" case 4//4 Enumerated value is out of range for function ls_msg = "枚举值超出函数的范围" case 5// 阅读全文
posted @ 2013-12-02 10:22 figo361 阅读(1163) 评论(0) 推荐(0) 编辑