ekbt管理人室

ｅｋｂｔ管理人部屋、癒しの空間へ！！
Let's talk about every things from our soul.


-2009/11/6 秋の日
______- An autumn day
-2009/10/29 キハ２２
______- JR Type HIHA22
-2009/10/20 関門海峡の夜景
______- The night view of the KANMON straits
-2009/10/22 Windows7の価格
-2009/10/20 角島灯台の光
______- The light of Tsunoshima Lighthouse
-2009/10/16 秋の使者モズ
______- An autumn messenger shrike
-2009/10/15 秋の角島2
______- Autumn in Tsunoshima2
-2009/10/11 鳥
______- bird
-2009/10/6 815系
______- Type 815
-2009/10/2 初秋の山陰線
______- The Sanin Line of the early fall
-2009/10/1 α850について
______- About ALPHA850


■ご案内　ブログの見方についてはここをどうぞ。
■このブログに含まれる画像は、一部アフェリエイト画像を除き著作権を設定しています。画像の著作権に関してはここ（http://ekb-t.sytes.net/kawa/photo/chosaku.html）をご覧ください。また、画像の一部は、下記素材ダウンHP（PIXTA)へも登録しています。
＿


サーバ構築やＦｅｄｏｒａ関連の話を集めています。


Vine Linux関連の話を集めています。

■ご注意。Fedora・VineLinux　に書いてあるインストールや設定は、あくまでも1つの例です。安全かつ最良の方法ではない場合があります。特に危険な設定は、危険性を記述しているつもりですが、それ以外も危険性がまったくないわけではありません。本ブログの情報は個人の責任において使用するようお願いします。企業の方は使用しないでください。本ブログの情報を使用したことにより、損害等が発生したとしても当方は一切責任を負えません。また本ブログの情報による設定等での動作の保証もいたしませんのでよろしくお願いします。特に企業ユーザの方は専門のアナリストに相談されるのをお勧めします。


野鳥の写真、特に以前保護したすずめの暮す姿や、かわせみの写真、きつつきの写真、最近はめじろなどをまとめています。





風景や、スナップ、ポートレートなどジャンル全般の画像や動画を集めています。また、写真やビデオ機材関連の話題もここに書いています。







ケンコーアウトレットの販売、写真機材掘り出し物が時々あるので、よく利用します。




パソコンのハードやソフト、Windows関連の話題、Web関連の話を集めいています。




乗っている車の話や、車全般の話をまとめています。





管理人が好きな温泉について。それと温泉治療について。






小さい頃から好きだった鉄道の写真を集めています。




Ｍａｃ＆Ａｐｐｌｅ
Ａｐｐｌｅ社やＭａｃ関連の話を集めています。

その他（General)
その時々に思ったことや、ちょっとした画像など、他のカテゴリに入らないものを色々書いています。

お役立ちLink
当サイトのLINKコーナーにあったリンク集を移設して見やすく改良しています。

秋ももうすぐ終わり、冬がやってくる。そんな秋の日。

Winter comes over soon in autumn at the end. The day of such autumn.

Visual Basic から　Microsoft SQL Server　にアクセスするプログラミングの解説本を探してみた。この分野は結構少ないなあ。Olacleや他のRDB、PHPやJava関連の本は結構あるがなあ。この分野を詳しく習うのは講習会などにいったり、研修を受けてやるのが普通なのかな。

VisualBasic2008上で作ったデータベースにアクセスしてみる。



ボタン１　接続の試験

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim cn As New System.Data.SqlServerCe.SqlCeConnection

Try
cn.ConnectionString = "Data Source=D:\databaseApplication1\Database1.sdf;"
cn.Open()
TextBox1.Text = "Connection sucsess"

Catch ex As Exception
TextBox1.Text = ex.Message

Finally
cn.Close()
End Try

End Sub



ボタン２　データベースから読み込む

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

Dim cn As New System.Data.SqlServerCe.SqlCeConnection
Dim cmd As System.Data.SqlServerCe.SqlCeCommand
Dim dread As System.Data.SqlServerCe.SqlCeDataReader

Try
'SQLサーバへ接続
cn.ConnectionString = "Data Source=D:\databaseApplication1\Database1.sdf;"
cn.Open()
Me.TextBox1.Text = "Connection sucsess"

'SQLコマンドの設定
cmd = New System.Data.SqlServerCe.SqlCeCommand("SELECT * FROM CustomerInfo", cn)
'データの読み込みSQLの実行
dread = cmd.ExecuteReader()

'出てきたデータを順に読み出す
Do While (dread.Read())
'データをリストボックスへ表示
Me.ListBox1.Items.Add(dread.GetInt32(0) & ControlChars.Tab & dread.GetString(1) & ControlChars.Tab & dread.GetString(2) & ControlChars.Tab & dread.GetString(3))

Loop
dread.Close()

Catch ex As Exception
'エラー表示
TextBox1.Text = ex.Message

Finally

cn.Close()
End Try

End Sub

昔撮ったキハ２２の画像が出てきた。三角線の赤瀬駅での風景。

An image of KIHA22 which I took came out in old days images. The scenery at Akase Station of the MISUMI line.

下関側からの関門海峡の夜景。

The night view of the KANMON straits from the Shimonoseki side.

Windows7発売に呼応して、Appleはネガティブキャンペーンを張っている。
ううむ、すばらしい内容。

Apple is opposed to Windows7 release.
Apple performs a negative campaign.
Oh, splendid contents.



（http://www.apple.com/getamac/ads/）

いつもは百舌鳥が来てなくアンテナに、雀が来て鳴いていた。風に向かって胸を張って、なぜか威張っている。

A sparrow come and sings. He stick out his chest toward the wind and brag for some reason.
At the usual place where a shrike sings.

いよいよWindows7が発売！！。その価格は．．．。（パソコン工房調べ）

Windows7 Tomorrow launch