當前位置:首頁 » 數據倉庫 » vbnet鏈接資料庫
擴展閱讀
webinf下怎麼引入js 2023-08-31 21:54:13
堡壘機怎麼打開web 2023-08-31 21:54:11

vbnet鏈接資料庫

發布時間: 2023-02-09 21:23:12

① vb.net如何連接遠程db2資料庫

如果要程序直接連接DB2資料庫,必須要有連接資料庫的驅動程序,連接的代碼,你可以參考如下(以前用C#寫的,你改成VB.NET即可,ODBC連接對象)

publicOdbcConnectionDb2Conn()
{
stringstr="DRIVER=IBMDB2ODBCDRIVER;UID=db2admin;PWD=db2admin;AUTHENTICATION=SERVER;PORT=50000;HOSTNAME=192.168.100.98;PROTOCOL=TCPIP;DATABASE=YCDATA";
OdbcConnectionConn=newOdbcConnection(str);
returnConn;
}

如果你是開發桌面程序而又不想在客戶端安裝資料庫的驅動程序,那麼你可以採用web網站(含webservice)或者remoting方式,只需要在服務端安裝驅動即可

② 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對SQL資料庫怎樣連接啊求代碼

VB.NET中有控制項可以真接接點擊屬性進行連接配置.
SqlConnect數據連接控制項.點擊ConnectionString屬性進行配置就可以了.
VB.NET中沒有RecordSet了.取而代之的是DataSet.
在VB.net中可以先用SqlConnection對像來連接資料庫再用SqlDataAdapter對像來讀取數據並填充到DataSet里.然後就可以進行數據綁定了.
例:
dim
conn
as
SqlConnection
dim
da
as
SqlDataAdapter
dim
ds
as
Dataset
set
conn
=
new
SqlConnection
conn.ConnectionString="server=serverIP;database=databasename;uid=userid;pwd=password";
conn.open
da
=
new
SqlDataAdapter
(,conn)
da.fill(ds)

④ vb.net的資料庫怎麼連接啊

Dim
sqlConnection1
As
SqlClient.SqlConnection
Dim
strConnect
As
String=」data
source=伺服器名;initial
catalog=資料庫名;user
id=sa;password=;」
sqlConnection1=New
System.Data.SqlClient.SqlConnection(strConnect)
sqlConnection1.open
『打開資料庫
sqlConnection1.close
『關閉連接,釋放資源
1)連接Sql
Server資料庫
Dim
odbcDbConnetion1
As
Microsoft.Data.OdbcConnection
Dim
strConnect
As
Sting=」Driver={SQL
Server};Server=伺服器名;Uid=sa;pwd=;Database=
資料庫名;」
odbcDbConnetion1=New
Microsoft.Data.OdbcConnection(strConnect)

⑤ VB.net連接資料庫創建新欄位並對其進行賦值

首先打開數據源,然後使用alter table語句即可,具體範例如下:

Set cn = New ADODB.ConnectionSet rs = New ADODB.Recordsetconstr = "DRIVER=Microsoft Access Driver (*.mdb);DBQ=" & 資料庫路徑及文件名 & ""cn.Open constrDim str As Stringstr = "alter table 表名 add 欄位 類型"rs.Open str, cn, adOpenStaticmsgbox"添加欄位成功",vbokonly