找找看...

2010年9月29日 星期三

20100928 小妏的第一個教師節

小妏人生第一個教師節
我事先就有想到要買花送給老師
剛好ccy問我要送啥

結果問了佳華和菊 一些過來人的經驗
結論是

孩子還小 要送。老師才會較關注小孩。
連絡簿要多寫,多和老師互動。

送什麼也是一門學問
算了
我還是照原定計畫帶小妏去買花 她說 有5個老師 姚老師、趙老師、小妮老師、小妮老師、小妮老師

怎麼有3個小妮老師?
不管了 就買3小束
讓她去做一下公關囉~~^^

尊師重道從小做起!

by the way
小妏會自己換上衣了耶
佑佑也學姐姐自己換了褲子
不錯不錯!

佑佑8月就完全戒尿布了
會在馬桶上嗯嗯囉~~

20100922 中秋節幫婆慶生

中秋前夕
幫婆過生日
本來公公說要上館子的
但公公最近身體不太好 胃不舒服 只能吃稀飯、麵等 食物
所以就在家過

週二下班前 我去向陽房買了一個芋頭蛋糕 老公很愛
(連趕著週末就做了芋頭的饅頭了)

我還請媽幫我買了豬腳

於是我魯了 沙士豬腳
超贊的

還煮了麵線
good

婆很高興
晚上就跑去媽咪家烤肉囉

今天寶貝們很捧場
吃了很多牛肉

還請二阿姨和三阿姨帶去看煙火和布袋戲

2010年9月23日 星期四

asp導出EXCEL格式資料

asp導出EXCEL格式資料
[ 2007/4/10 下午 10:03:00 | By: ㄚ風 ]

Set xlApplication = Server.CreateObject("Excel.Application") '調用excel物件
xlApplication.Visible = False '無需打開excel
xlApplication.SheetsInNewWorkbook=1 '指定excel中表的數量
xlApplication.Workbooks.Add '添加工作簿
Set xlWorksheet = xlApplication.Worksheets(1) '生成第1個工作表的子物件
xlWorksheet.name="統計" '指定工作表名稱
'指定列的寬度以及對齊方式
xlApplication.ActiveSheet.Columns(1).ColumnWidth=5
xlApplication.ActiveSheet.Columns(1).HorizontalAlignment=3
xlApplication.ActiveSheet.Columns(2).ColumnWidth=40
xlApplication.ActiveSheet.Columns(2).HorizontalAlignment=1
xlApplication.ActiveSheet.Columns(3).ColumnWidth=5
xlApplication.ActiveSheet.Columns(3).HorizontalAlignment=3
xlApplication.ActiveSheet.Columns(4).ColumnWidth=15
xlApplication.ActiveSheet.Columns(4).HorizontalAlignment=1
xlApplication.ActiveSheet.Columns(5).ColumnWidth=12
xlApplication.ActiveSheet.Columns(5).HorizontalAlignment=1
xlApplication.ActiveSheet.Columns(6).ColumnWidth=12
xlApplication.ActiveSheet.Columns(6).HorizontalAlignment=3
'xlApplication.ActiveSheet.Rows(i).RowHeight = 30'行的高度
'指定列的高度以及特定列
xlWorksheet.Range(xlWorksheet.Cells(1,1), xlWorksheet.Cells(1,6)).MergeCells =True '合併列
xlWorksheet.Range("A1").value="/oblog4/2005年統計"
xlWorksheet.Range("A1").font.Size=14'字體大小
xlWorksheet.Range("A1").font.bold=true'粗體
xlWorksheet.Range("A1").HorizontalAlignment=3'水準對齊
xlWorksheet.Range("A1").VerticalAlignment=3"垂直對齊

xlWorksheet.Cells(2,1).Value = "序號"
xlWorksheet.Cells(2,2).Value = "標題"
xlWorksheet.Cells(2,3).Value = "圖"
xlWorksheet.Cells(2,4).Value = "部門"
xlWorksheet.Cells(2,5).Value = "作者"
xlWorksheet.Cells(2,6).Value = "時間"

xlWorksheet.Range("A2:F2").Borders.LineStyle=1

'--------------------------------------------------自己可做迴圈i=i+1(資料庫資料)
'xlWorksheet.Cells(2+i,1).Value = i
'xlWorksheet.Cells(2+i,2).Value = topic
'xlWorksheet.Cells(2+i,3).Value = img_str
'xlWorksheet.Cells(2+i,4).Value = nfrom
'xlWorksheet.Cells(2+i,5).Value = writer
'xlWorksheet.Cells(2+i,6).Value = ntime
'--------------------------------------------------
Set fs = CreateObject("Scripting.FileSystemObject")
tfile=Server.MapPath("test.xls")
if fs.FileExists(tfile) then
Set f = fs.GetFile(tfile)
f.delete true
Set f = nothing
end if
Set fs = nothing
xlWorksheet.SaveAs tfile '保存檔
xlApplication.Quit '釋放對象
Set xlWorksheet = Nothing
Set xlApplication = Nothing


downfile.asp


Function downLoadFile(FileSpec)
on error resume next
Const ForReading=1
Const TristateTrue=-1
Const FILE_TRANSFER_SIZE=1024 '16384
Dim objFileSystem, objFile, objStream
Dim char
Dim sent
Set objFileSystem = CreateObject("Scripting.FileSystemObject")
If objFileSystem.FileExists(fileSpec)=false Then
response.write("")
Exit Function
End If
FileName = objFileSystem.GetFileName(FileSpec)
send=0
TransferFile = True
Set objFileSystem = Server.CreateObject("Scripting.FileSystemObject")
Set objFile = objFileSystem.GetFile(FileSpec)
Set objStream = objFile.OpenAsTextStream(ForReading, TristateTrue)
Response.AddHeader "content-type", "application/octet-stream"
Response.AddHeader "Content-Disposition","attachment;filename=" & filename

Response.AddHeader "content-length", objFile.Size
Do While Not objStream.AtEndOfStream
char = objStream.Read(1)
Response.BinaryWrite(char)
sent = sent + 1
If (sent MOD FILE_TRANSFER_SIZE) = 0 Then
Response.Flush
If Not Response.IsClientConnected Then
TransferFile = False
Exit Do
End If
End If
Loop
Response.Flush
If Not Response.IsClientConnected Then TransferFile = False
objStream.Close
Set objStream = Nothing
Set objFileSystem = Nothing
End Function
fileSpec =Lcase(Cstr(Trim(Request("fileSpec"))))
downLoadFile(fileSpec)






reference:http://163.21.20.125/oblog4/u/fong/680.html

2010年9月19日 星期日

20100920 耍寶二人組

1.昨天從婆家要回家 經過烤肉
佑說 要買烤肉嗎

原來爸比會帶他去買烤肉

2.小妏會拿著我的睡衣外套 演公主
前幾天 在幫姐弄刷牙
佑也拿著我的睡衣外套披在身上當裙子
"姐姐 我也是你的公主..."

2010年9月14日 星期二

20100915 小妏上學不哭了

上學第四週,
之前休一週腸病毒,結果才又去一週就腸胃炎 ,先吐了二天,後來拉了3天,到現在還沒好
所以週一休了一天

昨天他一早起來又在哭,我不要去上學,我想去阿公阿嬤家
我整個人發火,
哭了一個早上
我帶去二話不說叫他自己下車
愛心媽媽帶進去

結果他今天也跟我說,媽媽我去學校再也不會哭了,有人來開門,我就會下車
(之前佑佑還會叫姐姐上學不要哭哭...哩)

果然,是真的。
她沒哭了。二天了。加油寶貝。

瘦了,剩下17.5kg,才四週就瘦了2kg @@

20100915 佑佑會坐馬桶嗯嗯了

佑佑在8月底的時候
剛好尿布用完
姐姐又腸病毒,迪迪在奶奶家隔離

剛好訓練坐馬桶嗯嗯

他會尿尿,已經很久不穿尿布
但是,不肯坐馬桶

這次的機會 總算訓練起來了
2y6m 差不多 和姐姐一樣
都2歲半就藉尿布了
good !!

最近有變胖 14.6kg

2010年9月13日 星期一

20100911 虎尾毛巾工廠+交趾剪黏藝術村

10點在西螺休息站集合

並前往毛巾工廠
雲林縣虎尾鎮埒內里 84-1號

中午 用餐
米多力休閒農莊
雲林縣 虎尾鎮 文科路880號

吃完休息一下就可出發前往
交趾剪黏藝術村
[走中山高下嘉義交流道後,有2個出口(往嘉義和往新港),請沿159線(北港路)往北港方向,過新港遇高鐵高架橋(159.164線3公里處),駛過高架橋約10公尺,右轉一條小道路就可在右方看到舊鐵道,直行(其實是斜行)即可抵達。]

一天的行程結束!!
準備吃晚餐

---------------
佑佑不肯離開毛巾工廠
一直想在裡面玩
可能買得不過隱
他本來拿了五個,我說只能買一個,他乖乖拿去放
可是姐姐買了三個,他可能不平衡吧...
所以不肯走,一直哭

中午吃飯的地方挺適合小朋友的
有一個包廂
小朋友則在外面玩搖搖馬 溜滑梯
開心的哩

後來去虎尾糖廠吃冰
二個寶貝和我們分食吃巧克力冰淇淋
佑佑本來不敢吃,看我們吃得很開心,他也試著拿走來吃
又到旁邊的公園坐<台北到高雄>的小火車

最後到交趾剪黏藝術村
有看到人在貼陶
挺有趣的地方
很可愛
迪迪抓魚也很cute
還被路人說,迪迪你要抓乎溜嗎~
呵~~

玩得很開心

2010年9月9日 星期四

20100909 使用 DBCC LOG 來檢視交易記錄檔內容

建議使用 DBCC LOG 來檢視交易記錄檔內容。

DBCC LOG:
This command is used to view the transaction log for the specified database.

Syntax:
DBCC log ({dbid|dbname}, [, type={-1|0|1|2|3|4}])

where:

dbid or dbname - Enter either the dbid or the name of the database

type - is the type of output, and includes these options:
0 - minimum information (operation, context, transaction id)
1 - more information (plus flags, tags, row length, description)
2 - very detailed information (plus object name, index name, page id, slot id)
3 - full information about each operation
4 - full information about each operation plus hexadecimal dump of the current transaction log's row.
-1 - full information about each operation plus hexadecimal dump of the current transaction log's row, plus Checkpoint Begin, DB Version, Max XDESID
by default, type = 0

To view the transaction log for the master database, run the following command:
DBCC log (master)

reference:http://social.msdn.microsoft.com/Forums/zh-TW/240/thread/61beefd4-03ff-44c8-a685-8b6de580cc4b

2010年9月8日 星期三

20100909 SQLSERVER 的記憶體

SQL Server 2005 記憶體未免吃太多了吧
2008/3/18 19:35| 閱讀數 : 3257 | 我要推薦 | 2 Comments | 文章分類: SQLServer 軟體教學 | 訂閱

1. 打開 Microsoft SQL Server Management Studio,選擇你的連線點擊右鍵,按下【屬性】-> 進入 記憶體 頁面

2. 最大伺服器記憶體 (以 MB 為單位):請依照需求設定吧,如果是本基測試開發用途 256 or 512 MB 即可。若為伺服器用途,起碼要 1G 以上。

預設值是 2147483647 MB ,夠嚇人了吧!如果沒有加以限制,買再多記憶體都會被吃光光!

reference:http://www.dotblogs.com.tw/chhuang/archive/2008/03/18/1826.aspx

2010年9月7日 星期二

20100907 小妏上學不哭了

上了二週
因腸病毒休了一週
昨天回復上課
狂哭

今天在路上就一直耳提面命不要哭 不要哭
到了學校門口,我說小妏有警察耶
你看~
後來帶到教室真的乖乖的
不知道是不是怕被警察抓走

不過要走時小妏跟我byebye時 我看到她臉上的恐懼....和不安

沒辦法..總是要學著獨立...

2010年9月6日 星期一

20100904 佑佑長肉肉

這個月 佑佑長肉肉囉

因為抱起來覺得有點份量
昨晚請他量
果然 14.6
總算有長肉肉了

6月份腸病毒時瘦到12.8@@

有天我喊他,帥哥
佑說,我不是帥哥,我是奬獎,叫我奬奬嘛

20100903 咖啡+蕃薯葡萄乾 饅頭

這是這三次做饅頭了
愈來愈成功了

公公給我們的蒸龍 很方便好用
老公提前於星期四就做好老麵

果然很成功
跟一般手工饅頭一樣又香又軟
就算冷掉也不會覺得硬

第一次 做的是黑糖口味
第二次 做的是芋頭 和 巧克力+夾心
第三次 做的是咖啡 和 蕃薯葡萄乾

咖啡味道不夠,因為我只加了一包伯朗咖啡 也忘了加糖 以致不夠甜
蕃薯的呈現漂亮的黃色 也忘了加糖 不過在捲好後 我有切開加上葡萄乾 還好有 葡萄乾的甜味
上次的芋頭 雖然我切得很小了 不過 還是要蒸稍微久一點 才會熟
巧克力有甜 小妏會吃 佑佑一口都不吃呢

我跟小b講
我們好像退休後的日子
閒情逸致...
呵........

20100906 小妏腸病毒好了

休了一週
小妏好多了
今天帶去上學
哭到一個不行

看別的小朋友都快適應了,希望小妏也快快適應。

這小孩精得很
一早我開郵局的巷子,就問我說,媽咪你要帶我去哪裡,這裡是去爺爺奶奶家的路
我說要去上學,小妏說上學是走去阿公阿嬤家的路....

這麼小會認路了

最近的她很愛撒嬌
一直說我愛你媽咪
一直跟我說我最喜歡你了
很愛學習 睡前都要教他們
他的學習力比較強
迪迪都在混...跟著姐姐講
到現在1~5的數字都不認得哩 @@

小妏去上學二週就瘦了1公斤
現在剩17.7了......