Prueba algo sencillo
Código ASP:
Ver originalDim Conn As New SqlConnection(tuConnectionString)
Dim cM As New SqlCommand("SELECT * FROM tuTabla", Conn)
Dim dR as SqlDataReader = cM.ExecuteReader();
While dR.Read()
tuVariable = dR("tuCampo")
End While