Bonjour, je suis en stage de dévellopement, mon second projet consiste à débugger un programme.
J'ai besoin d'aide ;-).
D'ou pourrai provenir un bug provoquant ce type d'erreur :
Ce pilote odbc ne prend pas en charge les propriétés demandées
Voici l'interrogation
rs.Open sql, connect, adOpenStatic, adLockOptimistic
cette requete est effectué par une fonction
Voici l'appel :
req = "SELECT ut_clep, ut_nom, ut_passw, ut_path FROM VALCLIM_UTIL WHERE UPPER(ut_nom) =" & Chr(39) & UCase(util.Text) & Chr(39)
rec_don(rs, req)
Voici la fonction :
Public Function rec_don(ByRef rs As Recordset, sql As String) As Long
Set rs = New Recordset
Dim connect As Connection
Set connect = New Connection
connect.Provider = "MSDASQL"
connect.ConnectionString = "Persist Security Info=False;User ID=*****;Password=*****;Data Source=*****"
connect.Open
rs.Open sql, connect, adOpenStatic, adLockOptimistic
rec_don = rs.RecordCount
End Function
Si quelqu'un aurai une idée de la provenance du bug, est comment le corrigé.
La base est une base oracle 8i
Le driver ODBC utilisé est le suivant : 8.01.07.00
Language utilisé : VB6
Merci
Cordialement Romain.