voila une autre méthode que je vous propose pour gerer vos requête sql et leurs traitements
Source / Exemple :
Function recupere_requete_tableau(ByVal requete As String, ByVal tab() As String) As Array
'i est une variable global donc declarée en entête de code
i = 0
Try
'connection a la base de données
MyConnection = New SqlConnection
MyConnection.ConnectionString = "server='machine';database='bdd'; user id='user';password='mot de passe';Trusted_Connection=true"
MyConnection.Open()
Dim oCommand As New SqlCommand(requete, MyConnection)
Dim oReader As SqlDataReader = oCommand.ExecuteReader()
While oReader.Read()
tab(i) = oReader.GetString(0)
i = i + 1
End While
oReader.Close()
MyConnection.Close()
recupere_requete_tableau = tab
Catch er As Exception
End Try
End Function
Function donne_borne_tab() As Integer
donne_borne_tab = i
End Function
'choix tableau ndimension
'cette fonction retourne un tableau contenant le resultat d'un requete sql passée en paramètre
Function recupere_requete_tableau2d(ByVal tab(,) As String) As Array
i = 0
j = 0
Try
'connection a la base de données
MyConnection = New SqlConnection
MyConnection.ConnectionString = "server='machine';database='bdd'; user id='user';password='mot de passe';Trusted_Connection=true"
MyConnection.Open()
Dim oCommand As New SqlCommand(requete, MyConnection)
Dim oReader As SqlDataReader = oCommand.ExecuteReader()
Dim oReader As SqlDataReader = oCommand.ExecuteReader()
While oReader.Read()
Try
While True
tab(i, j) = oReader.GetValue(j)
j = j + 1
End While
Catch ex As Exception
j = 0
End Try
i = i + 1
End While
oReader.Close()
MyConnection.Close()
recupere_requete_tableau2d = tab
Catch er As Exception
End Try
End Function
Conclusion :
a vous de jouer, et n'oubliez pas open source ;-) y'a que ca de vrai
Tri8415
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.