VB与SQL Server连接的问题

来源：百度知道 编辑：UC知道 时间：2024/06/14 15:04:04
各位大侠你们好，我是一名大学生，在做毕业设计，我有一本书，书里提供了程序的相应vb应用程序，包括整个工程的所有代码，还有一个SQl Server的数据备份文件，我已经将这个备份文件还原了，可是不能和vb的程序连接，请各位大虾给予指点，越详细越好！跪谢！跪谢！

首先 在工程->部件里添加ADO和DataGrid控件
然后用下面的语句连接就可以了
s1 = "人" + "员表"
Adodc1.ConnectionString = "Provider=SQLOLEDB.1;Password=2752;Persist Security Info=True;User ID=sa;Initial Catalog=sample;Data Source=JAMLEEPC"
Adodc1.RecordSource = "select 编号,姓名,年龄, 学历,年级,入学时间 from " & s1 & " order by '编号'"
Adodc1.Refresh
Form1.Show
If Adodc1.Recordset.RecordCount = 0 Then
MsgBox "无人员记录", vbOKOnly, "提示信息"
Else
Set DataGrid1.DataSource = Adodc1
End If
当然语句里的连接语句和选择的表和列你要自己修改的
祝你成功！

连到SQL，最好建一个基于操作系统的数据源，打开控制面板－＞管理工具－＞数据源－＞SQL－＞然后指定你的数据库， 然后在程序中就很好连到这个数据源了。