VB实现SQL Server 2000存储过程调用

　　1) 通过ADODC属性页实现连接

　　在ADODC属性页中选择生成按钮，进入数据链接属性对话框；然后选择该对话框中的连接属性页，选择或输入服务器名称和数据库等重要信息；最后测试连接，连接成功后，按确定按钮，返回到属性页对话框，可获得连接字符串，如下例：

　　Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=Science_File;Data Source=Data_Server

　　其中sa是用户名；Science_File是数据库名；Data_Server是数据库名。

　　通过下列语句，即可连接到指定的数据库：

　　dim odbcstr as String, adocon As New ADODB.Connection
odbcstr = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=Science_File;Data Source=Data_Server"
adocon.Open odbcstr '连接到数据库

　　2) 直接使用连接语句实现

　　连接数据库的语句如下：

　　Dim ado as ADODC
ado.ConnectionString = "Provider=SQLOLEDB.1;Password=" & User_Pwd & ";Persist Security Info=True;User ID=" & User_Name & ";Initial Catalog=" & Data_Name & ";Data Source=" & server_name

　　其中User-Pwd是用户密码；User_Name是用户名；Data_Name是数据库名；server_name是服务器名。

　　连接数据库成功后就可以调用存储过程执行操作。

　　3、存储过程的调用

　　假设有一个名为doc_ProcName存储过程，该存储过程有一个输入参数，一个输出参数。

　　1) 直接传递参数调用存储过程

　　直接传递参数方法主要通过以下几个步骤来实现：