vs2005下调用存储过程并用Datareader读出的方法

前些日一位兄弟问我vs2003下如何用sql2000的存储过程，并用DataReader读出
苦于一时没有2003只好用2005写了一下，没想到改了一下还真是好使，而且进行了一下数据库的负载测试，效果还是不错的

　　 Dim  conn  As   New  SqlConnection()
        conn.ConnectionString  =  ConfigurationManager.ConnectionStrings( " ConnectionString " ).ConnectionString
        conn.Open()
         Dim  cmd  As   New  SqlCommand()
        cmd.Connection  =  conn
        cmd.CommandType  =  CommandType.StoredProcedure
        cmd.CommandText  =   " User "
         Dim  c1  As   New  SqlParameter( " @id " , SqlDbType.BigInt)
        c1.Value  =   Val (session)
        cmd.Parameters.Add(c1)
         Dim  reader  As  SqlDataReader
         Dim  previousConnectionState  As  ConnectionState  =  conn.State
         Try
             If  conn.State  =  ConnectionState.Closed  Then
                conn.Open()
             End   If
            reader  =  cmd.ExecuteReader()
             Using  reader
                 While  reader.Read
                    plovelike  =  reader.Item( " lovelike " ).ToString
                 End   While
             End   Using
         Finally
             If  previousConnectionState  =  ConnectionState.Closed  Then
                conn.Close()
             End   If
         End   Try
        conn.Close()