RaouL_BennetH
12-01-2009, 11:09
Ciao a tutti :)
Non riesco in nessun modo ad ottenere un singolo risultato da una query effettuata su una tabella.
Questo risultato mi dovrebbe essere restituito come stringa:
'1a prova
Private Function GetResultSet() As String
Dim cmdString As String = "SELECT nomeColore FROM Colori WHERE indice = '" & indice & "' "
'codice per aprire la connessione che va a buon fine..
Dim cmd AS New OleDbCommand(cmdString, miaConn)
Dim result As String = cmd.ExecuteScalar().ToString()
return result
End Function
'Non funziona ....
'2a Prova
Dim cmdString As String = "SELECT nomeColore FROM Colori WHERE indice = '" & indice & "' "
'codice per aprire la connessione che va a buon fine..
Dim cmd AS New OleDbCommand(cmdString, miaConn)
Dim reader As OleDbDataReader = cmd.ExecuteReader()
While reader.Read
user = reader(0).ToString()
End While
return result
End Function
'Non funziona....
Potete aiutarmi?
Grazie.
RaouL.
Non riesco in nessun modo ad ottenere un singolo risultato da una query effettuata su una tabella.
Questo risultato mi dovrebbe essere restituito come stringa:
'1a prova
Private Function GetResultSet() As String
Dim cmdString As String = "SELECT nomeColore FROM Colori WHERE indice = '" & indice & "' "
'codice per aprire la connessione che va a buon fine..
Dim cmd AS New OleDbCommand(cmdString, miaConn)
Dim result As String = cmd.ExecuteScalar().ToString()
return result
End Function
'Non funziona ....
'2a Prova
Dim cmdString As String = "SELECT nomeColore FROM Colori WHERE indice = '" & indice & "' "
'codice per aprire la connessione che va a buon fine..
Dim cmd AS New OleDbCommand(cmdString, miaConn)
Dim reader As OleDbDataReader = cmd.ExecuteReader()
While reader.Read
user = reader(0).ToString()
End While
return result
End Function
'Non funziona....
Potete aiutarmi?
Grazie.
RaouL.