Wednesday, October 10, 2007

[EXCEL_VBA]今天見識到Shape的一個應用

最近學習VBA,看到一段關於 Shape 的CODE,執行後真是神奇,不過目前還想不到這個到底有甚麼用處,難道可以用來展示或簡報嗎,恩,或許吧!
如下:
Sub t1()
Dim mysht1 As Worksheet
Dim mysht2 As Worksheet
Dim rng As Range
Dim mypi As Double
Dim myshp As Shape
Set mysht2 = Worksheets(Worksheets.Count)
With mysht2
For Each myshp In .Shapes
myshp.Delete
Next myshp
mypi = WorksheetFunction.Pi
Set myshp = .Shapes.AddShape(Type:=msoShape5pointStar, _
Left:=100, Top:=100, Width:=100, Height:=100)
End With
With myshp
For i = 1 To 2000 Step 5
.Top = Sin(i * (mypi / 180)) * 100 + 200
.Left = Cos(i * (mypi / 180)) * 100 + 200
.Fill.ForeColor.RGB = i * 100
For j = 1 To 5
.IncrementRotation 2
DoEvents
Next j
Next i
End With
End Sub

Wednesday, September 26, 2007

[資料損毀]40G硬碟

今天陪我許久的 Mactor 40G 硬碟突然掛點,僅備份100MB左右的資料。
Python資料夾中的程式幾近全毀,數個月的心血救不回來。其他雜七雜八就暫時不去想它,
圖憎扼腕罷了。

然而換一個心態來面對,除了告知平時備份的重要,對於Python則可徹底擺脫初學時的那份生澀,以現今較為成熟的撰寫技巧跟模組觀念來產生新程式(這麼說似乎有點太忘本些)。

上網尋找另一個備份硬碟,沒想到世面上已有1000G硬碟流通。想當初國三升高一的人生第一部電腦 IBM 486DX2-66 似乎是540MB的硬碟+4MB記憶體,高一去台中資訊展買4MB記憶體要3000元台幣

Anyway,資料損毀就毀了,能做的只有注重平時備份跟心態調整,或許未來某一天心血來潮再來測試該40G硬碟時,突然發現裡面那些古老久遠的資料時,那種如同挖掘到寶藏莫名興奮的喜悅會再度降臨。

Friday, July 27, 2007

[Python]wxPython(一)

自學幾天的 Python 後接著安裝 wxPython 。摸了兩天漸漸有個輪廓,慢慢補充一些東西。

1.wxPyhon in Action (必要參考書籍)
簡體翻譯:http://www.pythontik.com/blog/article.asp?id=177

2.wxPython_API.chm

3.O'Reilly - Python Standard Library

Monday, July 23, 2007

[Firefox]Stylish(二)

除了可以擋掉一些"區塊"外,還可以調整文章邊距與邊框,使文章閱讀上較不吃力。

範例:
div[id='content']{
margin-left:6em;
margin-right:6em;
margin-top:-1px;
margin-bottom:-1px;
border:solid 3px #ff6600}
}

Thursday, July 19, 2007

[Firefox]Stylish(一)

使用 Firefox 並搭配 Adblock Plus 可以擋去多數不想看到的東西(包括廣告),然而有的網站仍有一些 『多餘空間』,此時可以藉由 Stylish 解決。以下為範例:

1.原始畫面:
2.搭配 Adblock 擋去廣告,但仍由一大塊無資訊表格。
3.在 Stylish 設定後,可視空間變大了。

[Stylish設定部分]
@namespace url(http://www.w3.org/1999/xhtml);

@-moz-document domain("www.kenshuw.com") {

table[cellspacing="1"] {display:none!important}
}

Tuesday, May 08, 2007

[軟體]Jwget part2

經錯誤嘗試數次之後,已更新至0508最新參數,記錄如下:
;讀取時目錄名稱
re_title=<a href="\./album\.php\?id=%id%&book=\d+".*>\s*(.*)\s*</a>

;帳號下的目錄名稱
href="\./album\.php\?id=%id%&b=\d+&f=.d+&p=.d+">(.*)</a></font></b>
re_title_sub=>\s*(.*)\s</font>

;註解
re_imgDl_title=<font class="small-e">.*">(.*)</a></font></b>

Friday, May 04, 2007

[軟體] Jwget

對於WRETCH的相簿我用過 Jwget 跟 WretchXD,分別是 0.8.5.e 跟 1.6.0.8(前幾天因應該空間改版),前者則是已將近一年沒更新。

先談後者,程式開啟後輸入相應帳號,選擇欲下載部分,[開始下載]後會讀取[各資料夾清單],而後列出所有檔案始開始下載。個人覺得缺點有二:
1. 過程緩慢(速度不佳)。
2. 該程式為單一檔案,擴充性不佳。(遇Wretch小改版則可能失效)

前者則一直OK,然今天使用時輸入帳號則無法列出清單,僅能依賴輸入第幾本來下載。
於是發現 plugin.ini 裡面的東西似乎可以解決,稍微改了一下果然可用(沒深入研究,可列清單但尚無法列出縮圖預覽)
需要改的地方: re_title=wretch">\s*(.*)\s*</a>


晚上似乎又有改變,需更正為:
re_title=<a href="\./album\.php\?id=%id%&book=\d+".*>\s*(.*)\s*</a>

Thursday, May 03, 2007

[軟體] Joost

幾週前僅能看到 Joost 的相關介紹及體驗心得,近日似乎大量提供邀請,有幸獲得一個得以嘗鮮一番。
安裝之後啟動程式才進入登入畫面(此時可註冊新帳號),再來就是全畫面的震撼。
畫面不錯,頻道不多(但相信更多人加入後應可改善),鮮少停格延遲(但畫面偶有方格)。