vb.net的數據庫連接

1·綁定數據源來進行連接

成都創新互聯公司專注于鶴城網站建設服務及定制，我們擁有豐富的企業做網站經驗。 熱誠為您提供鶴城營銷型網站建設，鶴城網站制作、鶴城網頁設計、鶴城網站官網定制、成都小程序開發服務，打造鶴城網絡公司原創品牌,更為您提供鶴城網站排名全網營銷落地服務。

2.用代碼連接

先到數據庫建立一個數據庫和相應的表

連接數據庫的代碼：

Dim str As String = "Data Source=服務器名;Initial Catalog=數據庫名;Persist Security Info=True;User ID=;Password="

dim conn As SqlClient.SqlConnection

try

conn = New SqlClient.SqlConnection

conn.ConnectionString = str

conn.Open()

Return True

Catch ex As Exception

MsgBox(ex.ToString)

Return False

End Try

登錄代碼：Dim str As String = "Data Source=服務器名;Initial Catalog=數據庫名;Persist Security Info=True;User ID=;Password="

dim conn As SqlClient.SqlConnection

conn = New SqlClient.SqlConnection

conn.ConnectionString = str

conn.Open()

sqlstr = "Select * From Amd Where AmdName='" TextBox1.Text "' And AmdPwd = '" TextBox2.Text "'"

Dim sqlcmd As SqlClient.SqlCommand = New SqlClient.SqlCommand(sqlstr, conn)

Dim dr As SqlClient.SqlDataReader

dr = sqlcmd.ExecuteReader

If dr.Read = True Then '判斷一條記錄為真

kf.Show() '顯示下個窗體

Me.Hide() ’隱藏當前窗體

Else

MessageBox.Show("輸入信息有誤！", "提示")

TextBox1.Text = ""

TextBox2.Text = ""

End If

VB.NET怎樣連接數據庫

Imports System.Data

Imports System.Data.SqlClient

Module 連接數據庫

Public Server1 As String

Public DataBase1 As String

Public Function GetTable(ByVal sqlstr$) As DataTable

Dim SqlConn As SqlConnection = New SqlConnection("server=" Server1 ";database=" DataBase1 ";integrated security=true") '聲明這些SQL的類

Dim facDataAdapter As SqlDataAdapter = New SqlDataAdapter

Dim SqlComm As SqlCommand = New SqlCommand(sqlstr, SqlConn)

facDataAdapter.SelectCommand = SqlComm

Dim dt As DataTable = New DataTable

facDataAdapter.Fill(dt)

Return dt

End Function

End Module

vb.net 使用模塊連接數據庫

你說這么一大篇全是業務邏輯，沒說明你遇到的技術性問題在哪

.net自帶的config文件來配置連接字符串，比ini好N倍，如果你非要用ini那么自己解決問題

檢測是否能連接用Connection.Open加try catch就可以

vb.net 怎么操作數據庫

如果樓主熟悉VB6，可以直接在項目中添加ADODB的Com引用，這樣你就可以像VB6那樣操作數據庫了！

另外

.NET

Framework中連接數據庫要用到ADO.NET。如果要操作Access數據庫，要用到System.Data.OleDb命名空間下的許多類。

比如按樓主所說，“我想在textbox1中顯示表一中【一些數據】字段下的第一個內容”：

'首先導入命名空間

Imports

System.Data

Imports

System.Data.OleDb

'然后在某一個事件處理程序中寫：

Dim

conn

As

New

OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data

Source=數據庫.accdb;Jet

OLEDB:Database

Password=MyDbPassword")

Dim

command

As

New

OleDbCommand("Select

*

From

數據表",

conn)

conn.Open()

'打開數據庫連接

Dim

reader

As

OleDbDataReader

=

command.ExecuteReader()

'執行SQL語句，返回OleDbDataReader

對象

Do

While

reader.Read()

'讀取一條數據

textbox1.Text

+=

reader("一些數據")

VbCrLf

Loop

reader.Close()

'關閉OleDbDataReader

conn.Close()

'關閉連接

本文題目：vb和net連接數據庫 vbnet數據庫編程
當前路徑：http://vcdvsql.cn/article6/doiscog.html

成都網站建設公司_創新互聯，為您提供網站制作、小程序開發、App開發、網頁設計公司、建站公司、手機網站建設

廣告

聲明：本網站發布的內容（圖片、視頻和文字）以用戶投稿、用戶轉載內容為主，如果涉及侵權請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網站立場，如需處理請聯系客服。電話：028-86922220；郵箱：631063699@qq.com。內容未經允許不得轉載，或轉載時需注明來源： 創新互聯