db와 연동하는 방법은 두가지 있다.
하나는 odbc를 이용한 방법과 다른 하나는 oledb를 이용하는 방법인데 오늘시간에 연설할 내용은
두번째 방법이다.
oledb로 연결하기위해서는 mysql 홈페이지를 접속하여 connect 드라이버를 받아야 한다.
그리고 아래와 같이 네임스페이스를 추가한다.
Imports MySql.Data.MySqlClient 'oledb를 이용하기 위한 네임스페이스 추가.
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
'================================================
' 데이터베이스 연결
'================================================
If Not conn Is Nothing Then conn.Close()
Dim connStr As String
connStr = String.Format("server=localhost;user id=아이디; password=비번; database=데이터베이스명; pooling=false")
Try
conn = New MySqlConnection(connStr)
conn.Open()
TextBox1.Text = "데이터베이스 연결성공"
GetDatabases()
Catch ex As MySqlException
MessageBox.Show("Error connecting to the server: " + ex.Message)
TextBox1.Text = "데이터베이스 연결실패"
End Try
End Sub
Private Sub GetDatabases()
Dim reader As MySqlDataReader
reader = Nothing
Dim sql As String = "SELECT name From test;"
Dim cmd As New MySqlCommand(sql, conn)
Try
reader = cmd.ExecuteReader()
'databaseList.Items.Clear()
While (reader.Read())
'databaseList.Items.Add(reader.GetString(0))
MsgBox(reader.GetString(0))
End While
Catch ex As MySqlException
MessageBox.Show("Failed to populate database list: " + ex.Message)
Finally
If Not reader Is Nothing Then reader.Close()
MsgBox("데이터가 없습니다.")
conn.Close()
End Try
End Sub
이소스는 사실 mysql에서 제공되는 소스이다. 천천히 보면 누구나 따라할 수 있다. 연결하는 부분부터 연결끊는부분까지 자세하게 소스가 정의되어 있기 때문이다.
이소스를 조금 응용하면 테이블 추가및 삭제 수정 조회 기능을 구현할 수 있다.
'객체지향언어 > Visual Basic' 카테고리의 다른 글
| 오토수강신청프로그램 V1.0 (0) | 2010.08.15 |
|---|---|
| recordset으로...전체 레코드 구하기 (0) | 2010.06.10 |
| 파포인트 spread에서 엑셀저장시 lock을 풀기위해서는... (0) | 2010.06.10 |
| LostFocus는 이럴때 사용한다. (0) | 2010.06.02 |
| MASK + Format 을 이용한 여러가지 표현방식 (0) | 2010.06.02 |
