Home Page
Articoli
Tips & Tricks
News
Forum
Archivio Forum
Blogs
Sondaggi
Rss
Video
Utenti
Chi Siamo
Contattaci
Username:
Password:
Login
Registrati ora!
Recupera Password
Home Page
Stanze Forum
ASP.NET 1.0/1.1
Ciclare il dataset e inserirlo in un array
lunedì 11 febbraio 2008 - 18.19
Elenco Threads
Stanze Forum
Aggiungi ai Preferiti
Cerca nel forum
bluland
Profilo
| Guru
1.149
messaggi | Data Invio:
lun 11 feb 2008 - 18:19
Salve,
come da oggetto, ho un ds da mettere in un array, solo che devo mettere solo una colonna del dataset, la prima soluzione che mi è venuta in mente è questaDim datarow As DataRow
Dim s(1) As String
Dim i As Integer
For Each datarow In ds.Tables(0).Rows
For i = 0 To 1
s.SetValue(datarow(1).ToString, i)
Dim a As String = s.GetValue(i)
Next i
Next
ma sbaglio nei due cicli for poiche mi sovrascrive i valori come si può vedere
idee?
--------------------
Vincenzo PESANTE
System Engineer
Ferux
Profilo
| Newbie
44
messaggi | Data Invio:
mar 12 feb 2008 - 07:24
Ciao Vincenzo,
ecco una possibile soluzione al tuo problema:
Ho creato una Console Application:
Dim dt As New DataTable()
Dim dc As New DataColumn("Colonna1")
dt.Columns.Add(dc)
Dim ds As New DataSet
ds.Tables.Add(dt)
Dim dr As DataRow = ds.Tables(0).NewRow()
dr("Colonna1") = "primovalore"
ds.Tables(0).Rows.Add(dr)
dr = ds.Tables(0).NewRow()
dr("Colonna1") = "secondovalore"
ds.Tables(0).Rows.Add(dr)
dr = ds.Tables(0).NewRow()
dr("Colonna1") = "terzovalore"
ds.Tables(0).Rows.Add(dr)
'Creazione array
Dim s(ds.Tables(0).Rows.Count - 1) As String
'Inserimento valori
For i As Int32 = 0 To ds.Tables(0).Rows.Count - 1
s.SetValue(ds.Tables(0).Rows(i)("Colonna1"), i)
Next i
'Lettura valori inseriti
For y As Int32 = 0 To s.Length - 1
Console.WriteLine("Valore: " + s.GetValue(y))
Next y
Console.ReadLine()
Spero che questo ti sia di aiuto
Saluti
Ing Ferux
[MCP MCAD]
bluland
Profilo
| Guru
1.149
messaggi | Data Invio:
mer 13 feb 2008 - 11:15
Ciao grazie della risposta.
alla fine ho cambiato la SP in modo che mi restituisse solo la colonna che mi interessava cosi risparmio un operazione ed ho fatto cosi:
Dim s(1) As String
Dim i As Integer
For i = 0 To 1
s.SetValue(ds.Tables(0).Rows(i).Item(0).ToString, i)
Next i
Grazie
--------------------
Vincenzo PESANTE
System Engineer
Torna su
Stanze Forum
Elenco Threads
Partecipa anche tu! Registrati!
Hai bisogno di aiuto ?
Perchè non ti registri subito?
Dopo esserti registrato potrai chiedere
aiuto sul nostro
Forum
oppure aiutare gli altri
Consulta le
Stanze
disponibili.
Registrati ora !