Tester si un DataSet est vide
Résolu
cs_Nurgle
Messages postés
1642
Date d'inscription
samedi 6 novembre 2004
Statut
Membre
Dernière intervention
28 avril 2011
-
15 mai 2005 à 18:06
cs_Nurgle Messages postés 1642 Date d'inscription samedi 6 novembre 2004 Statut Membre Dernière intervention 28 avril 2011 - 18 mai 2005 à 18:17
cs_Nurgle Messages postés 1642 Date d'inscription samedi 6 novembre 2004 Statut Membre Dernière intervention 28 avril 2011 - 18 mai 2005 à 18:17
A voir également:
- Datatable already belongs to another dataset
- C# string to int ✓ - Forum C# / .NET
- Bind address already in use - Forum C
- Vbs to exe - Forum VBScript (VBS)
- Vb.net dataset ✓ - Forum VB.NET
- The namespace already contains a definition for ✓ - Forum ASP.NET
3 réponses
cs_Nurgle
Messages postés
1642
Date d'inscription
samedi 6 novembre 2004
Statut
Membre
Dernière intervention
28 avril 2011
4
18 mai 2005 à 18:17
18 mai 2005 à 18:17
Bon je me suis contenté d'un Try...Catch...End Try
je trouve pas ça très propre comme truc mais j'ai pas mieux pour l'instant...
merci quand même à tout le monde
@+++
Nurgle
C'est une grande folie que de vouloir être sage tout seul !
je trouve pas ça très propre comme truc mais j'ai pas mieux pour l'instant...
merci quand même à tout le monde
@+++
Nurgle
C'est une grande folie que de vouloir être sage tout seul !
Netlink
Messages postés
139
Date d'inscription
mercredi 2 avril 2003
Statut
Membre
Dernière intervention
12 juillet 2011
16 mai 2005 à 10:01
16 mai 2005 à 10:01
Salut,
Je pense que c'est cela que tu veux faire...
Public Function datasetIsVide() As Boolean
Dim ds
As DataSet =
New DataSet()
' Pour tester si le DataSet est vide
If ds
Is
Nothing
Then
' Si c'est le cas, on retourne True
Return
True
End
If
Return
False
End
Function
Public
Function ligneIsVide(
ByVal Table
As
Integer)
As
Boolean
Dim ds
As DataSet =
New DataSet
Dim x
As
Integer = Table
' Pour tester si une ligne est vide
If ds.Tables.Item(x)
Is
Nothing
Then
' si c'est le cas, on retourne True
Return
True
End
If
Return
False
End
Function
@ bientôt, Mathieu
Je pense que c'est cela que tu veux faire...
Public Function datasetIsVide() As Boolean
Dim ds
As DataSet =
New DataSet()
' Pour tester si le DataSet est vide
If ds
Is
Nothing
Then
' Si c'est le cas, on retourne True
Return
True
End
If
Return
False
End
Function
Public
Function ligneIsVide(
ByVal Table
As
Integer)
As
Boolean
Dim ds
As DataSet =
New DataSet
Dim x
As
Integer = Table
' Pour tester si une ligne est vide
If ds.Tables.Item(x)
Is
Nothing
Then
' si c'est le cas, on retourne True
Return
True
End
If
Return
False
End
Function
@ bientôt, Mathieu
cs_Nurgle
Messages postés
1642
Date d'inscription
samedi 6 novembre 2004
Statut
Membre
Dernière intervention
28 avril 2011
4
16 mai 2005 à 16:13
16 mai 2005 à 16:13
ça marche toujours pas ( j'ai toujours un System.IndexOutOfRangeException: Aucune ligne à la position 0.)
j'ai une fonction :
Public Function Connexion(Login As String, Password As String) As System.Data.DataSet
Dim Donnees As System.Data.DataSet
'...
'je me connecte à la base et je récuère le DataSet dans "Donnees"
' avec "Select * From Users Where login='" & Login & "' and password='" &_ Password & "' "
If Donnees.Tables.Item(0) Is Nothing Then 'j'ai mis ton truc...
Return Nothing
Else
If Donnees.Tables("Users").Rows(0).Item("Valid") = "1" Then
Return Donnees
Else
Return Nothing
End If
End If
End Function
ça me renvoie donc le dataSet si il existe bien une première ligne avec un champ valid égal à 1.
Seul problème : le Donnees.Tables.Item(0) que tu m'as donné ne change rien...en gros quand le Select ne renvoie rien, eh bien il n'y a pas de ligne 0 et donc ça plante.
Je suis sûr que ça doit être tout con......et que j'y ai pas pensé...
Nurgle
C'est une grande folie que de vouloir être sage tout seul !
j'ai une fonction :
Public Function Connexion(Login As String, Password As String) As System.Data.DataSet
Dim Donnees As System.Data.DataSet
'...
'je me connecte à la base et je récuère le DataSet dans "Donnees"
' avec "Select * From Users Where login='" & Login & "' and password='" &_ Password & "' "
If Donnees.Tables.Item(0) Is Nothing Then 'j'ai mis ton truc...
Return Nothing
Else
If Donnees.Tables("Users").Rows(0).Item("Valid") = "1" Then
Return Donnees
Else
Return Nothing
End If
End If
End Function
ça me renvoie donc le dataSet si il existe bien une première ligne avec un champ valid égal à 1.
Seul problème : le Donnees.Tables.Item(0) que tu m'as donné ne change rien...en gros quand le Select ne renvoie rien, eh bien il n'y a pas de ligne 0 et donc ça plante.
Je suis sûr que ça doit être tout con......et que j'y ai pas pensé...
Nurgle
C'est une grande folie que de vouloir être sage tout seul !