佳礼资讯网

 找回密码
 注册

ADVERTISEMENT

查看: 1492|回复: 5

VB 6.0 link Microsoft Access database

[复制链接]
樱木 该用户已被删除
发表于 24-11-2004 06:30 PM | 显示全部楼层 |阅读模式
我想link vb 去access to retrieve the data....
请问,能怎么样作呢?
回复

使用道具 举报


ADVERTISEMENT

发表于 24-11-2004 06:51 PM | 显示全部楼层
用ADODC是最容易了。。。
回复

使用道具 举报

De 该用户已被删除
发表于 25-11-2004 12:47 AM | 显示全部楼层
也可以drag 一个叫Data的 control 进你得form,然后再properties里选 DatabaseName,locate 你得access file,就可以了,不必用 coding 来 link, 既简单又容易。
回复

使用道具 举报

樱木 该用户已被删除
 楼主| 发表于 25-11-2004 12:37 PM | 显示全部楼层
哦,谢谢你们。

那么如果我用De的method,要怎样来retrive data to text box(example)
回复

使用道具 举报

发表于 25-11-2004 12:42 PM | 显示全部楼层
樱木 于 25-11-2004 12:37 PM  说 :
哦,谢谢你们。

那么如果我用De的method,要怎样来retrive data to text box(example)



Don know is wat u want or not ??
example:

SQL = "select * from Emp where EmpNo = '123'"
Set rstA = New ADODB.Recordset
rstA.Open SQL, ConStr, adOpenDynamic, adLockOptimistic, adCmdText
  
If Not rstA.EOF Then
            With rstA
                txtName = !EmpName
            End With
End If
回复

使用道具 举报

De 该用户已被删除
发表于 25-11-2004 12:47 PM | 显示全部楼层
With Data1
   .recordsource = 你得SQL query (example: SELECT a FRom Tbl)
   .refresh
   if .recordSet.RecordCount > 0 then  '如果有data
       txtBox.text = .recordSet!a
   end if
end with
回复

使用道具 举报

Follow Us
您需要登录后才可以回帖 登录 | 注册

本版积分规则

 

ADVERTISEMENT



ADVERTISEMENT



ADVERTISEMENT

ADVERTISEMENT


版权所有 © 1996-2023 Cari Internet Sdn Bhd (483575-W)|IPSERVERONE 提供云主机|广告刊登|关于我们|私隐权|免控|投诉|联络|脸书|佳礼资讯网

GMT+8, 24-5-2024 05:30 AM , Processed in 0.054018 second(s), 25 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表