誰(shuí)能給個(gè) vb.net 異步，多線程查詢SQL數(shù)據(jù)實(shí)例。C/S程序的

1.配置SQLServer外圍應(yīng)用服務(wù)器,開(kāi)啟SQL2005遠(yuǎn)程連接功能：

成都創(chuàng)新互聯(lián)公司認(rèn)為，企業(yè)網(wǎng)站是要賦予品質(zhì)、思維、人性，深入到用戶內(nèi)心的細(xì)膩情感，才能真正稱得上企業(yè)網(wǎng)站。成都創(chuàng)新互聯(lián)公司根據(jù)每位用戶內(nèi)心最深的需求網(wǎng)站建設(shè)服務(wù)，堅(jiān)實(shí)的設(shè)計(jì)執(zhí)行是品牌長(zhǎng)期視覺(jué)塑造的重要支持。

操作方式如下，點(diǎn)擊“配置工具”-“SQLServer外圍應(yīng)用配置器”，然后在打開(kāi)的窗口中選擇“服務(wù)和連接的外圍應(yīng)用配置器”-然后選擇Database Engine節(jié)點(diǎn)下的 “遠(yuǎn)程連接”，選擇“本地連接和遠(yuǎn)程連接”，同時(shí)選擇“同時(shí)使用TCP/IP和named pipes”，確定后然后需要重新啟動(dòng)數(shù)據(jù)庫(kù)服務(wù)就可以了。

2.把登陸設(shè)置改為SQLServer 和 Windows 身份驗(yàn)證模式，具體設(shè)置如下:

打開(kāi)SQLServer Management Studio管理器，點(diǎn)擊服務(wù)器上面右鍵然后查看屬性，在安全性選項(xiàng)里面對(duì)服務(wù)身份驗(yàn)證選擇“SQLServer 和 Windows 身份驗(yàn)證模式”。

你好！有沒(méi)有vb.net對(duì)SQL數(shù)據(jù)庫(kù)進(jìn)行增刪改查的例子

一般都是vb.net傳入?yún)?shù) 交給存儲(chǔ)過(guò)程去做的 你是要在vb.net前臺(tái)就執(zhí)行的例子 還是想要調(diào)用存儲(chǔ)過(guò)程的例子

前臺(tái)的一般就是這樣

Dim paras As New NameValueCollection

paras .Append("delete from T_AlarmConfig ")

paras .Append(" where AlarmConfigID=@AlarmConfigID")

調(diào)用存儲(chǔ)過(guò)程的就是給寫存儲(chǔ)過(guò)程了，這是調(diào)用存儲(chǔ)過(guò)程的例子，只能理解理解

''' summary

''' 刪除數(shù)據(jù)

''' /summary

''' param name="procName"存儲(chǔ)過(guò)程名/param

''' param name="paras"存儲(chǔ)過(guò)程參數(shù)/param

''' remarks

''' 2006-5-29　zhuzh Created

''' /remarks

Public Sub DeleteData(ByVal procName As String, _

ByVal paras As NameValueCollection, _

Optional ByVal timeout As Integer = 30)

eventCount += 1

'存儲(chǔ)過(guò)程參數(shù)名數(shù)組

Dim paraNames As String() = {}

'存儲(chǔ)過(guò)程參數(shù)值數(shù)組

Dim paraValues As String() = {}

'傳入的參數(shù)轉(zhuǎn)化成數(shù)組

Me.ConvertNameValueCollection(paras, paraNames, paraValues, STATUS_UPDATE)

'判斷系統(tǒng)類型調(diào)用相應(yīng)模塊的方法

If isWebSys Then

DeleteDelegateInstance = AddressOf webGw.ExecProc

Else

DeleteDelegateInstance = AddressOf AdoGw.ExecProc

End If

Dim ret As Integer = 0

Dim ds As New DataSet

'----guojun 2008-1-2 add-----

If timeout 60000 Then

timeout = 60000

End If

'--------防止超時(shí)異常--------

DeleteDelegateInstance.BeginInvoke(procName, ret, ds, paraNames, paraValues, timeout, _

AddressOf DataDeletedCallBack, Nothing)

End Sub

如何用VB.NET中的listview顯示SQL數(shù)據(jù)庫(kù)中的數(shù)據(jù)？能給我個(gè)完整的實(shí)例嗎？謝謝！

'數(shù)據(jù)庫(kù)連接函數(shù),其中mysql(數(shù)據(jù)集連接語(yǔ)句),sqlip(SQL服務(wù)器IP),rsmod(數(shù)據(jù)庫(kù)打開(kāi)模式)為動(dòng)態(tài)取值

Public Function myRs(ByVal mySQL As String, ByVal sqlIP As String, ByVal rsMod As Integer) As ADODB.Recordset

Dim myConn As New ADODB.Connection

If myConn.State = 1 Then

myConn.Close()

End If

If rs.State = 1 Then

rs.Close()

End If

myConn.ConnectionString = "Provider = Sqloledb;SERVER=" sqlIP ";uid=sa;pwd=;database=school"

myConn.Open()

rs.Open(mySQL, myConn, 1, rsMod)

myRs = rs

End Function

'顯示列表內(nèi)容函數(shù),該函數(shù)能顯示兩個(gè)子項(xiàng)

Public Function addLst() As Boolean

lstUser.Clear()

mySql = "select * from sqlusers"

rs = myRs(mySql, sqlIP, 1)

lstUser.View = View.Details

Dim i As Integer

If rs.Fields.Count 0 Then

'添加列表框列標(biāo)題項(xiàng)目

For i = 1 To rs.Fields.Count

lstUser.Columns.Add(rs.Fields.Item(i - 1).Name)

Next

'添加列表框數(shù)據(jù)內(nèi)容

If rs.RecordCount 0 Then

rs.MoveFirst()

For i = 1 To rs.RecordCount

lstUser.Items.Add(rs("用戶名").Value)

lstUser.Items.Item(i - 1).SubItems.Add(rs("密碼").Value)

lstUser.Items.Item(i - 1).SubItems.Add(rs("用戶類型").Value)

rs.MoveNext()

Next

End If

End Function

以上是我剛剛寫完的,調(diào)試通過(guò),希望對(duì)你有用.

請(qǐng)各位大俠給出用VB.NET連接oracle數(shù)據(jù)庫(kù)并執(zhí)行sql查詢語(yǔ)句的代碼示例，謝謝！！

Dim OraSession As Object '會(huì)話對(duì)象

Dim OraDatabase As Object '數(shù)據(jù)庫(kù)對(duì)象

Dim OraDynaset As Object'動(dòng)態(tài)集對(duì)象

Dim OraDatabase As Object’字段集對(duì)象

Set OraSession =CreateObject("OracleInProcServer.XOraSession")

Set OraDatabase=OraSession.CreateDatabase

("Demo","scott/tiger",0)'建立數(shù)據(jù)庫(kù)連接

Set OraDynaset=OraDatabase.CreateDynaset("select*from

student",0)'初始化動(dòng)態(tài)集對(duì)象

’添加記錄

'Begin an AddNew

OraDynaset.DbAddNew

OraDynaset.Fields("ID").value="1000"

’ID為列名

OraDynaset.DbUpdate'更新數(shù)據(jù)到表

’刪除

OraDynaset.DbDelete

'修改

OraDynaset.DbEdit

OraDynaset.Fields("ID").value="101210"

OraDynaset.DbUpdate

網(wǎng)頁(yè)標(biāo)題：vb.netsql實(shí)例的簡(jiǎn)單介紹
分享地址：http://www.jinyejixie.com/article18/hpdddp.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供App設(shè)計(jì)、網(wǎng)站收錄、企業(yè)建站、品牌網(wǎng)站設(shè)計(jì)、網(wǎng)站設(shè)計(jì)、靜態(tài)網(wǎng)站

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請(qǐng)盡快告知，我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng)，如需處理請(qǐng)聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時(shí)需注明來(lái)源： 創(chuàng)新互聯(lián)