Dim cmd As New SQLCommand
cmd.Connection Name = "数据源" '去掉Name前的空格,没办法,没有空格粘不上来。
cmd.CommandText = "Exec 存储过程名"
‘如果返回表:
Dim t As DataTable = cmd.ExecuteReader
‘如果返回单个值:
Dim v As 数据类型= cmd.ExecuteScalar
只能返回一个记录集,多记录集时
不希望返回记录集前就执行set nocount on,禁止存储过程返回记录集;
而要返回记录集时,就要先执行set nocount off。