データベース接続


  SQLServer : System.Data.Odbc( Framework )



  
Imports System.Data.Odbc

Module MyModule

' ********************************************************
' 実行
' ********************************************************
Sub Main()

	Dim myConnectString As String = _
		"Driver={SQL Server};" + _
		"SERVER=localhost;" + _
		"DATABASE=mydb;" + _
		"UID=sa;" + _
		"PWD="
	Dim myCon As New OdbcConnection()
	myCon.ConnectionString = myConnectString
	myCon.Open()

	Dim myQuery As String = "SELECT * from 社員マスタ"
	Dim myCommand As New OdbcCommand()
	myCommand.CommandText = myQuery
	myCommand.Connection = myCon

	Dim myReader As OdbcDataReader
	myReader = myCommand.ExecuteReader()
	Dim fld As Integer = 0
	Do While myReader.Read()
		fld = myReader.GetOrdinal("氏名")
		Console.WriteLine(myReader.GetString(fld))
	Loop
	myReader.Close()
	myCon.Close()

End Sub

End Module
  










  infoboard   管理者用   
このエントリーをはてなブックマークに追加




SQLの窓  天気  IT用語辞典
Yahoo!ニュース  マルチ辞書
PHP マニュアル  Google URL短縮 


フリーフォントWEBサービス
SQLの窓WEBサービス

SQLの窓フリーソフト

素材

一般WEBツールリンク

SQLの窓

フリーソフト

JSライブラリ