MS SQL 利用Agent自動執行Stored Procedure

因作業上的需要，需要固定時間自動執行Stored Procedure做資料處理，
此時可利用MS SQL Server內的Agent進行排程作業(Express版不支援)，
1.SQL Server Agent--作業--新增作業
2.一般--名稱--設定作業名稱
3.步驟--新增
3-1.設定步驟名稱
3-2.類型--T-SQL
3-3.資料庫選擇
3-4.可直接在命令欄內輸入執行語法，或使用Exec執行Stored Procedure
4.排程--新增
4-1.設定排程時間
5.通知--可設定失敗時以郵件通知(Database Mail設定)

參考自 使用Sql Agent排程執行Stored Procedure

MS SQL Server Agent設定Database Mail

記錄一下設定Database Mail 較容易疏忽的地方，

於管理設定檔安全性頁面，需將新增設定的Mail Account

1."公用"-開啟

2."預設設定檔"-是

並且需在"操作員"處新增需要發送的帳號，

才可在其他設定"發送郵件通知"時，選擇寄送的收件者。

參考自

SQL Server 無敵手冊第十三篇-設定SQL Server的Database Mail

SQL Server 無敵手冊第十四篇-設定SQL Server Agent使用Database Mail

延伸記錄

如何清除 SQL Server 的 Database Mail 紀錄與發送失敗郵件

如何使用SQLServer的db mail配合procedure發html格式的信

MS SQL 利用Trigger紀錄Table異動資料

針對某些特定Table需要詳細記錄資料變更的歷史資訊，
可以利用Trigger及產生的inserted和deleted 臨時表格做紀錄！
作法可參考下列範例。

--建立測試表格
CREATE TABLE [dbo].[WIPPrd](
    [ProdNo] [varchar](16) NOT NULL,
    [PnameD] [nvarchar](100) NULL,
    [PType] [varchar](4) NULL,
    [InDay] [datetime] NULL,
    [UsrNo] [varchar](10) NULL,
    [UsrCo] [varchar](5) NULL) ON [PRIMARY]

--建立記錄檔
CREATE TABLE [dbo].[WIPPrd_Log](
    [MState] [varchar] (10) NOT NULL,
    [ProdNo] [varchar](16) NOT NULL,
    [PnameD] [nvarchar](100) NULL,
    [PType] [varchar](4) NULL,
    [InDay] [datetime] NULL,
    [UsrNo] [varchar](10) NULL,
    [UsrCo] [varchar](5) NULL )    
--建立TRIGGER-在WIPPrd表格更新、新增、刪除後觸發
CREATE TRIGGER dbo.TR_WIPPrd_Modify on dbo.WIPPrd AFTER UPDATE,INSERT,DELETE
AS
BEGIN   
    --表格異動資料時會產生暫存的inserted和deleted兩個表格
    --兩個表格格式資訊皆與原表格相同
    --inserted紀錄insert資料、update後資料
    --deleted紀錄delete資料、update前資料
   
    --依據異動方式將異動資料新增到記錄檔
    --inserted和deleted皆有資料表示為-UPDATE
    IF EXISTS (select 1 from inserted) and EXISTS (select 1 from deleted)
    BEGIN       
        insert into WIPPrd_Log select 'DELETE',* from deleted
        insert into WIPPrd_Log select 'INSERT',* from inserted
    END
    --inserted有資料deleted無資料表示為-INSERT
    ELSE IF EXISTS (select 1 from inserted) and Not EXISTS (select 1 from deleted)
        insert into WIPPrd_Log select 'INSERT',* from inserted
    --inserted無資料deleted有資料表示為-DELETE
    ELSE IF NOT EXISTS (select 1 from inserted) and EXISTS (select 1 from deleted)
        insert into WIPPrd_Log select 'DELETE',* from deleted

END
--測試
--清空資料 
delete from WIPPrd 
delete from WIPPrd_log
--新增資料
insert into WIPPrd values ('11','TEST_11','11',GETDATE(),'Dean','10001')
insert into WIPPrd values ('22','TEST_22','22',GETDATE(),'Dean','10001')
--更新資料
update WIPPrd set ProdNo='33',PnameD='TEST_33' where ProdNo='22'
--刪除資料
delete from WIPPrd
--查詢記錄檔
select * from WIPPrd_log
------------------------------------------------------------
INSERT    11    TEST_11    11    2012-02-26 14:17:47.750    Dean    10001
INSERT    22    TEST_22    22    2012-02-26 14:17:47.763    Dean    10001
DELETE    22    TEST_22    22    2012-02-26 14:17:47.763    Dean    10001
INSERT    33    TEST_33    22    2012-02-26 14:17:47.763    Dean    10001
DELETE    33    TEST_33    22    2012-02-26 14:17:47.763    Dean    10001
DELETE    11    TEST_11    11    2012-02-26 14:17:47.750    Dean    10001

參考自
~楓花雪岳~[SQL] Trigger - inserted & deleted Table
MSDN-使用 inserted 或 deleted 資料表
CSDN-Trigger中如何獲得更新前的數據

---------------------------------------------------------------------------
延伸閱讀-[MS SQL]-XML資料型態

MS SQL 查詢所有資料庫表格名稱

利用INFORMATION_SCHEMA查詢所有TABLE NAME

SELECT *
FROM INFORMATION_SCHEMA.TABLES 

參考自 MSDN-INFORMATION_SCHEMA

Firefox portable、Chrome 暫存檔設至Ramdisk

Firefox
1.網址輸入 about:config
2.篩選條件 browser.cache.disk.parent_directory
   數值 X:\TEMP(Ramdisk位置)
3.篩選條件 browser.cache.disk.capacity
   數值 512000 (暫存空間大小)

若篩選條件不存在，請自行新增！

參考自 明天的昨天
------------------------------------------------------

Chrome
1.建立執行檔捷徑
2.捷徑上右鍵內容-->分頁"捷徑"
3."目標(T)"欄位內，最後一個"後面空一格
4.填上--disk-cache-dir=X:\TEMP(Ramdisk位置)

參考自 [GC] 如何將Chrome的快取移動到Ramdisk

MS SQL與SQLite語法使用差異

1.Top N

MS SQL  select Top 5 * from Table
SQLite  select * from Table limit 0,5

2.GETDATE()

MS SQL  select GETDATE()
SQLite  select datetime(CURRENT_TIMESTAMP,'localtime')

3.SELECT INTO

MS SQL select * into Table2 from Table
SQLite CREATE TABLE table2 AS  select * from Table

SQLite 相關網站備忘

1.SQLite官網 SQLite
2.ODBC驅動 SQLite ODBC Driver
3.語法文件 SQL As Understood By SQLite
4.DB免費管理工具 SQLiteStudio

Delphi 中SQL Decimal資料型態小數位數進位問題

利用ADOQuery抓取資料，做數值運算時，
若SQL資料庫的資料型態為decimal(18,2)--2表示精準至小數2位，
小數進位方式為五捨六入，並非我們一般使用的四捨五入，
不知是否算為Delphi bug !

如35*1.777= 62.195
Delphi運算結果為62.19
正確應為62.20

var xDSubtot : Double
xDSubtot :=  Query_D.FieldByName('Qty').AsFloat * Query_D.FieldByName('UnitP').AsFloat;
Query_D.FieldByName('SubTot').AsVariant := FloatToStrF(xDSubtot,ffFixed,18,2);

Delphi 7連線SQLite資料庫

最近在研究於Delphi7中利用ODBC連線SQLite DB檔案，
將實做成功方法做個記錄。

先安裝SQLite ODBC Driver

//**在ADO內的ConnectionString直接帶入，不用連線精靈
procedure _SetSQLiteDBConnection;
var OD : TOpenDialog;
    ADOConn : TADOConnection;
    xDatabase : String;
begin
  OD := TOpenDialog.Create(NIL);

  OD.FileName := 'x:\mymoney';//**預設資料庫路徑
  OD.DefaultExt := '*.db';//**預設存檔格式
  OD.Filter := 'DB files (*.db)|*.DB';//**過濾顯示的檔案格式
  if Not OD.Execute then
  begin
    showmessage('選擇資料庫檔案失敗！');
    Abort;
  end;

  xDatabase := ';Database='+OD.FileName;
  ADOConn := TADOConnection.Create(NIL);
  ADOConn.LoginPrompt := False;
  ADOConn.ConnectionString := 'Driver={SQLite3 ODBC Driver}'+xDatabase;

  while Not ADOConn.Connected do
    ADOConn.Open;
end;

參考自 网语飘飘.Net/Delphi攻坚战

MS SQL Stored Procedure 初心者筆記

1.使用Exec執行動態SQL語法，若語法內有產生暫存Table，在執行結束後一併消失，故可以先在外面CREATE暫存表，再於EXEC內使用INSERT INTO

IF (select OBJECT_ID('tempdb..#TTmp')) IS NOT NULL DROP TABLE #TTmp
CREATE TABLE #TTmp (ProdNo varchar(16))
EXEC('INSERT INTO #TTmp select ProdNo from Prod')

2.WHERE IN篩選值不可以變數存放，如@Tmp = '1,2,3'，查詢資料集合不為1,2,3之結果 (解決方法)