原创 批量覈銷
Public Function MainFunction(ByVal sKey As String, oList As Object, ByRef bCancel As Boolean) Dim frmX As New frmVe
2020-05-31 17:28:47
原创 在存儲過程中用ole對象(Scripting.FileSystemObject)讀寫文件
--注意:1.表的字段都改爲字符型！！;2.默認的表名爲gic_comp和gic_secur；3.如果出現截斷的情況，--應該是值的長度和表中定義的長度不一樣。更改表的字段的定義,長度改長就可以.--更改系統配置，允許使用OLE對象sp_
2020-02-22 14:04:54
原创 標識列不連續問題
--自增列通常在以下幾種情況而導致不連續if object_id('tb')is not null drop table tbgocreate table tb(ID int identity(0,1),name varchar(10)
2020-02-22 14:04:54
1
原创 APPLICATION對象應用
Application對象代表整個Microsoft Excel應用程序，帶有175個屬性和52個方法，可以設置整個應用程序的環境或配置應用程序。 ---------------------------------------------
2020-02-22 14:04:54
2
原创 關於登錄名，用戶名，角色，權限的學習筆記
select a.name,a.xtype,b.name,case action when 26 then 'references' when 178 then 'create function' when 193 then 'selec
2020-02-22 14:04:54
原创 Pivot研究
今天學習了SQL2005的PIVOT，PIVOT 關係運算符對錶值表達式進行操作以獲得另一個表。PIVOT 通過將表達式某一列中的唯一值轉換爲輸出中的多個列來轉換表值表達式，並在必要時對最終輸出中所需的任何其餘的列值執行
2020-02-22 14:04:54
原创 sql2005排名函數
--http://www.cnblogs.com/nokiaguy/archive/2009/02/05/1384860.htmlif object_id('[tb]') is not null drop table [tb]go cr
2020-02-22 14:04:54
原创 CTE遞歸
--create table tb(id int,name nvarchar(30),pid int)--insert into tb--select 1,'遼寧省',0 union all--select 2,'瀋陽市',1 union
2020-02-22 14:04:54
原创 treeview 無限分級（c# dataview)
表結構 id name pid 0 root -1 1 tom 0 .... public void ShowTree
2020-02-22 14:04:54
原创 註冊表搜索
HKEY_CURRENT_USER/Software/360SD LibVer REG_SZ (1) 5745751--查找項:360sd D:/>reg query hkcu /f 360sd /k /s HKEY_C
2020-02-22 14:04:54
原创 MORE子命令
More 子命令 以下命令在 more 提示 (-- More --) 下接受。 關鍵字 操作 space 顯示下一頁。 ENTER 顯示下一行。 F 顯示下一個文件。 q 退出。 ? 顯示可用命令。 = 顯示行號。 P n 顯示以下
2020-02-22 14:04:54
原创 vb 中recordset提示對象關閉時不允許操作
vb中執行查詢後，一般要判斷是否爲空，只要執行的查詢執行了select，都可以用rs.eof 或者 rs.recordcount來判斷， 但是，如果執行的sql中加了邏輯判斷，導致沒有執行任何select語句，則用rs.eof 或者rs.
2020-02-22 14:04:54
原创 清除掛馬網址
每個htm文件最後都被加上了<iframe src=http://mm.uu88567.cn/index/mm.htm width=100 height=0></iframe>一下命令用來將其去掉 F:/javascript>for %i
2020-02-22 14:04:54
原创 只用一條語句刪除重複數據--delete另類用法
--在sql2005下可以 ，sql2000不可以 create table tb(id int,name varchar(4))insert tb select 1,'aa'union all select 1,'aa'union
2020-02-22 14:04:54
原创 VBA編程常用語句300句
*************** VBA 語句集 ** (第 1 輯) *************** ***************** 定製模塊行爲 ***************** (1) Option Explicit '強制對
2020-02-22 14:04:54
45