OKINAWA ROBATA すみか屋

ATS1納会

詳細
http://www.churaguru.net/shop/index.aspx?shop_id=sumikaya

地図

無料アンチウィルスソフト

Microsoft
Security Essentials
ダウンロード

avast! Home Edition
解説

レコードの置換処理

文字列の一部だけを置換処理する

UPDATE `op2tabale` SET FilePath=REPLACE (FilePath,"testOCDB","OCDB");

尚、バックスラッシュ(円マーク)はエスケープ文字として同じバックスラッシュを使うので
￥￥（半角）となる

Inspiron™ 545

インテル(R) Core(TM) 2 Duo プロセッサー E7500 (3MB L2 キャッシュ, 2.93GHz, 1066MHz FSB)

Windows(R) 7 Professinal 正規版 (日本語版) 64ビット

4GB (2GBx2) デュアルチャネル DDR2-SDRAM メモリ
2gm 2rx8 pc2 6400u 666 12 e3
M378t5663eh3 cf7
正式規格⇒PC2-6400 DDR2 SDRAM 800MHz Non-ECC
デュアルチャネル

320GB SATA HDD (7200回転)

DVDスーパーマルチドライブ GH30N  (Roxio(R) Burn付属。バックアップメディア添付なし)

インテル(R) グラフィックス・メディア・アクセラレーター 3100 (チップセット内蔵)
PCI Express×16が1つ、PCI Express×1が1つ、PCIが2つ

Fatal error encountered during command execution.

http://blogs.yahoo.co.jp/hilapon/3270487.html

MySQL Connector/NET の例外 MySql.Data.MySqlClient.MySqlException で

Fatal error encountered during command execution.

というメッセージを吐く場合があります。クエリにパラメータを設け MySqlParameter クラスでパラメータを設定しない場合、この例外が発生します。例えば

Dim query AS String = "SELECT * FROM customer WHERE id = @id"
Dim command As New MySqlCommand(query, con)
command.ExecuteNonQuery()

このクエリの場合、パラメータ id には値が割り当てられてないため、MySqlCommand クラスはこの例外を発生します。以下のようにパラメーターを設定すれば、例外は発生しません。 (´∀｀)

Dim query AS String = "SELECT * FROM customer WHERE id = @id"
Dim command As New MySqlCommand(query, con)
command.Parameters.Add(New MySqlParameter("id", 10))
command.ExecuteNonQuery()

また気をつけなければいけないのは、以下のケース。

select @data := 3, @data * 4

この場合、クエリ内でパラメータに値を設定してるから phpMyAdmin や Navicat では正常に実行されます。
しかし MySQL Connector/NET では

Dim query AS String = "select @data := 3, @data * 4"
Dim command As New MySqlCommand(query, con)
command.ExecuteNonQuery()

Fatal error encountered during command execution.

・・・例外が発生します。(-ω-)

MySQL Connector/NET の仕様ということで注意が必要です。
ちなみに SQLClient の場合は・・・・・・・・・忘れた！（＾ω＾）

あと、どのパラメータが設定されてないのか調べるには、例外をウオッチして InnerException プロパティを見れば判ります。このケースでは ?id というパラメータが設定されてないのが判ります。(-ω-)

リモート接続ツール

https://secure.logmein.com/JP/home.aspx

Ctrl+A実装

Private Sub TextBox1_KeyDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyDown
    If e.KeyCode = Keys.A AndAlso e.Control Then
        DirectCast(sender, TextBox).SelectAll()
    End If
End Sub


カスタムコントロールで継承