tagCANDY CGI VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
[ツリー表示へ]  [ワード検索]  [Home]

タイトル Re^3: Catchを通ってしまいます。
投稿日: 2007/08/09(Thu) 11:01
投稿者大吉末吉
> ありがとうございます。このコードの中に間違いがあるのでしょうか?

これって、Modeが「0じゃ無いとき」に「Sql」に何も設定されませんが・・・


> emplCD = Me.TextBox1.Text
>         emplNM = Me.TextBox2.Text
>         furigana = Me.TextBox3.Text
>         If Mode = 0 Then
>             Sql = ""
>             Sql &= "INSERT INTO "
>             Sql &= "KYU "
>             Sql &= "("
>             Sql &= "社員コード" & ", "
>             Sql &= "社員名" & ", "
>             Sql &= "フリガナ" & ") "
>             Sql &= "VALUES "
>             Sql &= "("
>             Sql &= "'" & emplCD & "'" & ", "
>             Sql &= "'" & emplNM & "'" & ", "
>             Sql &= "'" & furigana & "'"
>             Sql &= ")"

         Else

>             Sql = ""
>             Sql &= "UPDATE"
>             Sql &= " " & "KYU"
>             Sql &= " " & "SET"
>             Sql &= " " & "社員コード " & "= "
>             Sql &= "' " & emplCD & "'" & ","
>             Sql &= " " & "社員名 " & "= "
>             Sql &= "'" & emplNM & "'" & ","
>             Sql &= " " & "フリガナ " & "= "
>             Sql &= "'" & furigana & "'" & ","
>             Sql &= " " & "WHERE " & "("
>             Sql &= " " & "社員コード"
>             Sql &= " " & "="
>             Sql &= "'" & Mid(CStr(Code), 1, 4) & "'" & ")"
>         End If

の間違いとか・・・

- 関連一覧ツリー をクリックするとツリー全体を一括表示します)

古いスレッドにレスはつけられません。