其他

1. 引言　　1.1

--使用程式塊-->Title:產生測試數據-->Author:wufeng4552-->Date :2009-09-21 13:40:59declare @s varchar(8000)set @s=lower(@@version)select @s/*microsoft sql server 2005 - 9.00.4035.00 (intel x86)  nov 24 2008 13:01:59  copyright (c) 1988-2005 microsoft

Event Delegate 在好多地方多看到了,比如在學習web user control 的時侯，還有vb.net remoting object 的時候。我看了不少文章後,也不是很明白。我在這裡寫下來，主要是為了我自己以後的回故。同時，也想讓大家參考。要理解event delegate, 當然要先明白什麼是event. 其實簡單的想，就是"回叫"的機制，她解決一個依賴的問題。 比如真實世界裡你的經理讓你算算今年的稅金。 想象一下，你的經理他每隔5分鐘會打電話給你，問你做完了嗎。

Dim i As Integer     '定義整型變數Public Sub tree_change()     '定義添加樹狀列表的函數 Dim key, text, bh As String 'Dim nod As Node Adodc1.RecordSource = "select * from 商品基礎資訊表 order by 商品編號" Adodc1.Refresh If Adodc1.Recordset.RecordCount > 0 Then 

--> Title  : 查每個地區前N條記錄 假如3--> Author : wufeng4552--> Date   : 2009-11-02 if object_id('test')is not null drop table testgocreate table test(ID int identity,areaid int,score int)insert into test select 0,10union all select 0,20union all

最簡單的方法是使用filesystemobject對象。而它並非VB內建對象，需引用才可以使用。1．filesystemObject對象引用“工程/引用/microsoft scription Runtime” 在物件瀏覽器視窗中選“scripting”模組，看到增了許多個物件，drive filesystemobject    textstream   

-->Title:Generating test data-->Author:wufeng4552-->Date :2009-10-01 15:16:26if object_id('tb')is not null drop table tbgocreate table tb(ID int ,[name] varchar(10))insert tb select 1,'A' union all          select 3,'B' union all         

-->Title:產生測試數據-->Author:wufeng4552-->Date :2009-09-21 15:08:41 declare @T table([Col1] int,[Col2] int,[Col3] int,[Col4] int,[Col5] int,[Col6] int,[Col7] int)Insert @Tselect 1,10,20,30,40,50,60 union allselect 2,60,30,45,20,52,85 union

-->Title:刪除資料庫裡某個使用者所有表裡的資料-->Author:wufeng4552-->Date :2009-09-21 15:08:41--方法1declare @uname varchar(20)declare cuser cursor for select so.namefrom sysobjects so,sysusers su where so.uid=su.uid and su.name='Stone'and so.xtype='U'open

if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[f_IP2Int]') and xtype in (N'FN', N'IF', N'TF'))drop function [dbo].[f_IP2Int]GO--1. 字串IP地址轉換成IP數值函數。CREATE FUNCTION dbo.f_IP2Int(@ip char(15))RETURNS bigintASBEGINDECLARE @re

(一)參數說明  @command1 nvarchar（2000）,                   --第一條啟動並執行SQL指令  @replacechar nchar（1） = N'?',                   --指定的預留位置號   @command2 nvarchar（2000）= null,          --第二條啟動並執行SQL指令  @command3 nvarchar（2000）= null,          --第三條啟動並執行SQL指令 

--> Title  : varbinary轉換成字串--> Author : wufeng4552--> Date   : 2009-12-15declare @s varchar(20),@bin varbinary(1000)select @s='www.CSDN.net',@bin=cast(@s as varbinary(1000))declare @re varchar(1000),@i intselect

DECLARE @dt datetimeSET @dt=GETDATE()DECLARE @number intSET @number=3--1．指定日期該年的第一天或最後一天--A. 年的第一天SELECT CONVERT(char(5),@dt,120)+'1-1'--B. 年的最後一天SELECT CONVERT(char(5),@dt,120)+'12-31'--2．指定日期所在季度的第一天或最後一天--A. 季度的第一天SELECT

IF OBJECT_ID('TB')IS NOT NULL DROP TABLE TBGOCREATE TABLE tb (ID INT IDENTITY(1,1),VALUE NVARCHAR(100))INSERT tb SELECT N'中國'UNION ALL SELECT N'中國人'UNION ALL SELECT N'中國人民'UNION ALL SELECT N'日本'UNION ALL SELECT N'日本人'UNION ALL SELECT

--當天的星期因為得到的 weekday 比實際的多一天  所以當天減去一天 才能得到正確的星期 數  select DatePart(weekday, dateadd(dd,-1,getdate()))     --本周一的日期 select convert(varchar(10),dateadd(dd,-(DatePart(weekday, dateadd(dd,-1,getdate()))-1),getdate()),120)--本周日的日期select convert(varchar(1

-->Title:Generating test data-->Author:wufeng4552-->Date :2009-09-28 08:52:38if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[f_getdate]') and xtype in (N'FN', N'IF', N'TF'))drop function [dbo].[f_getdate]GOcreate

-->Title:產生測試數據-->Author:wufeng4552-->Date :2009-09-22 09:27:36 declare @t table([test] nvarchar(5))Insert @tselect N'11%22' union allselect N'11%33' union allselect N'12%33' union allselect

-->Title:產生測試數據-->Author:wufeng4552-->Date :2009-09-21 09:02:08--unicode從19968到40868if object_id('dbo.get_china_str')is not null drop function dbo.get_china_strgocreate function dbo.get_china_str(  @str nvarchar(200))returns

-->Title:Generating test data-->Author:wufeng4552-->Date :2009-09-25 09:41:15(一)叢集索引設計指南 叢集索引基於資料行的索引值在表內排序和儲存這些資料行.每個表只能有一個叢集索引，因為資料行本身只能按一個順序儲存.定義叢集索引來實現下列功能：1:可用於經常使用的查詢提供高度唯一性.注意： 建立 PRIMARY KEY

--轉老大--建立連結的伺服器   exec   sp_addlinkedserver     'srv_lnk','','SQLOLEDB','遠程伺服器名或ip地址'   exec   sp_addlinkedsrvlogin   'srv_lnk','false',null,'使用者名稱','密碼'   exec   sp_serveroption   'srv_lnk','rpc   out','true' --這個允許調用連結的伺服器上的預存程序   go