如何用VB连接SQL2000数据库？急求

来源：百度知道 编辑：UC知道 时间：2024/05/14 10:52:11
这几天老师让我们做个小型的信息管理系统。我现在把数据库和程序的各个界面都已经做好了，代码实现也完成的差不多了。可现在有个关键问题是我不知道如何将VB把SQL2000数据库上的数据调用出来，不知道具体语句的实现。看了很多资料上面都有详细的语句实现，可我看不懂，我不知道为什么要这样做？每条语句的意思是什么我都不明白，所以想请大家帮帮忙。告诉一下如何实现连接数据库，语句是怎样的？语法是什么？每条语句是什么意思？尽量详细点。谢谢大家。。。。。。。。
举个例子吧，我用VB做了一个登陆界面。上面有相应的用户名和密码，而这些用户名和密码我都是用SOL以表的形式储存在数据库中，只有用户名和密码相对应才能登陆到主界面，否则将出现错误提示。。。。。。
急求急求

Public db As ADODB.Connection '//定义链接
If db Is Nothing Then Set db = New ADODB.Connection
db.ConnectionString = "Provider=SQLOLEDB.1;" & _
"Persist Security Info=false;" & _
"User ID=sa;" & _
"Password=;" & _
"Initial Catalog=数据库名称;" & _
"Data Source=127.0.0.1" '//通过ADO方式连接本机的数据库，网络的则只需把127.0.0.1换成对应的IP地址即可

'//登录代码，在登录按钮中加入如下代码
'//这段代码的作用是访问SQL中的USER表，看输入的帐户与密码是否存在，存在则进入下一个界面；不存在则会给出提示并且要求重新输入，当连续错误3次后，系统将提示已经错误3次，退出登录界面
Static Try_Times As Integer '//设置静态变量，存储不成功的登录次数
Dim strSQl As String
strSQl = "select * from Users where user_name='" & Trim$(txtUserName.Text) & "' and password='" & Trim$(txtPassword.Text) & "' "

Dim str As New ADODB.Recordset
Set str = New ADODB.Recordset
str.CursorLocation =