Comment vérifier tous les champs du jeu d'enregistrements ADO de requête?

Je voudrais savoir si il existe une commande pour afficher l'ensemble de l'enregistrement(ligne) à la fois. Maintenant, je ne trouve que la méthode pour afficher des colonnes individuelles. Je suis l'aide d'une connexion ADO à la ms access mdb. Merci. En passant, je ne sais pas comment puis-je imprimer un message dans MS Access VB.......n'vb fournir une console de montrer que? Debug.L'impression de ne pas me donner quelque chose, je n'succès avec MsgBox...

   With cmdCommand
    .ActiveConnection = conConnection
    .CommandText = "SELECT * from tableA"
    .CommandType = adCmdText
   End With

   With rstRecordSet
    .CursorType = adOpenStatic
    .CursorLocation = adUseClient
    .LockType = adLockReadOnly
    .Open cmdCommand
   End With

   If rstRecordSet.EOF = False Then
        rstRecordSet.MoveFirst
        Do

            MsgBox rstRecordSet.Fields(0) & " " & rstRecordSet.Fields(1)

            rstRecordSet.MoveNext
        Loop Until rstRecordSet.EOF = True
   End If

InformationsquelleAutor lamwaiman1988 | 2011-03-23

ado vba

11

Tout d'abord, Debug.Print imprime à la Fenêtre d'exécution de la VB[A] de l'Éditeur. Si elle ne l'est pas, appuyez sur Ctrl-G.

Deuxièmement, il n'existe pas de commande pour afficher l'ensemble de l'enregistrement, vous devrez assembler la façon dont Xavinou fait dans sa (ses?) réponse. Voici la syntaxe VB, ignorant jeu d'enregistrements création & EOF chèque (à Noter que j'ai déclaré les variables--vous à l'aide de l'Option Explicite, oui?):
```
Dim fld As Field
Dim msg As String

    For Each fld In rstRecordSet.Fields
        msg = msg & fld.Value & "|"
    Next

Debug.Print msg    'or MsgBox msg 
```
Je pense que la pipe ("|") rend un meilleur séparateur que l'espace, car il est moins susceptible de se produire dans vos données.
- +1 NB si vous voulez rapidement inspecter le contenu de l'ensemble d'un jeu d'enregistrements, alors vous pouvez dump l'ensemble du jeu d'enregistrements sur une feuille de calcul Excel à l'aide de la CopyFromRecordset méthode d'un objet range d'Excel - voir msdn.microsoft.com/en-us/library/bb223288%28v=office.12%29.aspx
- Vous pouvez également l'obtenir avec Affichage | Fenêtre... ou de Personnaliser votre Barre d'outils avec un bouton pour cela.
- Bizarre, mais pour moi, je ne pouvais pas mettre As Field ou As String là. Fallait le laisser ou je recevais un message d'erreur: Expected end of statement. Travaillé autrement. Bravo!
InformationsquelleAutor RolandTumble
2

Pour la sortie de la console, je ne sais pas (car je ne sais pas VB), mais pour montrer l'ensemble de l'enregistrement à la fois, vous pouvez utiliser un foreach boucle sur rstRecordSet.Fields.

En C#, je voudrais écrire comme :
```
string msg = "";
foreach (Field f in rstRecordSet.Fields)
{
    msg += f.Value + " ";
}
MessageBox.Show(msg);
```
Maintenant, vous avez juste à trouver la syntaxe VB...

InformationsquelleAutor Xavinou
0

Au lieu de construire votre propre chaîne, pièce par pièce, vous pouvez utiliser le Méthode GetString de l'objet Recordset:
```
Debug.Print records.GetString(adClipString, 1)
```
Un effet secondaire malheureux de cette méthode est qu'elle semble supprimer l'enregistrement du jeu d'enregistrements.

InformationsquelleAutor David Kennedy

Vous devez vous connecter pour publier un commentaire.