vb.net从数据库中获取所有行

时间:2016-03-14 00:14:40

标签: sql database vb.net stored-procedures

我正在开发一个项目(在VB.net中),其中包含一个包含产品信息的数据库,一个产品对象类,一个产品列表对象类和一个DB类,它使用我的存储过程从中提取所有行数据库(每行构造成一个产品,产品放入产品列表类的数组列表中)。它似乎工作到目前为止,除了我在我的数据库类中得到一个错误,这让我感到难过。

 Dim TempList = New ArrayList
        Dim sqlDR As SqlClient.SqlDataReader = PDM.Data.SqlHelper.ExecuteReader(GLOBALS.ConnectionString, "sp_GetAllProducts")

        If sqlDR.HasRows Then
            While sqlDR.Read()
                Dim Prod As New Product
                Prod.PK_ProductID = sqlDR(0)
                Prod.MicrobeadStatus = sqlDR(1)
                Prod.FK_BrandID = sqlDR(2)
                Prod.FK_TypeID = sqlDR(3)
                Prod.FK_Product = sqlDR(4)
                Prod.PK_BrandID = sqlDR(5)
                Prod.BrandName = sqlDR(6)
                Prod.PK_Products = sqlDR(7)
                Prod.ProductName = sqlDR(8)
                Prod.PK_TypeID = sqlDR(9)
                Prod.Type = sqlDR(10)
                TempList.Add(Prod)
            End While
        End If

在此示例代码的第5行中,单词Product(a.k.a。my Product class)表示我没有为任何参数指定参数。 PK_ProductID,MicrobeadStatus等都已声明,并与Product类中的构造函数放在一起。到目前为止,我一直没有尝试过什么似乎有所帮助。有什么想法吗?

1 个答案:

答案 0 :(得分:0)

正如@Plutonix在评论中建议的那样,<!DOCTYPE html> <html lang="en"> <head> <meta name="viewport" content="width=device-width, initial-scale=1"> <link rel="stylesheet" type="text/css" href="style.css"> <link rel="stylesheet" href="http://maxcdn.bootstrapcdn.com/bootstrap/3.3.6/css/bootstrap.min.css"> <link href='https://fonts.googleapis.com/css?family=Oswald:400,300,700' rel='stylesheet' type='text/css'> <script src="drag.js"></script> <script src="https://ajax.googleapis.com/ajax/libs/jquery/1.12.0/jquery.min.js"></script> <script src="http://maxcdn.bootstrapcdn.com/bootstrap/3.3.6/js/bootstrap.min.js"></script> </head> <body> <div class="container"> <div class="row"> <div class="col-md-3" id="1box"> <h5>SWEET AND SOUR</h5> <img id="img1" src="images/sauce1.png"> </div> <div class="col-md-3" id="2box"> <h5>GRAVY</h5> <img id="img2" src="images/sauce2.png"> </div> <div class="col-md-3" id="3box"> <h5>SALTED EGG</h5> <img id="img3" src="images/sauce3.png"> </div> <div class="col-md-3" id="4box"> <h5>ORIENTAL SAUCE</h5> <img id="img4" src="images/sauce4.png"> </div> </div> </div> <div class="container"> <div class="row"> <div class="col-md-push-3 col-md-4 mainbox" ondrop="drop(event)" id="mainbox"> <img id="centerimg" src="images/center.png"> </div> </div> <div class="row"> <center><h3>Are you sure with the sauce?</h3> <button id ="sure" onclick="doFunction(); return false;" type="button" class="btn btn-default" aria-label="Left Align"> <span class="glyphicon glyphicon-ok" aria-hidden="true"></span> </button> <button id ="!sure" onclick="reloadPage(); return false;" type="button" class="btn btn-default" aria-label="Left Align"> <span class="glyphicon glyphicon-remove" aria-hidden="true"></span> </button> </center> </div> </div> <!-- hidden images here--> <img id="s1" class="img5" src="images/rice1.png"> <img id="s2" class="img5" src="images/rice2.png"> <img id="s3" class="img5" src="images/rice3.png"> <img id="s4" class="img5" src="images/rice4.png"> <!--end of hidden images--> </body> </html>听起来没有无参数构造函数。如果您的Product构造函数只有参数,那么您必须为每个参数提供一个参数,例如

Product

如果您希望能够在不提供任何参数的情况下创建实例,则必须声明无参数构造函数,例如

Dim Prod As New Product(sqlDR(0), ...)