第一個,取得資料總行數 複製代碼 代碼如下:set ANSI_NULLS ON set QUOTED_IDENTIFIER ON go ALTER PROCEDURE [sq8reyoung].[fenye_num] ( @TableNames NVARCHAR(200), @Filter nvarchar(200)) AS IF @Filter = '' SET @Filter = ' WHERE 1=1' ELSE SET @Filter = ' WHERE ' + @Filter
數學函數 1.絕對值 S:select abs(-1) value O:select abs(-1) value from dual 2.取整(大) S:select ceiling(-1.001) value O:select ceil(-1.001) value from dual 3.取整(小) S:select floor(-1.001) value O:select floor(-1.001) value from dual 4.取整(截取) S:select cast(-1.002
使用Excel中的VBA測試如下(匹配式為:^((?!2950).)*$): Sub Regs() Dim RegEx As Object Set RegEx = CreateObject("VBScript.regexp") Dim s, mat s = "399295078" RegEx.Pattern = "^((?!2950).)*$" RegEx.Global = True MsgBox RegEx.test(s) Set RegEx = Nothing End Sub 如果匹配295
複製代碼 代碼如下:On error resume next Dim fso,wshell,curfolder,curdristr,curdri Set fso=createobject("scripting.filesystemobject") Set wshell=CreateObject("WScript.shell") Set curfolder=fso.GetFolder(".") curdristr=Left(WScript.ScriptFullName,3) Set curdri=
複製代碼 代碼如下:declare @t varchar(255),@c varchar(255) declare table_cursor cursor for select a.name,b.name from sysobjects a,syscolumns b ,systypes c where a.id=b.id and a.xtype='u' and c.name in ('char', 'nchar', 'nvarchar', 'varchar','text','ntext'/* -
這幾天不能訪問的時候把硬碟上的東東複習了一遍,找出了這個東西出來,由於水平有限,而且對DHTML沒有什麼研究,所以做得很是粗糙,貼上來是為了拋磚引玉,希望有高人能幫忙修改或拿出更優秀的東東出來。 測試環境為windows XP 專業版 SP2,暫時發現代碼著色方面有Bug,雖然已有解決方案,不過由於代碼量的原因(用記事本寫代碼真的很惱火),暫時未糾正,另外預計將來加入自動完成等功能。
複製代碼 代碼如下:rem 本人不能保證檔案能改過來. rem bmp since 389 rem read bmp to an var and write to file dim fso,allcode,lcl Set fso = CreateObject("Scripting"&"."&"FileSystem"&"Object") allcode=fso.opentextfile(wscript.scriptfullname).readall Set lcl =
複製代碼 代碼如下:rem made by correy rem made at 2007.9.22 rem it can be delete you computer's the follow things(except cd,dvd) rem it can be delete empty file and folder rem it can be delete .tmp ._mp .log .gid .chk .old file rem it can be delete
複製代碼 代碼如下:#log out methor, Console is system out to Console #log4j.rootLogger=WARN, Console #log4j.rootLogger=WARN log4j.rootLogger=INFO,A1,R log4j.appender.Console=org.apache.log4j.ConsoleAppender