tm = ConfigurationSettings.AppSettings("telemagic" & i.ToString) & "common"
oleconect.ConnectionString = "data source =" & tm & proveedor
olecommand.CommandText = "select user,name from users order by user"
oleadapter.SelectCommand = olecommand
olecommand.Connection = oleconect
oleadapter.Fill(ds1)
ds.Tables("users").PrimaryKey = New DataColumn() {ds.Tables("users").Columns("user")}
Daniel Vargas.
MCP - Microsoft Certified Professional
"El callar y escuchar es cosa de sabios por ello nuestro grito nace de silencio consciente fuerte y elocuente... vivir de manera diferente es morir siendo libre"
Elkin Ramirez-Kraken
My Blog 
