Private Sub Form_Load()
Set conn = New ADODB.Connection
conn.ConnectionString = "DSN=xidianDBS;UID=;PWD="
conn.Open
Set Rs = conn.Execute("select * from project ")
End Sub
运行后出现对象名Project 无效
恳求各位高手帮忙

conn Rs 要先定义

查询的数据名呢？？？？？

[此贴子已经被作者于2006-5-29 8:43:56编辑过]

project 应为数据库中的有效表的名称
project 在你的数据库中不存在才报这个错
一家之言 见笑 呵呵

去看看这方面的书吧,或是在网上找找别人的VB加数据库的程序原码学习一下~~~

要先定义 rs
dim rs as ADODB.Recordset

还有project是不是数据表名呀???? 要是表名才行呀!