中科新闻网李晓林资产:刚刚学VB6，如何读取ACCESS数据库中的某一字段
来源：百度文库 编辑：中科新闻网 时间：2024/05/12 06:53:30
我只能用DATA控件，文本框显示出来我要得字段，可是我想要把这个字段提取出来。我就不知道，万分的谢谢您的回答
比如文本1，已经帮定DATA1，显示了“filepath”字段的内容。那我如何让文本2也显示同样的内容（不帮顶），text1.text=data1.recordset.fields("filepath")。这样行不
比如文本1，已经帮定DATA1，显示了“filepath”字段的内容。那我如何让文本2也显示同样的内容（不帮顶），text1.text=data1.recordset.fields("filepath")。这样行不
提取到什么地方？
要提取的地方=data1.recordset.fields("字段名")
用data.fileds("字段")
我给你一个例子：
我的数据库在桌面上：名叫test
Public cnn As New ADODB.Connection
'这建立一个连接。
Private Sub Command1_Click()
Dim rst As New ADODB.Recordset
Dim sql As String
sql = "select * from test where ID='1'"
rst.CursorLocation = adUseClient
rst.Open sql, cnn, adOpenStatic, adLockReadOnly
Me.Text1.Text = rst.Fields("ID").Value
Me.Text2.Text = rst.Fields("test2").Value
Set Me.DataGrid1.DataSource = rst
End Sub
Private Sub Form_Load()
Dim Connectionstring As String
Connectionstring = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Documents and Settings\Administrator\桌面\test.mdb;Persist Security Info=False"
cnn.Open Connectionstring
End Sub