ekbt管理人部屋、癒しの空間へ!!
Let's talk about every things from our soul.
-2009/11/6 秋の日
______- An autumn day
-2009/10/29 キハ22
______- 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)へも登録しています。

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

09/11/06 18:27
Visual Basic から Microsoft SQL Server にアクセスするプログラミングの解説本を探してみた。この分野は結構少ないなあ。Olacleや他のRDB、PHPやJava関連の本は結構あるがなあ。この分野を詳しく習うのは講習会などにいったり、研修を受けてやるのが普通なのかな。
09/11/01 10:19
VisualBasic2008上で作ったデータベースにアクセスしてみる。

ボタン1 接続の試験
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
ボタン2 データベースから読み込む
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
09/10/30 17:06
ボタン1 接続の試験
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
ボタン2 データベースから読み込む
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
昔撮ったキハ22の画像が出てきた。三角線の赤瀬駅での風景。
An image of KIHA22 which I took came out in old days images. The scenery at Akase Station of the MISUMI line.

09/10/29 17:48
An image of KIHA22 which I took came out in old days images. The scenery at Akase Station of the MISUMI line.
09/10/27 13:11
Windows7発売に呼応して、Appleはネガティブキャンペーンを張っている。
ううむ、すばらしい内容。
Apple is opposed to Windows7 release.
Apple performs a negative campaign.
Oh, splendid contents.

(http://www.apple.com/getamac/ads/)
09/10/26 17:58
ううむ、すばらしい内容。
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.
09/10/23 20:25
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.
09/10/22 18:58
09/10/21 21:37





家族湯的温泉





































