Line 236: Dim dsSub As DataSet = New DataSet()
Line 237: dsSub = myDataBase.SelectSql(str, "company")
Line 238: subName = " - " & dsSub.Tables("company").Rows(0)("company")
Line 239: Else
Line 240: str = ("select virtualshops_products.*,virtualshops_category.supplyTime from virtualshops_products " & _
|