现在再做毕业设计，人事工资管理系统 前台vb后台sql
参考一本书所附赠光盘中代码，数据库已连接上，ADO控件也已连接
运行时提示找不到工程或库
急求解决方法？？？？？？？？？谢谢
Public Function Adodc(conString As String, adodc_name As Adodc, grid As DataGrid)
Dim cnStr As String
cnStr = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=Wage;Data Source=busywxp"
With adodc_name
.ConnectionString = cnStr
.CommandType = adCmdText
.RecordSource = conString
Set grid.DataSource = adodc_name
.Refresh
End With
End Function
出现提示找不到工程或库后以上蓝色代码段，被选中。

如有解决方法或需求详细代码 给我发邮件谢谢 fffff-303@163.com

Public Function Adodc1(conString As String, adodc_name As New Adodc, grid As DataGrid)
Dim cnStr As String
cnStr = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=Wage;Data Source=busywxp"
With adodc_name
.ConnectionString = cnStr
.CommandType = adCmdText
.RecordSource = conString
Set grid.DataSource = adodc_name
.Refresh
End With
End Function

我想你的计算机中有些控件或库没有安装正确
不知道你为什么说已经连上数据库，程序已经连上数据库了吗
你要提问题应该把出问题的详细情况说明清楚
你上面的代码就是用来连接数据库并用conString填充grid的

把表示菜单里面的参照点一下，然后在弹出的窗口里面找到microsoft activex data objects 2.0 library,`把前面的复选框打勾

运行时提示找不到工程或库，然后出现丢失data dynamics activereports 2.0和丢失crystal report 8 active designer run time libiary

这一项在工程 引用里面前面已经打勾了 ，谢谢

具体需要添加什么控件，还有系统中报表管理系统是由水晶报表制作，需要安装吗？

你试着把那两个丢失的引用去掉

连接跟他们没关系

如果你还没解决问题
把代码发给我，我帮你调试看看
huangwy6312@263.net