2013年7月5日 星期五

設定相容性

在Web.Config內設定
<configuration>
     <system.webserver>
          < httpprotocol >
               <customheaders>
                    <clear>
 <add name="X-UA-Compatible" value="IE=EmulateIE7" />
                                             </clear>
               </customheaders>
           </httpprotocol>
     </system.webserver>
</configuration>

2013年6月13日 星期四

SQL多筆資料串成一個字串(欄位)


Select
A.memoYear
,
(
Select '註' + Convert(varchar, memoAliasNo) +':' +Memo +char(13)
From ficEntrustMemo B
Where B.memoYear=A.memoYear --And B.memoNo = A.memoNo
for xml path('')
) as Memo
From ficEntrustMemo A
Group By memoYear

2013年3月26日 星期二

SQL Server 取客戶端IP


2008
select CONNECTIONPROPERTY ('client_net_address') as client_net_address;

2005
select client_net_address from sys.dm_exec_connections
where session_id = @@SPID;

2000....沒有
這個不曉得是不是 client 的 mac
select distinct net_address from sysprocesses where spid=@@spid;

網站收集


Loading 畫面
http://www.ajaxload.info/

免費網頁版型
http://www.oswd.org/



2012年12月20日 星期四

將email寄出的內容改存到硬碟上

在Web.Config檔案中設定 在Net 4.0 可能會出錯 因此要修改smtp設定值

2012年12月6日 星期四

怎麼select出欄位中包含底線的資料

語法如下 AND d.name LIKE '%_Log' ESCAPE '_'

2012年11月23日 星期五

SQL 群組資料加流水號,並取群組最新一筆資料

SELECT * FROM ( SELECT {欄位名稱} , ROW_NUMBER() Over (Partition By {關鍵欄位,不含排序欄位(要取最新資料的條件欄位)} Order By {要取最新資料的條件欄位} Desc) As SortNo FROM {資料表名稱} )DS WHERE sortNo =1 ORDER BY bpci.empCode, bpci.payItemNO

2012年5月1日 星期二

SQL日期格式化

DECLARE @MyDate AS DATETIME SET @MyDate='2013/12/29 14:31:45'
語法:CONVERT(varchar(20), @MyDate, 101) 輸出格式:12/29/2013
語法:CONVERT(varchar(20), @MyDate, 102) 輸出格式:2013.12.29
語法:CONVERT(varchar(20), @MyDate, 103) 輸出格式:29/12/2013
語法:CONVERT(varchar(20), @MyDate, 104) 輸出格式:29.12.2013
語法:CONVERT(varchar(20), @MyDate, 105) 輸出格式:29-12-2013
語法:CONVERT(varchar(20), @MyDate, 106) 輸出格式:29 12 2013
語法:CONVERT(varchar(20), @MyDate, 107) 輸出格式:12 29, 2013
語法:CONVERT(varchar(20), @MyDate, 108) 輸出格式:14:31:45
語法:CONVERT(varchar(20), @MyDate, 109) 輸出格式:12 29 2013 2:31:45:
語法:CONVERT(varchar(20), @MyDate, 11) 輸出格式:13/12/29
語法:CONVERT(varchar(20), @MyDate, 110) 輸出格式:12-29-2013
語法:CONVERT(varchar(20), @MyDate, 111) 輸出格式:2013/12/29
語法:CONVERT(varchar(20), @MyDate, 112) 輸出格式:20131229
語法:CONVERT(varchar(20), @MyDate, 113) 輸出格式:29 12 2013 14:31:45:
語法:CONVERT(varchar(20), @MyDate, 114) 輸出格式:14:31:45:000
語法:CONVERT(varchar(20), @MyDate, 12) 輸出格式:131229
語法:CONVERT(varchar(20), @MyDate, 120) 輸出格式:2013-12-29 14:31:45
語法:CONVERT(varchar(20), @MyDate, 2) 輸出格式:13.12.29
語法:CONVERT(varchar(20), @MyDate, 20) 輸出格式:2013-12-29 14:31:45

2012年2月14日 星期二

取得Assembly路徑

Dim strAppDir As String = Path.GetDirectoryName( _
Assembly.GetExecutingAssembly().GetName().CodeBase)
Dim strFullPathToMyFile As String = Path.Combine(strAppDir, "myFileName.txt")

MessageBox.Show(String.Format("Path to the application is: '{0}'." + _
"Full path to the file in the application folder is: '{1}'", _
strAppDir, strFullPathToMyFile))





ref:http://msdn2.microsoft.com/zh-tw/library/ms229654.aspx

2012年1月13日 星期五

在 Windows 7 使用快捷列(Quick Launch)

1.在底下工作列按右鍵,新增工具列
2.%appdata%\Microsoft\Internet Explorer\Quick Launch

2011年11月4日 星期五

顯示一個日期並使用中文的星期格式

VB語法

西元日期 & "("& WeekdayName(DatePart(DateInterval.Weekday,西元日期)) &")"

如此顯示出來的就是如同 2006/2/22 (星期二) 的中文格式了。

在 WeekdayName 函式中原本有第二個 Optional 的參數 Abbreviate,如果你設定為 True,那麼它將以簡短格式出現(例如 Tuesday 變成 Tue)。不過實作之後,發現在中文版裡面並不起作用,所以不管你將這個參數設定為 True 或 False,它都一律是「星期二」的格式,而不會變成「二」。

==========================================================
C# 語法

匯入 Microsoft.VisualBasic 命名空間


using Microsoft.VisualBasic;

string wDay = DateAndTime.WeekdayName((int)startDay.DayOfWeek, true, Microsoft.VisualBasic.FirstDayOfWeek.Monday);

值得注意的是, 似乎必須將 FirstDayOfWeek 指定為 Monday 而不是你可能以為的 Sunday。中間那個參數設定為 true 或 false 並不影響結果。還有, 在 VB 中你可以不需要輸入後面那兩個 Optional 參數, 但在 C# 它並不允許, 所以請乖乖的把字打進去吧!

TransactionScope timeout問題

System.Transactions預設值為一分鐘,如果會造成TimeOut

解決方法如下

方法一:在machine.config中設定
在C:\Windows\Microsoft.NET\Framework\framework版本\Config 加入
<system.transactions>
<machineSettings maxTimeout="01:30:00" />
</system.transactions>

方法二:在Web.config中設定
<configuration>
<system.transactions>
<defaultSettings timeout="00:05:00" />
</system.transactions>
</configuration>

方法三:用程式指定
Dim ts As New System.Transactions.TransactionScope(TransactionScopeOption.Required, New System.TimeSpan(0, 5, 0))

2011年10月26日 星期三

讀取Class 的property

Dim MyObj As New ClassLibrary1.TableColName
For Each p As System.Reflection.PropertyInfo In MyObj.GetType().GetProperties()
If p.CanRead Then
Response.Write("名稱=" & p.Name & "; 傳回值=" & p.GetValue(MyObj, Nothing) & "
")
End If
Next

2011年6月12日 星期日

做人必須保留的7張底牌(轉)

做人必須保留的7張底牌(轉)
第1張底牌­:忍——有容方為大,忍者無敵­
1.忍是一種做人的大智慧­
2.忍耐並非軟弱­
3.負重忍辱,厚積而薄發­
4.骨氣不能無,傲氣不能有­
5.“利”字面前,三忍而後行­
6.遇強示弱,消災避難­
7.好漢不吃眼前虧,惹不起躲得起­
8.爭狠鬥惡匹夫勇,理讓三分也無妨­
9.與小人相處要講究策略­
10.小不忍則亂大謀­
11.在人屋簷下,該低頭時要低頭­
12.經得起“寒冰床”,練得成真功夫­
13.表面上吃虧,暗地裏得利­
­
第2張底牌­:藏——藏鋒藏巧,勝者總是笑到最後­
1.真人不露相,做人不能太單純­
2.抱頭藏尾,待機而動­
3.鋒芒畢露,必會四處碰壁­
4.隱而不發,讓對手捉摸不透深淺­
5.任何時候都別把軟肋露出來­
6.將大智寓於“大愚”之中­
7.外斂內修,不當出頭時莫出頭­
8.藏與露,關鍵在於“度”­
9.緊要關頭用好障眼法­
10.關係再好,也不可全拋一片心­
­
第3張底牌­:防——強者都是“漏洞”最少的人­
1.人心隔肚皮,知人知面難知心­
2.明槍易躲,暗箭難防­
3.凡事多長兩個“心眼兒”­
4.任何時候都不要掉以輕心­
5.鮮豔玫瑰刺更多­
6.最放心的地方最易失防­
7.得意不忘形,失意不失態­
8.小心踩著老虎尾巴­
9.溫柔之鄉常常是英雄塚­
10.未雨綢繆,貴在早­
­
第4張底牌­:穩——穩紮穩打,不走彎路便是捷徑­
1.沉得住氣方能幹大事­
2.心急吃不了熱豆腐­
3.做人最忌在順境中倒下­
4.慌亂只會自亂陣腳­
5.姜太公釣魚的智慧­
6.要有兵臨城下穩坐中軍帳的心智­
7.急躁冒進會把局勢弄得更糟­
8.把握住一時,贏得了一世­
9.臨危不懼,方能泰然處之­
10.以不變應萬變,萬變不離其宗­
11.既要雷厲風行,又要有條不紊­
12.沉穩源于自信­
13.有實力才能心神合一­
14.遠離浮躁­
­
第5張底牌­:變——變則通,通則久,求變就是贏­
1.世事多變,人亦應靈活多變­
2.因勢利導,擇勢而為­
3.被動與主動常常近在咫尺之間­
4.只要功夫到,阻力也能變為助力­
5.化敵為友是“變”的最高境界­
6.變壓力為動力是人生必修課­
7.識時務貴在適時而變­
8.靈活變通方顯大智大勇­
9.最要緊的是把握住火候­
10.“一根筋”只會撞得頭破血流­
11.不要在一棵樹上吊死­
12.變通的智慧莫過於善於“慎獨”­
13.及時調整,才能搶得先機­
14.打破常規便是創新­
15.窮則變,變則通,通則久­
­
第6張底牌­:牽——暗中牽制勝過明面的強制­
1.迎合對方的心,牽制對方的身­
2.孫悟空跑不出如來佛的手掌心­
3.讓對方進入你設的局­
4.牽鼻子勝過拽胳膊­
5.做一隻智勇雙全的頭狼­
6.欲取之,先造勢­
7.抓住關鍵點,牽制其全身­
8.掌握對方的把柄再做文章­
9.鎖定對方的弱點用力­
10.因勢利導,讓對方順著你的思路走­
11.學點八卦推手,在順勢中反戈­
12.善借力,蚍蜉也能撼大樹­
13.投其所好,請君入甕­
­
第7張底牌­:退——勝敗無常,給自己留後路就是留希望­
1.不要輕易拿出看家的本領­
2.像貓一樣防備老虎­
3.做人做事不可做得太絕­
4.啥時候都不可把話說死­
5.不要爭論,說話切莫太硬­
6.世事多變,該回頭時且回頭­
7.退路上照樣能滿載而歸­
8.做人最忌太勢利­
9.得理且饒人,讓人三分又何妨­
10.山大王也有虎落平陽時­
11.晴天留人情,雨天好借傘­
12.兔子急了也咬人,不要把對手逼上絕路­
13.進攻時切記先預留退路­
14.培養幾個死心塌地的擋箭牌

2011年6月9日 星期四

使用這可以在已存在的usercontrol ,在設計模式下拉入其他的usercontrol

如果要自訂一個usercontrol
而且讓使用者在設計階段時可以把其它vb 內定的control
拖拉並放入這一個自訂的usercontrol該如何實現

_
Public Class UserControl1
Inherits System.Windows.Forms.UserControl

...

End Class

2011年6月1日 星期三

SQL 分頁

假設Northwind有一個Customer的Table,你需要取回41~50筆的記錄,T-SQL語法該如何作呢?
方法一:
Select Top 10 CustomerID,CompanyName,ContactName,Country from Customers where CustomerID Not in
(Select top 40 CustomerID from Customers order by Country,CustomerID)
Order by Country,CustomerID

方法二:
Store Procedure:
出自MSDN Magazine,是別人的智慧
CREATE PROCEDURE northwind_OrdersPaged
(
@PageIndex int,
@PageSize int
)
AS
BEGIN
DECLARE @PageLowerBound int
DECLARE @PageUpperBound int
DECLARE @RowsToReturn int

-- First set the rowcount
SET @RowsToReturn = @PageSize * (@PageIndex + 1)
SET ROWCOUNT @RowsToReturn

-- Set the page bounds
SET @PageLowerBound = @PageSize * @PageIndex
SET @PageUpperBound = @PageLowerBound + @PageSize + 1

-- Create a temp table to store the select results
CREATE TABLE #PageIndex
(
IndexId int IDENTITY (1, 1) NOT NULL,
OrderID int
)

-- Insert into the temp table
INSERT INTO #PageIndex (OrderID)
SELECT
OrderID
FROM
Orders
ORDER BY
OrderID DESC

-- Return total count
SELECT COUNT(OrderID) FROM Orders

-- Return paged results
SELECT
O.*
FROM
Orders O,
#PageIndex PageIndex
WHERE
O.OrderID = PageIndex.OrderID AND
PageIndex.IndexID > @PageLowerBound AND
PageIndex.IndexID < @PageUpperBound
ORDER BY
PageIndex.IndexID

END

2011年5月31日 星期二

5分錢硬幣與3萬元花瓶

一天,她正在廚房裡做飯,忽然聽見從客廳裏傳來4歲兒子恐慌的聲音:
“媽媽!媽媽快來呀!”

她一聽,不知道出了什麼事,趕快跑到了客廳,發現原來兒子的手卡在一個花瓶中出不來了,因此痛得哇哇直叫。她想幫兒子將手從花瓶中拉出來,可試來試去就是不行。看著兒子臉上掛滿了淚水,她急壞了,於是找來一個錘子,小心翼翼地花瓶敲破了。

費了很大的勁,兒子的手終於出來了。這時她看到兒子的小手緊緊握成了一個拳頭,怎麼也不鬆開。她嚇壞了,難道是孩子的手在花瓶裏卡得太久變了形?等她將兒子的拳頭小心地掰開了,這才徹底鬆了口氣:孩子的手沒事,他的小手心裏緊緊握著的,是一枚5分錢硬幣。

她哭笑不得,因為剛剛被她敲碎的,是一個價值3萬元的古董花瓶。原來,淘氣的兒子不小心將幾枚硬幣扔進了花瓶,他想把硬幣取出來,可由於緊緊握住硬幣的拳頭大過了瓶口,於是就怎麼也出不來了。

她不由問兒子:“你怎麼不把手鬆開,放下硬幣呢?那樣的你的手就可以出來了,媽媽也就不必打爛這個花瓶啊!”

兒子的回答卻是:“媽媽,花瓶那麼深,我怕一放手,它就跑掉了啊!”

為一枚5分錢的硬幣,砸爛了一個價值3萬元的花瓶,這個故事聽上去未免太可笑了。但笑過之後,大家一致認為:雖然故事發生在一個4歲孩子身上,但這種現象在成人身上也普遍存在——

很多人尤其是一些職場中的人,正是由於將手中的東西抓得太緊,最後導致了因小失大,甚至導致了悲劇的產生。當然,他們手中緊抓的“硬幣”,並不是5分錢,而是其他很多在他們看來十分重要的東西,如:成就、權力、利益、面子、學識……

他們之所以緊抓這些“硬幣”不願鬆手,有兩大原因:
第一,已經擁有了,就認為是自己的東西,就要死死抓住。
第二,生怕鬆開手,這些東西就再也沒有了,所以恐懼。

我們覺得孩子緊抓5分錢不放,最後導致3萬元的花瓶被打碎很好笑,也覺得很惋惜,但我們是否也想過:此時此刻,自己是否也抓著一枚或者幾枚硬幣捨不得丟棄,結果喪失了更大的機會與發展,甚至可能造成不應該的悲劇呢?



5分錢硬幣與3萬元花瓶 [哲學小故事] - 地圖日記 http://www.atlaspost.com/landmark-3695661.htm#ixzz1NyupTq9H
(網址連回本文)

婚前婚後的差別

以前提到結婚,想到「天長地久」;現在提到結婚,想到「能撐多久」。

以前的人,視婚姻生活為「一輩子」;現代的人,視婚姻生活為「一陣子」。

想結婚,是自己已能獨立;想離婚,是子女已獨立。

當初會結婚,說是「看上眼」;後來會離婚,說是「看走眼」。

嫁入「豪門」,要懂得理財; 嫁入「寒門」,要懂得生財。






戀愛時,情話綿綿; 結婚後,謊話連連。

戀愛時,生活「妙不可言」;結婚後,日子「苦不堪言」。

戀愛時,一見面就「親嘴」;結婚後,一見面就「鬥嘴」。

熱戀時,總相許下輩子再結良緣;結婚後,懷疑上輩子造作孽緣。

戀愛時的男人,喜歡「毛手毛腳」;結婚後的男人,變成「沒手沒腳」。









婚前,愛情是神話;婚後,愛情是笑話。

婚前,沒話找話說; 婚後,有話也不說。

婚前,男人像傳令兵;婚後,男人像指揮官。

婚前,男人對她悄悄講話;婚後,男人對她大聲講話。

婚前,男人在餐廳等女人;婚後,女人在客廳等男人。

婚前,男人天天盯著女人;婚後,女人天天盯著男人。

婚前,「謊話」都是「情話」;婚後,「情話」都是「廢話」。

婚前,情侶做什麼都是「浪漫」;婚後,夫妻做什麼都是「浪費」。

婚前,男人經常找女人「討論」;婚後,男人只告訴女人「結論」。

婚前,男人常給女人「空白支票」;婚後,男人常給女人「空頭支票」。

婚前的男人,大都很幽默;婚後的男人,大都很沉默。

婚前,靠近一點;婚後,閃開一點。









女人的記性,吵架時最好; 男人的耐性,結婚後最差。

好女人,養壞男人的胃口; 壞女人,吊足男人的胃口。

大男人,會「作威作福」; 好男人,會「作牛作馬」。

男人沒有女人,耳根清淨; 女人沒有男人,居家乾淨。

男人「入錯行」,上班會很痛苦;女人「嫁錯郎」,下班會很痛苦。









「成功」?對男人的定義是指能賺很多的錢,對女人的定義是指能花很多的錢。

男人花錢,是為了讓女人高興;女人花錢,是因為男人讓她不高興。

男人有錢就變壞,女人變壞就有錢。

失戀不見得是世界末日: 你的心也許會「泣血」,你的荷包卻可以不再「失血」。

讓你的存在,成為別人的祝福

一隻蜜蜂和一隻黃蜂正聊天,黃蜂氣腦地說:「奇怪,我們倆個有很多共同點,同樣是一對翅膀,一個圓圓的肚子,為什麼別人提到你常是開心的,提到我卻說我是害蟲呢?」

黃蜂接著又忿忿地「我真不明白,真要比起來,我有一件天生的漂亮黃色大衣,而你卻成天髒兮兮的忙裡忙外,我到底哪一點不如你呢?」

蜜蜂說:「黃蜂先生,你說的都對,但我想人們會喜歡我,是因為我給他們蜜吃,請問你為人們做了什麼呢?」

黃蜂氣急的回答:「我為什麼要幫人們做事,應該是人們要來捧我吧!」

蜜蜂接著說:「你希望別人怎樣待你,你就得先怎樣待人。」

很多人常會有懷才不遇的感慨,覺得為什麼自己有那麼多的優點、才華、能力,但卻沒有人懂得欣賞呢?

在人們眼中似乎總被忽略、冷落。其實,就像故事中的蜜蜂與黃蜂一樣,一個人在這世界上的價值,不在於其「擁有」什麼,乃在於其為旁人「付出」了什麼,不在於其擁有那些優勢、才華、能力,乃在於其用那些優勢、才華、能力為旁人貢獻了什麼。

一個人的存在如果無法成為別人的祝福,那麼擁有再好的條件也是枉然。

讓自己的存在,成為別人的祝福。

讓自己的存在,為別人帶來香氣。

讓旁人的日子因為有你而變得更美好,那怕只是多做一個小動作,多幫忙一件小事,都可能會有許多意外的驚喜與感動。

想一想,你所處的團體、學校、辦公室,有因著”你”這個人的存在而變得更美好、更和氣嗎?值得你我深思、共勉。