20140524-25-越野-跟大雪山-鳶嘴捎來之一夜一日行[5KM](未寫完)

(星期六南下台中豐原，在廟東夜市所拍的合照)
=================
這一次所走的地圖結果：鳶嘴山之後下切回公路(稍來還未走)


====================================
GPS下載：http://goo.gl/lHZrvF
FB相片：http://goo.gl/gfD55u
PH的相簿：http://goo.gl/iWHMgA
阿寬相簿：http://goo.gl/GUGiYi
黑哥相簿：http://goo.gl/bF4Ftp
====================================

20140525-收集文-越野-蘭君分享參加越野訓練課程的影片

蘭君這一系列的影片實在是太有價值了！

我覺得我應從中學自已跑野跑的方式：比如，下坡不要跨大步之類的。

=================
蘭君超完整筆記
http://goo.gl/Hkt0v3

===================
2014/05/24 SALOMAN 野跑教學-江帥教爬樓梯！
http://goo.gl/fOcUwT

2014/05/24 Saloman 野跑教學-江帥教爬樓梯(順暢板)
http://goo.gl/4BHTRo



2014/05/24 SALOMAN 野跑教學-江帥分享如何選路！
http://goo.gl/x8ZVEz


2014/05/24 SALOMAN 野跑教學-古大哥說明如何在山中選路？
http://goo.gl/T88CXI


2014/05/24 SALOMAN 野跑教學-古大哥教學，江帥彎道快衝！
http://goo.gl/wW8vzA


2014/05/24 SALOMAN 野跑教學-江帥彎道慢跑！
「小筆記：眼線、眼睛的視線是很重要的，看地、看前找下腳點，眼線看到的地方，就是你下腳的地方！」
http://goo.gl/ZMqXn6



2014/05/24 SALOMAN 野跑教學-山豬林間狂奔～快閃開！！
http://goo.gl/af0ijo


2014/05/24 SALOMAN 野跑教學-古大哥土路彎道教學！弘文和大花夫唱婦隨首發衝刺！！
http://goo.gl/fu6EHB



「羅美香 甜小橘 阿磚 彥穎 林孟喬 Jarvix Lee夫妻，林間奔跑！！
有個全身黑衣女飆好快！她上坡也好快！」
http://goo.gl/MPSLmI



2014/05/24 SALOMAN 野跑教學-古大哥抖下坡教學1
http://goo.gl/QMI88b



2014/05/24 SALOMAN 野跑教學-江帥衝下坡示範
http://goo.gl/rajdZ7



2014/05/24 SALOMAN 野跑教學-古大哥抖下坡示範
http://goo.gl/mtvLj2


2014/05/24 SALOMAN 野跑教學-土路爬坡
http://goo.gl/mxqCJW



2014/05/24 SALOMAN 野跑教學-靜態鍛鍊肌力
http://goo.gl/2GoZBf



2014/05/24 SALOMAN 野跑教學-下坡土路教學2
http://goo.gl/5HmBy8


2014/05/24 SALOMAN 野跑教學-下坡土路彎道跑法
http://goo.gl/NyUyDs



2014/05/24 SALOMAN 野跑教學-高手爬樓梯
http://goo.gl/5vDBle



2014/5/24-SALOMAN 越野教學：野跑後02
http://goo.gl/SsG6Zm

20140521-程式-透過VBA取得目錄&子目錄的列表

找到一些資源做個記錄一下：

參考文章：http://goo.gl/GCMR5k

(我是採用 royUK 的VBA，它可以透過GUI選目錄)

1. 開Excel ,用 「Alt + F11 」開啟VBA


2. Insert > Module  ，建立 「註一」「註二」的 Script 。

3. 要參考「Microsoft Scripting Runtime library」
    Tools > References

4. 按Run 即可產生 清單列表：


5. 這就是我Run出來的結果

--------
我將VBA 改了一小部份，以讓它可以決定取的「深度」
--------


註一：

VB:

Const BIF_RETURNONLYFSDIRS As Long = &H1 ''' For finding a folder to start document searching
Const BIF_DONTGOBELOWDOMAIN As Long = &H2 ''' Does not include network folders below the domain level in the tree view control
Const BIF_RETURNFSANCESTORS As Long = &H8 ''' Returns only file system ancestors.
Const BIF_BROWSEFORCOMPUTER As Long = &H1000 ''' Returns only computers.
Const BIF_BROWSEFORPRINTER As Long = &H2000 ''' Returns only printers.
Const BIF_BROWSEINCLUDEFILES As Long = &H4000 ''' Returns everything.
 
Const MAX_PATH As Long = 260 
 
Type BROWSEINFO 
    hOwner     As Long 
    pidlRoot   As Long 
    pszDisplayName As String 
    lpszINSTRUCTIONS As String 
    ulFlags    As Long 
    lpfn       As Long 
    lParam     As Long 
    iImage     As Long 
End Type 
 
Declare Function SHGetPathFromIDListA Lib "shell32.dll" (ByVal pidl As Long, ByVal pszBuffer As String) As Long 
Declare Function SHBrowseForFolderA Lib "shell32.dll" (lpBrowseInfo As BROWSEINFO) As Long 
 
 
Function BrowseFolder() As String 
     
    Const szINSTRUCTIONS As String = "Choose the folder to use for this operation." & vbNullChar 
     
    Dim uBrowseInfo As BROWSEINFO 
    Dim szBuffer As String 
    Dim lID    As Long 
    Dim lRet   As Long 
     
    With uBrowseInfo 
        .hOwner = 0 
        .pidlRoot = 0 
        .pszDisplayName = String$(MAX_PATH, vbNullChar) 
        .lpszINSTRUCTIONS = szINSTRUCTIONS 
        .ulFlags = BIF_RETURNONLYFSDIRS 
        .lpfn = 0 
    End With 
     
    szBuffer = String$(MAX_PATH, vbNullChar) 
     
     ''' Show the browse dialog.
    lID = SHBrowseForFolderA(uBrowseInfo) 
     
    If lID Then 
         ''' Retrieve the path string.
        lRet = SHGetPathFromIDListA(lID, szBuffer) 
        If lRet Then BrowseFolder = Left$(szBuffer, InStr(szBuffer, vbNullChar) - 1) 
    End If 
     
End Function 

註二：

VB:
Option Explicit 
 
Sub CreateList() 
    Application.ScreenUpdating = False 
    Workbooks.Add ' create a new workbook for the folder list
     ' add headers
    With Cells(1, 1) 
        .Value = "Folder contents:" 
        .Font.Bold = True 
        .Font.Size = 12 
    End With 
    Cells(3, 1).Value = "Folder Path:" 
    Cells(3, 2).Value = "Folder Name:" 
    Cells(3, 3).Value = "Size:" 
    Cells(3, 4).Value = "Subfolders:" 
    Cells(3, 5).Value = "Files:" 
    Cells(3, 6).Value = "Short Name:" 
    Cells(3, 7).Value = "Short Path:" 
    Range("A3:G3").Font.Bold = True 
    ListFolders BrowseFolder, True, 2
    Application.ScreenUpdating = True 
End Sub 
 

'加上深度的資訊
Sub ListFolders(SourceFolderName As String, IncludeSubfolders As Boolean, Deep As Integer)
     ' lists information about the folders in SourceFolder
    Dim FSO    As Scripting.FileSystemObject 
    Dim SourceFolder As Scripting.Folder, SubFolder As Scripting.Folder 
    Dim r      As Long 
    Set FSO = New Scripting.FileSystemObject 
    Set SourceFolder = FSO.GetFolder(SourceFolderName) 
     ' display folder properties
    r = Cells(Rows.Count, 1).End(xlUp).Row + 1 
    Cells(r, 1).Value = SourceFolder.Path 
    Cells(r, 2).Value = SourceFolder.Name 
    Cells(r, 3).Value = SourceFolder.Size 
    Cells(r, 4).Value = SourceFolder.SubFolders.Count 
    Cells(r, 5).Value = SourceFolder.Files.Count 
    Cells(r, 6).Value = SourceFolder.ShortName 
    Cells(r, 7).Value = SourceFolder.ShortPath 
    If IncludeSubfolders Then 
        For Each SubFolder In SourceFolder.SubFolders 
            If Deep > 0 Then
                ListFolders SubFolder.Path, True, Deep - 1
                End If

        Next SubFolder 
        Set SubFolder = Nothing 
    End If 
    Columns("A:G").AutoFit 
    Set SourceFolder = Nothing 
    Set FSO = Nothing 
    ActiveWorkbook.Saved = True 
     
End Sub

20140504-登高-第五次101登高賽

(在等成績公布時，遇到這一次改成參加挑戰組的謝大哥~~)

==================
我的文章~~~留下我自已的文字

==================
針對 101 登高賽，開頭先來個抱怨文好了：

這次報名費，由  $500元，一次漲到了 $800元！！
真不知是為何而漲？？
是行銷公司的關係？或是？？
希望 101 企業可以正視到這個問題。

而我這就這樣不得不的~ 失去了 三佰元壯士 呀 @@~~~

======================

去年，辦登高賽的時間，移至 5月初，
因此推想，今年應也會在這時間。就早早先將這時間預定空出來。

去年比不好，就沒有寫了日記做記錄。


這次報名，很特別的事，在4/4 下午開放報名送單，而 4/6(日)截單  (我是郵寄報名的)
而 4/5(六)是清明節，所以........我沒有辦法在時間內寄送報名資料出去。
只能等到星期一上班前弄好報名。
對於這報名過程，覺得蠻「特別」的。


前個禮拜打電話去問領報到資料的事，他說，會郵寄過來給我！？(驚~這麼特別)
就這樣收到了這次報名資料。


至於拿到 「007」的心情，及目前身體狀況，就在賽前一天做個心情記錄：
http://hougii.blogspot.tw/2014/05/20140503.html
===============================

這次的賽前感觸：
「第五個年頭比賽，第一年就14:17了，而現在，卻想像不到明天可以爬贏最初的自已」

===============================

比賽前兩個禮拜，有「新光登高賽」活動，是一個不錯的評估身體狀況經驗。
原本隔個禮拜是要安排最後一次爬七星山的訓練活動。
無奈於「舊傷」因新光登高有被引出的狀況，讓我不得不在家多多養傷。

賽前一個禮拜，沒有特別安排什麼活動。
就悠閒的去游泳、拉筋，什麼也不能做。 (那時的跑山活動都全捨棄啦)


================================
在心境上，這次有調整了~~
想想第一次爬的感覺，讓自已看怎樣可以減少賽前壓力。
讓自已越輕鬆就越可以發揮實力。

當然，這次沒辦法特別的訓練，所以不會對成績有過高的要求。
只期望自已不要再破了自已的 PW 就可以了XDD
================================

前一晚，想想要額外帶的東西~
1. 早餐：就3包威德IN，輪著吃 (後來吃了2包)
2. 提神用：「紅牛」一瓶，預計在賽前30分前喝~看能不能熱血些。
3. 到時奧摩油出門前塗一下。

================================
這一晚睡得一般一般，不過，算不會累就是了。
5點半起床，沖個澡提神提神一下，東西弄一弄，約六點多搭上「信義」公車。

今天的101



這一次，雨柔全程地陪我，就看什麼要幫的她就會看怎麼幫

但就......「不要拍我」這事~~~~呵，所以還是把妳這張給放上來啦XDDDD



再來遇到 鐵猴子  ，他之前在赤馬有一面之緣，而且他也是吃素的。




然後的時間，就是等七點檢驗報到，
(平衡檢驗~~~~第一次還沒有過，那30秒的閉眼睛，最後大意了XDD)

拿到 手環信物後，就開始領 棚子 那兒的贈品 ~~~

真的是好多東西可以拿呀！！還有一罐 1500 CC的飲料！！

這是為了拿 襪子 所拍的打卡紀念照~~~~(現在的心情有點賽賽的~)



進來會場，簡易的環繞一圈。



錄下自已的賽前心情：


寄完物後，就簡易的拉筋作操



然後也小跑步一下，讓自已熱開些。

過去排隊了，這次是0007 號~~~





前面那大哥，是鐵猴子的朋友。



而我，在這等待中，會緊張，試著讓自已平緩。

前一號出發了，再來就是換我！心情就是一直想讓自已放鬆，
這樣才可以爬得好一些。



雨柔拍下我起跑的瞬間~~


雨柔拍的畫面，回味起來還不錯




雨柔也幫拍一些跑友的起跑畫面：Petr


鐵猴子 & Michael


Ruth


============================
開賽了~~~~

賽前有預習一下進入的路況 及 樓梯的樣子。
所以，跑進來時，心情熟悉些

嗯，開始我的101 了。

這一次就要配穩而到最後，
而拉扶手的方式，賽前就想，好像會不順些，以身體平衡為主。

這次，前一位，及後兩位(??)都是台灣人。
所以，沒有馬上追兵出現的狀況。

在30幾樓時，10/11號的外國選手出現。(我盡量爬我的~)
後來還是禮貌的讓出內道供他們爬。

他們兩個連在一起爬。而且呼吸聲很大聲。
以為是要爆掉的那感覺。
賽後想想，也許這是他們「主動」強迫自已大呼大吸的方式。

或許以後可以學學^^

賽前對自已0007的號碼，我所想到的好處就是：可以親眼看到他們怎麼爬樓梯。
(最後他們成績是11開頭的!!!)

用爬的、兩階、速度比我快一些(大約我若全力跟，一兩樓之後就會被拉開那種~)
所以，若學會他們那樣配速，而可以配到最後，就應有12開頭的狀況。

他們右手捉樓梯，左手壓左腳的方式前進。(看來沒特別全拉樓梯)
(PS:影片有錄到 這一段畫面。)

----
會注意目前在幾樓。

而心情就放鬆隨意些，也留意腳的狀況。
自穩配，就不會酸那麼快。

50幾樓超過前一號大哥，而他也有讓我過去^^。
59樓的攝影機。再30樓吧！

最後，想放掉時，想想了在「七星山」的爬樓感覺。
以及 第一次登高時的那份心情。
試著讓自已轉移注意力，讓腳放鬆。

有那麼一秒放棄了。又想到不想讓自已後悔，又回到原速度。

在 80樓時，有看到 Ginny ！！意外的事，怎麼會有熟面孔在這兒當志工？？
89、90、91
看到壁畫，知道快到了。也好像衝不太了。

最後那平路段，只能用小小跑的結束它 (在想...大家好像這最後一段都可以衝刺耶！厲害)
---------------
結束這登高了！！

成績應該是不會破最差記錄！而感覺也不的破最佳。

不論怎樣.......是場不悔的賽事！

---------------
爬出來時，有些累，臉應該很賽吧~而就先到一旁的水區補補水。退後到一旁去。

後來，有一個女記者來採訪我~~~(驚！)

對喔~可能是我是第一個台灣人上來的(就超過前一位大哥)

不過，大概知道自已的成績不是最好的，所以，這樣的訪問很害羞。
「你這次對自已的成績期望是？」
「你平常怎麼訓練？」
「要多少成績才可以進精英名人組？」 (哈，這個規則就較可以清楚地回答XD)
其實問題問了什麼我也忘了~~會一直看上來的人有沒有更強的~~
就快快「推薦」給那可愛的女記者XDDD

後來，Petr 、鐵猴子 上來，就「推薦」給她做採訪！呵呵~~真是辛苦了。

在上面，小小與大家聊一下。
Sasha提議要來個合照.........無奈.....找不到相機XDDD

在那兒小小晃一下，就和他們先道別離開要坐電梯下去了~~~~
-------
Ruth 也是要下去~~她小迷路~
因為我之前有爬過，我「認為」我會知道在那兒~~
就從 預定 的那門進去~~~繞繞~怎麼到另一邊的 醫護區？？？

呀？裡面又繞了一圈，還是沒看到 ？也沒有工作人員？

而 Ruth 就跟著我 裡面繞又外面繞的 XDDD

後來，也不少人迷路~~~~原來是 坐電梯的那門沒有打開XDD

就接到下一層樓，再轉搭 直達電梯。
(因為剛剛那樣繞，所以，跟鐵猴子他們也變成同時下去了)

========
下樓後要領成績，雨柔就在那兒等我啦。

幫拍一張領完成績照~







裱了紙框 的成績証明~~~~多這一層就感覺好高級喔！



鐵猴子的~13:50


全馬三小時的大哥，後來也有分享他的訓練心情。



紀念照~


雨柔~



合拍，就以這一張上傳並簡易地描述心情。

由 Howard Chiang 貼文。

比完後的心得：



雨柔拍的一張有感覺的照片~好看




雨柔分享的  97 歲的老爺爺 ~~~~他的號碼布就是他的歲數~~~這是 101 的一項傳統。


雨柔的分享貼文：http://goo.gl/xZwDnX

遇到謝大哥~~~他今年自已比挑戰組~~



再來等待成績的公布： 幫幫 Petr 、Shasa他們拍拍照~





今年的第一名，10:54 ，今年有兩個10分開頭的！！！



這次的大會成績單，我們等這一張等得好辛苦喔！！竟會比企業組選晚公布 @@



嗯，結束這一趟旅程~~~~再來就是與雨柔去找吃的嘍~~~

在師大站那附近的 蔬食店，他無蛋無奶，無蜂蜜~~~





======================
後來，國父紀念館晃晃，等著 二點 市政府之「割蘭尾」活動，主要是-信義區的-費鴻泰。





人民對於政治議題是會「選擇」的，不是單單說煽動就可以煽動的。
我選擇我的立場~~


=====================================================

紀念號碼布：0007




這一的狀況比預期好，也因此.................我要開始我的作夢能力！！！

(THE END)

20140503-心情-今年登高前一天的心情記錄

這次的感觸：
「第五個年頭比賽，第一年就14:17了，而現在，卻想像不到明天可以爬贏最初的自已」


想想，賽前還是留一下自已目前的感覺，不論明天結果如何，一定要將這一次比賽的心情記錄下來。

去年，就是比得太不好，而沒有去寫下我的101日記。
今年，不論如何，就做份屬於自已的記錄吧。

-------
第五年了，就登高體力上，完全沒有所謂因訓練而帶來進步的感覺。
第二年年初，因登高訓練而受的傷開始，就所有的體能就一路往下坡走。
跑步、單車、鐵人賽之類的.........
(其實單車下坡不算因這傷，反而是這傷而轉戰單車的~~~)

不過，現在單車所造成的傷也讓我已一年多沒有再騎單車了。

----------
記錄下自已目前的心情。 只留下我自已的文字。

我想，明天的比賽，對自已來說，能不能盡到全力，是一個很大的關鍵。
在後段的意志力，是否可以撐得過去？
而心情上是否可以放鬆？不讓我的大腿承受額外的壓力？

腳的狀況，
在 新光登高後的一個禮拜，明顯感受出我的右臀屁股那，那個「舊傷」被引出來的感覺。

是這次登高的隱憂，總之在過程中，我要避免突然使力，而造成這舊傷又復發。
這點，我只要能平順的速度前進，應不會有這問題。

放鬆心情去比賽，是重要的。

心胸廣一些， 自已對於之前的自已，清楚去面對那個還追不上背影的自已。

最初第一次比賽時，那樣隨意的去爬，會累但卻是很快樂的。

享受每次的不一樣變化吧。

--------

說來，明天還是帶著手機到會場，拍拍這一次感受的東西吧。
就當是個旅行~~

留下這份回憶。。

--------------------

「期待明天」

是我自已犯下的錯，讓自已把想做的事放到明天，
到頭來，有可能全部都沒有做了~~~~~

今後，讓自已改掉這個壞習慣。

去「享受今天」吧。


------------------
這次號碼布「0007」還真是讓我意外，明明送單的成績是去年最差的~
而為何又把我排到那麼前面呢？

不過，後來想想，讓自已自由的去享受吧。

反正小人物有小人物的爬法。

就隨意的去爬吧。
要超過我的，自已再找路線超，我就爬我自已的路了。不刻意去做禮讓的動作了。
讓自已專注在爬樓梯上面。


-------------------
101的登高世界，最初爬完後的心情，是感覺自已在這項離神的境界最近。
而經過這五年的起起伏伏過程，回頭看，感覺像是自已還在原地。


加油，明天不論如何，都去感受它吧。

(THE END)