highlight.js
星期二, 8月 18, 2009
星期五, 7月 24, 2009
星期四, 7月 23, 2009
星期一, 2月 23, 2009
日本手機漫畫成為新商機
之前我自己曾經想過「電子書閱讀機的殺手級內容--漫畫書?」,今天剛好看到台灣出版資訊網上一篇新聞「日本手機漫畫成為新商機」,果然大家有志一同,都找到這個有賺頭的領域去。
如果對照1109期商業週刊中訪問尖端發行人黃鎮隆的「印書像印鈔票的秘密--尖端執行長二十年的釣魚經營學」一文中格林文化發行人郝廣才所言「以前一本漫畫發行幾十萬本,是常有的事,現在,漫畫就像書一樣,能賣超過一萬本,就算是暢銷,」,至少對於漫畫,紙本的地位已經越來越不保了。
但話說回來,用手機看漫畫,我想螢幕還是算小了點,雖然已經比看小說好太多,但若是用電子書閱讀機,顯然舒適多了!
如果對照1109期商業週刊中訪問尖端發行人黃鎮隆的「印書像印鈔票的秘密--尖端執行長二十年的釣魚經營學」一文中格林文化發行人郝廣才所言「以前一本漫畫發行幾十萬本,是常有的事,現在,漫畫就像書一樣,能賣超過一萬本,就算是暢銷,」,至少對於漫畫,紙本的地位已經越來越不保了。
但話說回來,用手機看漫畫,我想螢幕還是算小了點,雖然已經比看小說好太多,但若是用電子書閱讀機,顯然舒適多了!
星期四, 2月 19, 2009
取出WORD文件中所有文字框的文字
我的工作因為要整理作者提供的稿件,因此一直有個需求就是把WORD文件中所有文字框(有加上文字的快取圖形、水平或是垂直的文字框)中的文字取出來,這樣我就不需要一個一個文字框作Copy貼的動作,今天剛好找到了一個合用的範例如下:
只要把MsgBox那行換成你需要的動作,就可以將取出的文字再利用了,我自己是把所有文字匯集到一個跟WORD文件同名,但加上 "_shape" 字尾的文字檔:
延伸閱讀:
Dim sh As Shape
Dim txt As String
For Each sh In ActiveDocument.Shapes
If sh.TextFrame.HasText Then
txt = sh.TextFrame.TextRange.Text
MsgBox (txt)
End If
Next sh
只要把MsgBox那行換成你需要的動作,就可以將取出的文字再利用了,我自己是把所有文字匯集到一個跟WORD文件同名,但加上 "_shape" 字尾的文字檔:
Sub 匯出文字框的文字()
'
fname = ActiveDocument.FullName 'Word檔名
txtFname = Left(fname, Len(fname) - 4) & _
"_shapes.txt" 'txt檔名
Set fs = CreateObject("Scripting.FileSystemObject")
Set txtfile = fs.CreateTextFile(txtFname, True) '建立文字檔
Dim sh As Shape
Dim txt As String
For Each sh In ActiveDocument.Shapes
If sh.TextFrame.HasText Then
txt = sh.TextFrame.TextRange.Text
txtfile.writeline txt
End If
Next sh
txtfile.Close
End Sub
延伸閱讀:
星期五, 9月 05, 2008
Silverlight 2 = Java Applet in .NET World
對於資訊技術的發展,我總覺得很有意思,許多過去被提出但似乎失敗的想法總是會透過不同的方式捲土重來,比方說過去總被認為執行速度太慢、不夠嚴謹的scripting語言,居然就因為早期寫CGI的Perl、瀏覽器都支援的JavaScript、廣為流行的PHP、甚至最近的Rails中的Ruby而佔有一席之地,只要是網頁開發,到處都是scripting語言。
而十年前Java初登場時最紅的Java Applet,似乎越來越黯淡,不過就在我最近瞭解Silverlight 2時,卻有一種莫名其妙的熟悉感,這不就是.Net下的Java Applet嗎?只是當然Silverlight進化些,有現成的動畫與影音機制,但骨子裡不就是Java Applet嗎?
而十年前Java初登場時最紅的Java Applet,似乎越來越黯淡,不過就在我最近瞭解Silverlight 2時,卻有一種莫名其妙的熟悉感,這不就是.Net下的Java Applet嗎?只是當然Silverlight進化些,有現成的動畫與影音機制,但骨子裡不就是Java Applet嗎?
訂閱:
意見 (Atom)



