01.
Sub
BindData()
02.
Dim
strSQL
As
String
03.
strSQL =
"SELECT TOP 2 * FROM customer ORDER BY NEWID()"
04.
05.
Dim
dtReader
As
SqlDataReader
06.
objCmd =
New
SqlCommand(strSQL, objConn)
07.
dtReader = objCmd.ExecuteReader()
08.
09.
10.
myRepeater.DataSource = dtReader
11.
myRepeater.DataBind()
12.
13.
dtReader.Close()
14.
dtReader =
Nothing
15.
16.
End
Sub