VS2010-VB/サンプル/MySQL - プログラミングの勉強をしよう@Wiki

Top > VS2010-VB > サンプル > MySQL

MySQL

前提

.Net用のコネクタをインストールして、参照設定に登録する

サンプル

Imports MySql.Data.MySqlClient
 
Module Module1
 
    Sub Main()
 
        Dim conn As MySqlConnection
        Dim comm As MySqlCommand
        Dim reader As MySqlDataReader
 
        Dim str As String
        Dim sql As String
 
        str = String.Format("server={0};user id={1}; password={2}; database={3}; port={4}; pooling=false", _
                            "192.168.10.14", "root", "mysql", "testdb", "3306")
 
        conn = New MySqlConnection(str)
        conn.Open()
 
        sql = "select * from testtable1"
 
        comm = New MySqlCommand
        comm.Connection = conn
        comm.CommandText = sql
 
        reader = comm.ExecuteReader()
 
        While (reader.Read())
            Dim strfld(reader.FieldCount - 1) As String
            For i As Integer = 0 To reader.FieldCount - 1 Step 1
                strfld(i) = reader(i)
            Next i
            Console.WriteLine(Join(strfld, vbTab))
        End While
 
 
        conn.Close()
 
        Console.Read()
 
    End Sub
 
End Module
 

実行結果

サンプルリスト

クエリー制御

表設定

---