Får ett fel som jag inte förstår mig på alls. Försöker hämta ett värde ur min databas och peta in det i en variabel men, jag får felmedelandet:

"Det finns inga data för raden/kolumnen."

När jag kör frågan i MySQL query browser så är det inga problem. Vad kan vara fel?

'Hämta teamsidor_id
Dim SQL = "SELECT * FROM teamsidor ORDER BY teamsidor_id DESC LIMIT 1"
Dim teamsidor_id As String
teamsidor_id = getDataReader(SQL).GetString(0)

Public Shared Function getDataReader(ByVal strSQL As String) As System.Data.Odbc.OdbcDataReader
Dim dr As Odbc.OdbcDataReader
Dim MinConn As New OdbcConnection(ConfigurationSettings.AppSettings("DbString"))
MinConn.Open()

Try
Dim cmd = New System.Data.Odbc.OdbcCommand(strSQL, MinConn)
dr = cmd.executereader()
dr.Read()

'----- Stäng förbindelsen till databasen
dr.Close()

MinConn.Close()
MinConn.Dispose()
Catch ex As Exception

End Try
Return dr

End Function

Hmm, vet inte om det går att köra som du försöker, alltså läsa en rad och sedan direkt stänga ner DataReadern. Tror den tar bort data den har i sig då också.
Om du vill hämta första värdet i första kolumnen kan du använda dig av ExecuteScalar på Command objektet.