新人プログラマのメモブログ(vb.net)

今回の記事はSQLserver内での記述です。   前回の記事 の詳細説明です。 最新のデータのみを表示させたい場合のselect文です。 例 　　　　　テーブル名　テストテーブル         コード　seq     その他データ・・・・・   001        1         ---　　--- ---     001        2         ---　　--- --- の場合 　   002        1         ---       ---       --- select  test.コード, test.seq, test2.その他のデータ1,test2.その他のデータ2・・・・ from (select コード,max(seq) as seq  from テストテーブル        group by コード)  as test left join テストテーブル as test2 on test.コード = test2.コード and test.seq = test2.seq order by  convert (integer, test.コード) 　結果下のように表示されます。         コード　seq     その他データ・・・・・     001        2         ...

今回の記事はSQLserver内での記述です。 まず状況の説明です。 データベースのテーブルには primarykey(主キー：データを識別するコードなど被らないもの) が２つ設定されている（複合キー）前提です。 一つはコード、一つはseq(シーケンス番号という)。 過去の情報も維持したい場合などにコードのみではなく、シーケンス番号も使います。 データベースのテーブル↓         コード　seq     その他データ・・・・・   001        1         ---　　--- ---     001        2         ---　　--- --- 過去の情報も維持すると、このようにコードが被ります。 普通はコードでレコード（１行）を識別するので、被るとエラーになります。 seqは新しい情報ほど数が大きくなるように登録される前提で、 コードが被っても登録できるように複合キーにしているわけです。 こういった状況での、 最新のデータのみを表示させたい場合のselect文です。 例 　　　　　テーブル名　テストテーブル         コード　seq     その他データ・・・・・   001        1         ---　　--- ---     001        2         ---　　--- --- の場合 　   002        1         ---...

データベースからデータテーブルを取得し、データグリッドビュー(エクセル表みたいなもの)に表示する。 例  (説明有り) (Windows認証の場合です)    ' 変数宣言    Dim serverMei as string = 'ここにサーバー名を記述    Dim DBmei as string = 'データベース名を記述    Dim SQLbun as string = 'SQL文を入れておく select文など    ' 接続するための何かを変数宣言    Dim cn = New System.Data.SqlClient.SqlConnection()      '接続に必要な情報を記述               '(サーバー名、データベース名、セキュリティ方式？、タイムアウト(秒))             cn.ConnectionString =                     "data source = " & serverMei &                     ";initial catalog = " & DBmei &                     ";integrated security = SSPI" &                     ";connection timeout = 30;" 　' 接続   ...