[求助][VBA]VBA高手!数据库链接问题!
斑竹及各位大虾:我欲将图内房子中的数字代码作为ID链接字段和数据库(access)相链接,用VBA编程,我现在可以用VBA读出数据库中的记录值,也可以读出房子中的ID值,我怎样用VBA编程自动的将房子和对应的数据库纪录链接起来,因为房子很多,图幅也很多我不可能用手工一个一个的去链接,站长的“autoCAD VBA开发精彩实例教程”中<BR>好像也没有相关的内容!感谢大家!图和数据库在附件中,(我是CAD R2000版本)按ID查询,你的图纸上有房子的ID号麽 房子上有ID号,图上和数据库中都有! 你是想达到什么样的效果?将房子和对应的数据库纪录链接起来干什么?
把问题写清楚 在2000中进行查询操作呀!因为图形要和数据库中的纪录链接,如果用手工操作,可以用菜单中的tools/dbconnect,一个一个的逐纪录链接,但是那样太麻烦、工作量太大,所以我想用VBA编写一个程序,因为房子中已经提前标注了ID,数据库中也有iD,我只要搜索出ID值一样的纪录,将其与房子链接起来就行了。一点击房子查询数据库,就可以查询出房子的属性!图和数据库都在一楼!多谢大虾! 用ADO控件或对象连接Access数据库,再做个查询不就完了 我现在要做的不是链接不上,可以链接,需要手工选择一个对象,然后再选择一个纪录链接,但是我的房屋很多,我不可能用手工去做,我的意思是用程序怎么实现自动链接,你说的方法可以去读取数据库,最数据库进行操作,但是链接怎么做???手工做法是用菜单中的tools/dbconnect!谢谢! 用Adodc和DataGrid控件不要任何代码就可以链接数据库,
把VB的数据库的操作找本书看看 给你一段代码慢慢研究吧Dim mycon As New ADODB.Connection
Dim myrs As New Recordset
Private Sub Form_Load()
mycon.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Program Files\Microsoft Visual Studio\VB98\Nwind.mdb;Persist Security Info=False"
mycon.Open
myrs.ActiveConnection = mycon
myrs.CursorType = adOpenDynamic
myrs.CursorLocation = adUseClient
myrs.Open "select * from Categories"
Set DataGrid1.DataSource = myrs
DataGrid1.Refresh
End Sub红色的部分自己改成你连接的数据库名和表名 多谢楼上!我试试!
页:
[1]
2