『壹』 VB如何從資料庫讀取指定數據
vb綁定數據方法:
通過datasource屬性綁定
比如使用資料庫控制項
datasource
控制項會出現一個下拉框
選擇需要綁定的數據控制項,然後設置datamember綁定表,datafield綁定具體欄位;也可以使用代碼綁定
例如
set
list1.datasource=adodc1.recordset
list1.refresh'刷新
『貳』 vb從資料庫中讀取數據
看天書呢!
方法太多,你要那種
『叄』 VB讀取資料庫方法
可以用ADODB,先定義
Dim cnn
As
New
ADODB.Connection
Dim rs
As
New
ADODB.Recordset
這兩個cnn用來連接資料庫rs用來讀取資料庫中的值,然後用循環遍歷rs將值ADD到listview裡面
修改和保存可以做成同一個按鈕保存就是遍歷listview將數據UPDATE到資料庫裡面就行!
『肆』 vb 如何讀取資料庫一行數據
不知道你數據表中那一列數據是什麼類型的數據,所以我全部按字串來處理。
首先聲明一個數組,和即將用來計數的數字:
dim nums() as stringDim i As Integer = 0mycon.open '然後,連接資料庫,按你的聲明來:dim mycom as new sqlcommand("select * from 你要讀取數據的表", mycon)'接下來,聲明一個執行資料庫語句命令的com:'然後,對資料庫返回的結果進行操作(一般會將執行結果存放起來,再操作,我這里省去了存放這步):With mycom.ExecuteReader() '對返回的結果,即查詢到的表進行操作 If .HasRows Then '判斷是否有數據,有數據就進入下面進行讀取 Do While .Read '讀取一行數據 If Not (String.IsNullOrEmpty(.GetString(0))) Then '檢查表列的數據是否為空,不為空就進入下面,進行保存。這里要說下getstring這個,是讀取某列數據中的字串,如果該列數據不是字串,那麼需要用getvalue(0),0代表該列在表中的位置,從0開始,即0表示第一列。 ReDim Preserve nums(i) '重置數組大小,即為即將要保存的數據准備一個位置 nums(i) = .GetString(0) '將數據放入到數組中 i = i + 1 '循環,直到結束 End If Loop End If End Withmycon.close '最後記得要關閉資料庫連接
數據存入數組很簡單,其實難點是連接資料庫,從資料庫拿數據,這難點原理簡單,但因為格式,數據類型等問題,很容易出錯。
以上,數據到了數組,你應該會操作了吧。其實建議直接對從資料庫返回的結果進行操作,不需要用數組的。
『伍』 VB如何通過time控制項定時給資料庫輸入數值
time的事件里,把數據寫入資料庫唄
『陸』 VB中利用timer事件每隔一定時間連接SQL資料庫,實時讀取裡面的數據。為什麼另外的timer事件會受到影響。
二個不同的時間設計必須使用二個不同的Timer控制項,例如對Picture2的時間使用Timer1控制項,連接SQL資料庫使用Timer2控制項。
『柒』 想用VB編一個程序讀取sql資料庫中的內容
不同的計算機安裝SQL的連接是不同的.
關於連接總結如下:
ADODB編碼連接字的實例
VB中,關於SQL資料庫的連接是比較復雜的,但也有一個可以參考的學習思路,方法如下。
1、建立資料庫鏈接
在工具條中,有一個「數據視圖窗口」的工具,用它可以建立各種資料庫的鏈接。建立鏈接的過程:
點擊「數據視圖窗口」,出現「數據視圖」窗體,點擊選中「數據鏈接」,按右鍵,點擊「添加數據鏈接」,出現「數據鏈接屬性」窗口,有四個菜單:「提供程序」、「連接」、「高級」、「所有」。
選中「提供程序」菜單,這里有許多用於鏈接的驅動程序,選中「Microsoft OLE DB Provider for SQL Server」,點擊「下一步」。「Microsoft OLE DB Provider for SQL Server」是真正的SQL資料庫連接字用的驅動程序。
當選中「Microsoft OLE DB Provider for SQL Server」,點擊「下一步」,則自動進入「連接」窗體界面。這個「連接」窗體界面的內容,隨前面選取的驅動程序而定。
因為前面選擇的是「Microsoft OLE DB Provider for SQL Server」,所以,「連接」窗體的主要內容就是直接訪問SQL資料庫的相關內容的設置,如下:
在「…….伺服器名稱」一欄中怎麼選擇呢?如SQL資料庫伺服器安裝時是選擇當地默認的實例,即以本地計算機名代替的伺服器,則此處應填寫的內容是:(local),或者是:本地的計算機名。估計,非本地的則可填寫:伺服器的IP地址或伺服器名稱。
在「輸入登錄伺服器的信息」一欄中怎麼選擇呢?當選擇「使用指定的用戶名和密碼」一項時,用戶名與密碼是在SQL伺服器安裝時選定的內容(值)。若不用密碼及用戶名登入,則連接字的密碼應代之為:Integrate Security=SSPI,表示用「Windows NT 集成安全設置」之意,SQL2005是用這一項的。但實際的ADODB的連接字是不能用這個NT打開的。
在「伺服器上選擇資料庫」一欄中怎麼選擇呢?當前面兩項內容選擇正確後,此處的內容是存在可選的,選中即可。
最後「測試連接」,顯示成功。則在「數據視圖」窗體的「數據鏈接」中將出現「Datelink1」,表示建立了以「Datelink1」為名的第1個資料庫鏈接。當然也可以建立多個,名字將分別為「Datelink2」、「Datelink3」……
2、從已建立的資料庫鏈接的屬性中找連接字。
當選中「數據視圖」窗體的「數據鏈接」,出現「Datelink1」,並選中「Datelink1」,按右鍵出現彈出菜單,選中「屬性」,點擊,並可看見這個鏈接所用到的名字「Name」,「Name」對應的值,就是連接字的主要內容。只是缺少「Password= 」與「 .ConnectionTimeout= 」,因此只要把這兩向補齊,就是一個完整可用的ADODB的連接字,而且也適用於ADODC控制項的字連接,即ConnectionString,但不需要雙引號「」而已。
注意:在前面「數據鏈接屬性」窗口的四個菜單「提供程序」、「連接」、「高級」、「所有」中,前面只重點介紹了「提供程序」與「連接」兩項,實際上,「高級」就有ConnectionTimeout屬性的選擇項。而「提供程序」、「連接」、「高級」三項的選擇結果,都在「所有」項中集中顯示出來,而且「所有」項中,還有前三項不具有的其它的內容,因此,要注意察看與應用。
Command1_Click()
Me.Caption = "NAME"
Me.Cls
Dim con As ADODB.Connection (註:ADODC控制項用的申明,不用ADODB,也不用Adodc。)
Dim rs As New ADODB.Recordset
Set con = New ADODB.Connection
con.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=SQL資料庫名;Data Sure=(local);Password=密碼值(註:無時不選此項);Use Procere for preplare=1;Auto Translate=True;Packet Size = 4096;Workstation ID=(local)(註:或是區域網的機器名);Use Encryption for Date=False;Tag With column collation when Possible=False"
con.Open
rs.Open "Select * from SQL資料庫表或視圖名 ", con
Me.AutoRedraw = True
rs.MoveFirst
Dim ptr As Integer
For ptr = 0 To 20
Print rs.Fields(ptr).Name, 注:Name表示是表格的列名。
Next ptr
While Not rs.EOF()
Print
For ptr = 0 To 20
Print rs.Fields(ptr).Value, 注:Value表示是表格的數值。
Next ptr
rs.MoveNext
Wend
End Sub
用ADODC方法更簡單:
在窗口中建立:Command1,CAdodc1及DataDrid1,設置好CAdodc1的連接屬性,見前所述.
Command1_Click()
Me.Caption = "NAME"
Me.Cls
Set DataDrid1=Adodc1
End Sub
『捌』 請問怎麼用VB6.0動態自動隔一秒從一個Access資料庫讀取一行多欄位的數據啊
用時鍾控制項 時間間隔為孝昌租1000ms 每讀一條 next 一次 if eof = true then msgbox("迅瞎已讀完!") 這是大致方巧兆法。