sql = "Wybrany strBenchmarkName od tblBenchmarkname dokąd intSid =" & myDataTable.Rows ((0)) (1) & "rozkaz strBenchmarkname"
BmTable = Nowy DataTable
BmTable = getData (sql)
Jeżeli BmTable.Rows.Count = (0) Wtedy
bmName = ""
Inny
Dla BmTable.Rows bmrow W BmTable.Rows
bmName += bmrow ((0)) & ","
Następnie
bmName = Opuszczać (bmName, Len (bmName) - 2)
Kończyć Jeżeli
Jeżeli isAdmin = Prawdziwy Wtedy
Jeżeli bmName = "" Wtedy
bmName = "()"
Kończyć Jeżeli
lblBMName.Text = ""
Kończyć Jeżeli
|