Solack

Hello cdkid, many thanks for this great UDFs. They work very fine in my environment and it is easy to use. For time reasons I did not read the complete thread here and I am not shure if someone did see the following issues. First I found one minor error : _AddRecord Function : if the first value is integer, the inserted values starts with ",". I added two more lines like : ElseIf $i = 0 And IsInt($vValue[$i]) Then $query = $query & $vValue[$i] I needed some extensions so I have to do it by myself. 1. You can also create tables without primary key. So I added a new funcion for me. If you are interest in, I can send you my code via eMail. 2. The result of _Query can have more then one result in one line. So the program has to do more work like : Dim $ret[1][1], $rs $rs = _Query($oMyCon, "select * from adresse") With $rs $nLaenge = $rs.Fields.Count While Not .EOF ReDim $ret[uBound($ret, 1) + 1][$nLaenge] For $i = 0 To $nLaenge - 1 $ret[uBound($ret, 1) - 1][$i] = $rs.Fields ($i).Value Next .MoveNext WEnd EndWith $ret[0][0] = UBound($ret, 1) - 1 For $i = 1 To UBound($ret,1) -1 For $j = 0 To UBound($ret,2) -2 ConsoleWrite($ret[$i][$j]&",") Next ConsoleWrite($ret[$i][uBound($ret,2) -1]&@CRLF) Next After that I have a question : Is it possible to catch the Error message from MySQL and bring it also in a field so that I can directly view it in the MsgBox.