今日の懇親会で、N社の方から「新入社員が言ってることが常に正しい」と聞いた。
非常に興味深いと思う。
孔子様の教えに「人之初、性本善」の名言がある。
やはり同じ哲理を闡明していると思う。
何も先入概念のない人はより客観的に、素朴に物事を言うことができる。
なので、その意見をいかに専門家の視点で見て、未熟であっても、単に否定していけない。
逆に重視し、その考え方の根底を深堀すれば、問題点と新しいアイデアが見つかるはずだ。
Tuesday, July 28, 2009
Friday, July 24, 2009
excel 自動曜日計算と色分け
A2セルの値によって、自動曜日計算
=IF(A2="","",CHOOSE(WEEKDAY(A2), "日", "月", "火", "水", "木", "金", "土"))
そして条件付書式で色分けできる。
=IF(A2="","",CHOOSE(WEEKDAY(A2), "日", "月", "火", "水", "木", "金", "土"))
そして条件付書式で色分けできる。
Thursday, July 23, 2009
Rubyを利用したiPhoneアプリ開発環境「Rhodes」
http://builder.japan.zdnet.com/sp/iphone-3g-2008/story/0,3800087831,20397077,00.htm?tag=zdnw
http://www.rhomobile.com/products/rhodes
今回はRubyを利用したiPhoneアプリ開発環境「Rhodes」を紹介する。
最新特集【一覧】
Rubyを利用したiPhoneアプリ開発環境「Rhodes」
OSSのクラウド基盤「Eucalyptus」を使う（6）--VM実行環境の設定とCentOSでのイメージ作成
人気記事【一覧】
1:OSSのクラウド基盤「Eucalyptus」を使う（6）--VM実行環境の設定とCentOSでのイメージ作成 ネイティブなiPhoneアプリの開発はObjective-C決め打ち、という状況に呻吟しているデベロッパは少なからず存在するはず。ここに選択肢、たとえばRubyが加わるとしたら、歌い出す（singing……失礼しました）ほど嬉しい人もいるのではなかろうか。
Rhomobileがリリースした「Rhodes」は、Rubyを利用したiPhoneアプリ開発環境。ローカルで動作するRuby on Rails、とでも言うべき機能を備え、描画にはWebViewを利用できる。アプリのバンドル内部にRubyVMを収録し、事前にコンパイルしておいた（動的コンパイルはApp Storeの審査を通過しないとされる）インストラクションを処理するという流れだ。
GPLv3と商用のデュアルライセンスで提供され、後者を選択した場合はアプリ1つにつき500ドルとなるが、フリー／オープンソースの場合は無償利用できるため、趣味のアプリ開発で使うぶんには支障ないはず。
手本になるコードは……ということでgithubを探してみたところ、いくつか発見。App Storeで公開中の「Issues To Go」や、Twitterクライアントの「rhodes-twitter」など、これからRhodesを試してみようという向きには参考になるだろう。
http://www.rhomobile.com/products/rhodes
今回はRubyを利用したiPhoneアプリ開発環境「Rhodes」を紹介する。
最新特集【一覧】
Rubyを利用したiPhoneアプリ開発環境「Rhodes」
OSSのクラウド基盤「Eucalyptus」を使う（6）--VM実行環境の設定とCentOSでのイメージ作成
人気記事【一覧】
1:OSSのクラウド基盤「Eucalyptus」を使う（6）--VM実行環境の設定とCentOSでのイメージ作成 ネイティブなiPhoneアプリの開発はObjective-C決め打ち、という状況に呻吟しているデベロッパは少なからず存在するはず。ここに選択肢、たとえばRubyが加わるとしたら、歌い出す（singing……失礼しました）ほど嬉しい人もいるのではなかろうか。
Rhomobileがリリースした「Rhodes」は、Rubyを利用したiPhoneアプリ開発環境。ローカルで動作するRuby on Rails、とでも言うべき機能を備え、描画にはWebViewを利用できる。アプリのバンドル内部にRubyVMを収録し、事前にコンパイルしておいた（動的コンパイルはApp Storeの審査を通過しないとされる）インストラクションを処理するという流れだ。
GPLv3と商用のデュアルライセンスで提供され、後者を選択した場合はアプリ1つにつき500ドルとなるが、フリー／オープンソースの場合は無償利用できるため、趣味のアプリ開発で使うぶんには支障ないはず。
手本になるコードは……ということでgithubを探してみたところ、いくつか発見。App Storeで公開中の「Issues To Go」や、Twitterクライアントの「rhodes-twitter」など、これからRhodesを試してみようという向きには参考になるだろう。
Sunday, July 19, 2009
3人のこともを東大、京大に現役に合格させたママの教育法
今夜のテレビで3人のこともを東大、京大に現役に合格させたママの教育法が放送された。
確かにえらい母親だ。その根本は親もしっかりすることである。
また、ポイントは小学校までよい勉強習慣を身に着けることである。
１．幼稚園児に洲一度
ドリル
一枚ずつ破って、興味も足せ、集中させる
丸はつけるが、×はつけない
1回目赤、2回目はピンク
２．宿題はさり気なく観察する
躓いているとき、このような勉強難しいな。
いっていけないのは「なんでできないのか、これもわからないのか」
３．父親は宿題みるのを許さない
ママがみていて、パパが回答することはよくない？？
４．先生のことは子供の前に批判しない
先生を尊重しなければ、授業をきちんと受けなくなるから
不満を見た場合、自ら申しだす
５．才能の出しを惜しみを出すなとちかる
確かにえらい母親だ。その根本は親もしっかりすることである。
また、ポイントは小学校までよい勉強習慣を身に着けることである。
１．幼稚園児に洲一度
ドリル
一枚ずつ破って、興味も足せ、集中させる
丸はつけるが、×はつけない
1回目赤、2回目はピンク
２．宿題はさり気なく観察する
躓いているとき、このような勉強難しいな。
いっていけないのは「なんでできないのか、これもわからないのか」
３．父親は宿題みるのを許さない
ママがみていて、パパが回答することはよくない？？
４．先生のことは子供の前に批判しない
先生を尊重しなければ、授業をきちんと受けなくなるから
不満を見た場合、自ら申しだす
５．才能の出しを惜しみを出すなとちかる
Friday, July 10, 2009
越媒：中国这招对付越南太高明了
越媒：中国这招对付越南太高明了
凤凰网 2009-07-10 16:31:17
越南新闻网7月7日文章 越南《Dat Viet Daily》报道说，尽管来自中国的进口商品轻而易举地就打入了越南市场，但是越南的出口商品想到达中国市场却非常艰难。
越南的报纸最近一直在报道，关于在越南北部与中国交界的地区，等待通过中国海关的卡车，特别是装载农产品的卡车排起了长队的事。根据老街省海关办公室主任阮廷扇所讲，越南出口的农产品，比如腰果、绿豆糕和木薯必须拥有原产地证书并通过严格的质量检查后才被允许进入中国。阮廷扇说，中国一直非常有效地利用关税来调节其进出口。（越南）对华出口的商品，要么接受政府规定的官方关税，要么接受当地政府制定并适用于跨境进口贸易的关税。这解释了为什么在一些情况下，越南向中国出口的鞋类———如果被确认是“正式出口”，必须承受超过30%的税率，但如果这些商品作为“本地贸易”跨境，税率可能会低于5%。
中国经常频繁地调整税收政策，这要看其是希望鼓励还是不鼓励某一具体产品的进出口。阮廷扇举了化肥出口这个例子。到6月30日为止，中国对化肥出口实施了130%的出口关税，目的是保证有足够供应用于国内农业生产。然而，一旦中国的国内需求得到满足，它就会大幅度降低出口关税。“中国的进出口政策总是变化非常快且幅度相当大。因此，如果越南的企业不保持足够灵活度，会遭受损失”，越南广宁省芒街市海关办公室主任如是说。
与中国交界的越南谅山的一名海关官员说，越南农产品出口经常因卫生检疫受阻，“一些出口产品被拒绝是因为这些产品没按照必需的方式进行包装。举例说，越南的小商户不用箱子来装西瓜，而是用稻草来做衬垫。这是不会被接受的。”
越南也应该玩中国的游戏吗？《Dat Viet Daily》就此访问了越南工商部的一名高级官员。这名官员说，中国如今发现把商品出口到大市场变得更加困难了。为应对全球金融危机所带来的影响，中国一直号召国内消费者使用中国制造的商品，开始限制进口，尤其是来自像越南这些周边国家的商品。举例来说，中国制定了新的规定，表面上是为加强对进口的海产品进行卫生检疫。实际上，显然对进口商品制定严格标准是中国调整其贸易平衡和限制进口的一种有效手段。
该官员还说，中国对进口产品更加严格的控制当然会降低越南的对华出口量。下降的程度会有多大取决于越南出口产品能在多大程度上满足中国的技术标准和中国实施的标准有多高。
一名高级经济学家说，中国控制进口的方法表明，它能够有效地利用世贸组织的规则来保护国内生产者。有报道说约有20个国家正在做着同样的事。然而，越南似乎还没注意到要使用类似的“防御措施”。工商部的统计显示，最近几年来，越南对亚太地区（包括中国）的出口一直占据总出口额的50%。
凤凰网 2009-07-10 16:31:17
越南新闻网7月7日文章 越南《Dat Viet Daily》报道说，尽管来自中国的进口商品轻而易举地就打入了越南市场，但是越南的出口商品想到达中国市场却非常艰难。
越南的报纸最近一直在报道，关于在越南北部与中国交界的地区，等待通过中国海关的卡车，特别是装载农产品的卡车排起了长队的事。根据老街省海关办公室主任阮廷扇所讲，越南出口的农产品，比如腰果、绿豆糕和木薯必须拥有原产地证书并通过严格的质量检查后才被允许进入中国。阮廷扇说，中国一直非常有效地利用关税来调节其进出口。（越南）对华出口的商品，要么接受政府规定的官方关税，要么接受当地政府制定并适用于跨境进口贸易的关税。这解释了为什么在一些情况下，越南向中国出口的鞋类———如果被确认是“正式出口”，必须承受超过30%的税率，但如果这些商品作为“本地贸易”跨境，税率可能会低于5%。
中国经常频繁地调整税收政策，这要看其是希望鼓励还是不鼓励某一具体产品的进出口。阮廷扇举了化肥出口这个例子。到6月30日为止，中国对化肥出口实施了130%的出口关税，目的是保证有足够供应用于国内农业生产。然而，一旦中国的国内需求得到满足，它就会大幅度降低出口关税。“中国的进出口政策总是变化非常快且幅度相当大。因此，如果越南的企业不保持足够灵活度，会遭受损失”，越南广宁省芒街市海关办公室主任如是说。
与中国交界的越南谅山的一名海关官员说，越南农产品出口经常因卫生检疫受阻，“一些出口产品被拒绝是因为这些产品没按照必需的方式进行包装。举例说，越南的小商户不用箱子来装西瓜，而是用稻草来做衬垫。这是不会被接受的。”
越南也应该玩中国的游戏吗？《Dat Viet Daily》就此访问了越南工商部的一名高级官员。这名官员说，中国如今发现把商品出口到大市场变得更加困难了。为应对全球金融危机所带来的影响，中国一直号召国内消费者使用中国制造的商品，开始限制进口，尤其是来自像越南这些周边国家的商品。举例来说，中国制定了新的规定，表面上是为加强对进口的海产品进行卫生检疫。实际上，显然对进口商品制定严格标准是中国调整其贸易平衡和限制进口的一种有效手段。
该官员还说，中国对进口产品更加严格的控制当然会降低越南的对华出口量。下降的程度会有多大取决于越南出口产品能在多大程度上满足中国的技术标准和中国实施的标准有多高。
一名高级经济学家说，中国控制进口的方法表明，它能够有效地利用世贸组织的规则来保护国内生产者。有报道说约有20个国家正在做着同样的事。然而，越南似乎还没注意到要使用类似的“防御措施”。工商部的统计显示，最近几年来，越南对亚太地区（包括中国）的出口一直占据总出口额的50%。
Monday, July 6, 2009
久しぶりのアクセス - accessのテーブルリンクの一括リネームと属性変更
久しぶりのアクセスを触るようになった。
accessのテーブルリンクの一括リネームと属性変更したいと思っていろいろと試してみた。
結局このプログラムが一番で気がいいかも。
Option Compare Database
Sub RenameTables()
Dim i As Integer
Dim dbRename As Database
'Set dbRename = OpenDatabase(App.Path & "\mydb.mdb")
'dbRename.CreateTableDef
Dim tbl As TableDef
Set dbRename = CurrentDb
For Each tbl In dbRename.TableDefs
'If (tbl.Connect <> "") Then
' tbl.Connect = Replace(tbl.Connect, strOldPath, strNewPath)
' tbl.RefreshLink
'End If
Dim sPrefix As String
sPrefix = "YBBUSER_"
Dim sTblName As String, sTblNameNew As String
sTblName = tbl.Name
If sTblName <> "MSysAccessObjects" Then
If Left(sTblName, Len(sPrefix)) = sPrefix Then
sTblNameNew = Replace(sTblName, sPrefix, "")
tbl.Name = sTblNameNew
End If
End If
Next
'dbRename.Close
Set dbRename = Nothing
End Sub
accessのテーブルリンクの一括リネームと属性変更したいと思っていろいろと試してみた。
結局このプログラムが一番で気がいいかも。
Option Compare Database
Sub RenameTables()
Dim i As Integer
Dim dbRename As Database
'Set dbRename = OpenDatabase(App.Path & "\mydb.mdb")
'dbRename.CreateTableDef
Dim tbl As TableDef
Set dbRename = CurrentDb
For Each tbl In dbRename.TableDefs
'If (tbl.Connect <> "") Then
' tbl.Connect = Replace(tbl.Connect, strOldPath, strNewPath)
' tbl.RefreshLink
'End If
Dim sPrefix As String
sPrefix = "YBBUSER_"
Dim sTblName As String, sTblNameNew As String
sTblName = tbl.Name
If sTblName <> "MSysAccessObjects" Then
If Left(sTblName, Len(sPrefix)) = sPrefix Then
sTblNameNew = Replace(sTblName, sPrefix, "")
tbl.Name = sTblNameNew
End If
End If
Next
'dbRename.Close
Set dbRename = Nothing
End Sub