i get this msg:
Microsoft.Data.Odbc.OdbcException: NO_DATA - no error information available
at Microsoft.Data.Odbc.OdbcConnection.HandleError(IntPtr hHandle, SQL_HANDLE hType,
RETCODE retcode)
at Microsoft.Data.Odbc.OdbcDataReader.GetData(Int32 i, SQL_C sqlctype, Int32 cb)
at Microsoft.Data.Odbc.OdbcDataReader.internalGetString(Int32 i)
at Microsoft.Data.Odbc.OdbcDataReader.GetValue(Int32 i, TypeMap typemap)
at Microsoft.Data.Odbc.OdbcDataReader.GetValue(Int32 i)
at Microsoft.Data.Odbc.DbCache.AccessIndex(Int32 i)
at Microsoft.Data.Odbc.OdbcDataReader.GetValue(Int32 i)
at Microsoft.Data.Odbc.OdbcDataReader.get_Item(String value)
at F�llesDialogbox.frmAddIngDialog.cboVaregruppe_SelectedIndexChanged(Object sender,
EventArgs e) in C:\Documents and Settings\Administrator\My Documents\Visual Studio
Projects\Datasystem\KS\F�llesDialogbox\frmAddIngDialog.vb:line 357
then i try to get a row out fo the database mysql 3.23.54 run on redhat linux 9.0 i am
acceessing it from vs.net via odbc.net.
i am using myodbc 3.51 and my code look like this:
Try
Dim plunr As Integer
Dim varenavn As String
Dim varegruppenr
Dim Ink�bspris
Dim Salgspris As String
Dim Engrospris As String
'Connector/ODBC 3.51 connection string
Dim MyConString As String = "DRIVER={MySQL ODBC 3.51 Driver};" & _
"SERVER=" & System.Configuration.ConfigurationSettings.AppSettings("Host")
& _
";DATABASE=" &
System.Configuration.ConfigurationSettings.AppSettings("Database") & _
";UID=" &
System.Configuration.ConfigurationSettings.AppSettings("Username") & _
";Password=" &
System.Configuration.ConfigurationSettings.AppSettings("Password") & _
";"
'Connection
Dim MyConnection As New Odbc.OdbcConnection(MyConString)
MyConnection.Open()
Console.WriteLine("Connection State::" & MyConnection.State.ToString)
Dim MyCommand As New Odbc.OdbcCommand()
MyCommand.CommandText = "SELECT * FROM Produkter where Varegruppe = '" &
Replace(objVaregrupper(cboVaregruppe.SelectedIndex).Groupnr, ",", ".") & "' order by
Varenavn"
MyCommand.Connection = MyConnection
Dim MyDataReader As Odbc.OdbcDataReader
MyDataReader = MyCommand.ExecuteReader
While MyDataReader.Read
objProdukter(t) = New clsProdukter()
text += " || "
objProdukter(t) = New clsProdukter()
plunr = MyDataReader("plunr")
varenavn = MyDataReader("Varenavn")
Ink�bspris = MyDataReader("Ink�bspris") 'it is here all the problems
strarts even then i out comment this line
Salgspris = MyDataReader("Salgspris")
Engrospris = MyDataReader("Engrospris")
objProdukter(t) = New clsProdukter(CInt(plunr), varenavn,
varegruppenr, CDbl(Ink�bspris), Salgspris, CDbl(Engrospris))
varegruppenr = objVaregrupper(cboVaregruppe.SelectedIndex)
text += " ID = " & MyDataReader("Firmanr")
t += 1
ReDim Preserve objProdukter(t)
End While
MyConnection.Close()
Console.WriteLine("Connection State::" & MyConnection.State.ToString)
'Catch ODBC Exception
Catch MyOdbcException As Odbc.OdbcException
MsgBox(MyOdbcException.ToString)
Console.WriteLine(MyOdbcException.ToString)
'Catch program exception
Catch MyException As Exception
MsgBox(MyException.ToString)
End Try
cboProdukter.Items.Clear()
For t = 0 To UBound(objProdukter) - 1 Step 1
cboProdukter.Items.Add(objProdukter(t).Navn)
Next
and tis is my db
CREATE TABLE `Produkter` (
`ID` int(11) NOT NULL default '0',
`Plunr` double default NULL,
`Varenavn` varchar(255) default NULL,
`Varegruppe` decimal(10,3) default NULL,
`Varetext` varchar(255) default NULL,
`Firmanr` double default NULL,
`Firmavarenr` double default NULL,
`Ink�bspris` double NOT NULL default '0',
`Engrospris` double default NULL,
`Salgspris` varchar(255) default NULL,
`Tilbudspris` varchar(255) default NULL,
`Ern�ringID` varchar(255) default NULL,
`temp` varchar(255) default NULL
) TYPE=MyISAM;
#
# Data dump for tabellen `Produkter`
#
INSERT INTO `Produkter` (`ID`, `Plunr`, `Varenavn`, `Varegruppe`, `Varetext`,
`Firmanr`, `Firmavarenr`, `Ink�bspris`, `Engrospris`, `Salgspris`, `Tilbudspris`,
`Ern�ringID`, `temp`) VALUES (884, '9069', 'Stegefl�sk, uden ben med sv�r', '07.300',
'', '1', '0', '2', '2', '1,2,3,4,5,6,7,8,9,10', '1,2,3,4,5,6,7,8,9,11', '0929', '0');
INSERT INTO `Produkter` (`ID`, `Plunr`, `Varenavn`, `Varegruppe`, `Varetext`,
`Firmanr`, `Firmavarenr`, `Ink�bspris`, `Engrospris`, `Salgspris`, `Tilbudspris`,
`Ern�ringID`, `temp`) VALUES (883, '9026', 'Fl�skeribs uden ben', '07.300', '', '1',
'0', '2', '2', '1,2,3,4,5,6,7,8,9,10', '1,2,3,4,5,6,7,8,9,11', '0929', '0');
INSERT INTO `Produkter` (`ID`, `Plunr`, `Varenavn`, `Varegruppe`, `Varetext`,
`Firmanr`, `Firmavarenr`, `Ink�bspris`, `Engrospris`, `Salgspris`, `Tilbudspris`,
`Ern�ringID`, `temp`) VALUES (882, '9007', 'Krydder Ribben', '07.300', '', '1', '0',
'2', '2', '1,2,3,4,5,6,7,8,9,10', '1,2,3,4,5,6,7,8,9,11', '0374', '5');
INSERT INTO `Produkter` (`ID`, `Plunr`, `Varenavn`, `Varegruppe`, `Varetext`,
`Firmanr`, `Firmavarenr`, `Ink�bspris`, `Engrospris`, `Salgspris`, `Tilbudspris`,
`Ern�ringID`, `temp`) VALUES (881, '9067', 'Ba Ribben', '07.300', '', '1', '0', '2',
'2', '1,2,3,4,5,6,7,8,9,10', '1,2,3,4,5,6,7,8,9,11', '0374', '5');
INSERT INTO `Produkter` (`ID`, `Plunr`, `Varenavn`, `Varegruppe`, `Varetext`,
`Firmanr`, `Firmavarenr`, `Ink�bspris`, `Engrospris`, `Salgspris`, `Tilbudspris`,
`Ern�ringID`, `temp`) VALUES (880, '9111', 'Forende', '07.300', '', '1', '0', '2',
'2', '1,2,3,4,5,6,7,8,9,10', '1,2,3,4,5,6,7,8,9,11', NULL, NULL);
INSERT INTO `Produkter` (`ID`, `Plunr`, `Varenavn`, `Varegruppe`, `Varetext`,
`Firmanr`, `Firmavarenr`, `Ink�bspris`, `Engrospris`, `Salgspris`, `Tilbudspris`,
`Ern�ringID`, `temp`) VALUES (879, '9110', 'Fedtnet', '07.300', '', '1', '0', '2',
'2', '1,2,3,4,5,6,7,8,9,10', '1,2,3,4,5,6,7,8,9,11', NULL, NULL);
INSERT INTO `Produkter` (`ID`, `Plunr`, `Varenavn`, `Varegruppe`, `Varetext`,
`Firmanr`, `Firmavarenr`, `Ink�bspris`, `Engrospris`, `Salgspris`, `Tilbudspris`,
`Ern�ringID`, `temp`) VALUES (878, '9073', 'Svinet�r', '07.300', '', '1', '0', '2',
'2', '1,2,3,4,5,6,7,8,9,10', '1,2,3,4,5,6,7,8,9,11', NULL, NULL);
INSERT INTO `Produkter` (`ID`, `Plunr`, `Varenavn`, `Varegruppe`, `Varetext`,
`Firmanr`, `Firmavarenr`, `Ink�bspris`, `Engrospris`, `Salgspris`, `Tilbudspris`,
`Ern�ringID`, `temp`) VALUES (877, '9120', 'Svinehovede med k�besnitte', '07.300', '',
'1', '0', '2', '2', '1,2,3,4,5,6,7,8,9,10', '1,2,3,4,5,6,7,8,9,11', NULL, NULL);
INSERT INTO `Produkter` (`ID`, `Plunr`, `Varenavn`, `Varegruppe`, `Varetext`,
`Firmanr`, `Firmavarenr`, `Ink�bspris`, `Engrospris`, `Salgspris`, `Tilbudspris`,
`Ern�ringID`, `temp`) VALUES (876, '9129', 'Skinker ( Hele)', '07.300', '', '1', '0',
'2', '2', '1,2,3,4,5,6,7,8,9,10', '1,2,3,4,5,6,7,8,9,11', NULL, NULL);
INSERT INTO `Produkter` (`ID`, `Plunr`, `Varenavn`, `Varegruppe`, `Varetext`,
`Firmanr`, `Firmavarenr`, `Ink�bspris`, `Engrospris`, `Salgspris`, `Tilbudspris`,
`Ern�ringID`, `temp`) VALUES (875, '9132', 'Sv�r uden fedt ( affald)', '07.300', '',
'1', '0', '2', '2', '1,2,3,4,5,6,7,8,9,10', '1,2,3,4,5,6,7,8,9,11', NULL, NULL);
