MS access, SÉLECTIONNEZ en vba

Je vais avoir quelques problèmes avec certaines fonctionnalités de mon application. Il est un cas particulier où j'ai un exemple d'une " instance de la classe sur un formulaire pour un administrateur de l'examen. Le formulaire est rempli avec les étudiants associés à cette attente de la classe. Après leurs notes sont finis, j'ai un bouton dans le pied de page qui va supprimer cette classe de mes "en cours" de la table et ajouter les notes de tous les élèves. Les travaux de cette.
Cependant, je tiens essentiellement à copier dans l'attente de cette classe, qui a juste le nom de la classe, de la date et de l'enseignant d'une classe de table avant qu'il soit supprimé de l'attente. Depuis pas de données sur cette classe autre que la clé primaire(nombre de classes) persiste tout au long de cette forme, je ne peux pas remplir les autres champs(nom de la classe, la date) de la ligne dans mon terminé la classe de la table.

Je suis en train d'essayer un "SÉLECTIONNEZ DANS" l'opération en VBA pour obtenir ces valeurs. Il va comme ceci:

   dim cname as String
   dim classdate as Date
   dim pid as integer
   dim teacher as String
   dim qry as String

    pid = [Forms]![frmClasses]![txtID]

   qry = "Select className INTO cname FROM tblPending WHERE tblPending.id = " & " ' " & pid & " ' " & ";"

   db.execute qry
   debug.print qry
   debug.print cname

À partir d'ici, je fais la même opération pour l'autre variable, à construire ma requête d'INSERTION, et de l'exécuter. Le problème, c'est-- mon sélectionnez dans la sont pas de travail. Debug.imprimer montre que les variables locales n'ont jamais été initialisé à partir de l'instruction SELECT INTO. Toutes les pensées?

C'est une requête création de table, je pense que vous voulez une requête ajout. Je ne pense vraiment pas votre ID de texte. Si pid est null (vide) alors il semble probable que [Formulaires]![frmClasses]![txtID] est vide. Essayez d'utiliser le mot clé Me et voir ce que les noms de contrôle il est livré avec-Moi. provoquera l'intellisense.
Je ne peux pas utiliser le mot clé Me dans ce cas. Au lieu d'ouvrir le formulaire avec un param, je suis en utilisant un champ de la forme précédente. Le champ avec txtID (une zone de texte avec la corporation de la classe ID) est sur la forme précédente. Aussi, cette partie fonctionne comme prévu. La requête imprimé est "Sélectionnez un nom de Classe DANS cName tblPending Où tblPending.id = '17';" j'ai aussi essayé de supprimer les guillemets simples autour de l'id de critères, qu'il est un entier, mais il ne fait pas de différence.
Selon la sélection que j'ai faite à partir de la forme précédente, j'ai le correspondant de l'ID de classe
SÉLECTIONNEZ EN crée une table, ce que vous voulez INSÉRER DANS, qui ajoute à une table. Aussi, ajouter db.execute qry, dbFailOnerror - votre requête échoue si la table existe et vous ne serez pas obtenir un avertissement autrement.
Dans microsoft Access, vous pouvez utiliser DLookup() de "sélectionner dans une variable" office.microsoft.com/en-us/access-help/... Vous pouvez trouver d'autres "fonctions de domaine" utile: DMin(); DMax(); DAvg(); etc.

OriginalL'auteur Scotch | 2012-07-05

2

Tout d'abord, toutes les classes dans un tableau et juste, un "NotPending" ou "Terminé" colonne serait mieux.

Avoir deux tableaux identiques pour les classes et le déplacement des valeurs de l'un à l'autre pour indiquer les changements de statut est une mauvaise conception de base de données.

Si vous vraiment besoin de le faire à l'aide de deux tables et de copier des lignes, alors vous avez besoin un INSERT INTO de la requête (et pas SELECT INTO), comme déjà mentionné par Remou dans les commentaires, parce que SELECT INTO crée une nouvelle table (ou remplace un existant avec le même nom, si déjà là).

La syntaxe pour INSERT INTO ressemble à ceci:
```
INSERT INTO CompletedClassTable (ClassName, Teacher)
SELECT ClassName, Teacher FROM tblPending WHERE id = 123
```
Et enfin, vous avez demandé à ce dans un commentaire:

Afin de SÉLECTIONNER EN est tout autre dans l'Accès à Oracle? Dans Oracle et PL/SQL, vous pouvez sélectionner une ligne dans une variable OU d'un tableau. Dans l'Accès peut vous ne sélectionnez pas dans une variable?

À la charge d'une ligne dans une variable, vous devez utiliser un Jeu d'enregistrements.

Exemple de code pour charger votre requête dans un jeu d'enregistrements et de sortie de la ClassName champ:
```
Dim RS As DAO.Recordset

Set RS = CurrentDb.OpenRecordset("SELECT * FROM tblPending WHERE id = 123")
If Not RS.EOF Then
    Debug.Print RS("classname")
End If
RS.Close
Set RS = Nothing
```
J'ai l'impression que mon utilisation prévue pour "sélectionner" est mal compris.Mon intention était de SÉLECTIONNER pour accéder à une valeur à partir d'une ligne et de l'affecter à une variable VBA à partir d'une table où je sais que le PK, un peu comme en PL/SQL.Une itération à travers une RS semble être le comparatif solution d'Accès comme vous l'avez mentionné. Aussi loin que la conception de base de données va,dans l'attente de table et la table ne sont pas exactement les mêmes. Mon tableau a tous les champs de la en attendant de la table avec l'ajout de quelques champs. Dans ce cas, j'ai vue un formulaire de classe et une classe en cours(en attente) comme des entités différentes
Je ne sais pas si ma question était ambiguë ou mes intentions n'étaient pas claires, mais je vais aller de l'avant et marquer ce que répondit "-- il n'est PAS possible d'utiliser "SELECT INTO' en VBA pour affecter une valeur à partir d'une ligne à une variable. Pour ce faire, j'aurais besoin d'Ouvrir un jeu d'enregistrements de la nécessaire requête. Est-ce un résumé approprié à votre avis?
Je ne sais pas Oracle et PL/SQL, donc je ne peux pas dire comment ça fonctionne, à l'exception de ce que vous avez dit. Pour affecter une valeur à partir d'une ligne à une variable, vous avez besoin d'un Recordset ou, si vous juste besoin d'UNE valeur, vous pouvez utiliser DLookup. Mais si vous voulez juste pour copier une ligne à une autre table, j'utilise un INSERT INTO requête. IMO c'est la meilleure façon de le faire.
Sonne bien, Merci pour l'entrée. Je vais aller de l'avant et à l'accepter et considérer qu'il a répondu

OriginalL'auteur Christian Specht
1

Semble que vous voulez récupérer une valeur de texte, className, de tblPending où tblPending.id correspond à la valeur trouvée dans la zone de texte, txtID et stocker cette valeur de texte dans une variable de chaîne nommée cname.

Si cette interprétation est correcte, vous n'avez pas besoin de s'embêter avec une requête et le jeu d'enregistrements. Utilisez simplement le Fonction DLookup pour récupérer la valeur, similaire à ce code non testé l'échantillon.
```
Dim cname As String
Dim pid As Integer
Dim strCriteria As String
pid = [Forms]![frmClasses]![txtID]
strCriteria = "id = " & pid
cname = Nz(DLookup("className", "tblPending", strCriteria), vbNullString)
Debug.Print "cname: '" & cname & "'"
```
Notes:
1. J'ai supposé que le type de données de la id champ dans tblPending est numérique. Si c'est effectivement le type de données texte, changer strCriteria comme ceci:
  
  strCriteria = "id = '" & pid & "'"
2. DLookup() renvoie la valeur Null si aucune correspondance trouvée. Puisque nous sommes de l'affectation de la valeur renvoyée de la fonction à une variable de type chaîne, j'ai utilisé Nz() pour convertir la valeur Null à une chaîne vide. Alternativement, vous pouvez déclarer cname Comme Variante (de sorte qu'il peut accepter une valeur Nulle) et de se débarrasser de Nz().
Cela fonctionne aussi. J'ai mis en place mon formulaire à l'aide de la fonction rechdom après que vous avez posté votre commentaire à ma question^ et il fonctionne (mon code est similaire au code que vous avez fourni cette réponse). Avant, j'utilisais un contrôle caché sur une forme précédente pour stocker les variables-vilaine solution car je ne savais pas à propos de la fonction Rechdom(). Merci de me mettre au courant de ça, je suis sûr que je vais l'utiliser souvent dans l'avenir, comme je suis plus à l'aise avec la codification de mes insertions,mises à jour et supprime en VBA plutôt que d'utiliser la valeur par défaut des opérations fournies par les assistants.
Une fois, il m'est apparu que vous avez vraiment envie de les SÉLECTIONNER EN variable, DLookup() apparue comme la solution la plus simple. Quand j'ai lu votre question, j'en ai mal interprété le but que le stockage d'une valeur Sélectionnée dans une table (nouveau ou existant).
Je pense que c'est ce Remou et de la pensée Chrétienne aussi. Je suis habitué à l'aide de SELECT INTO pour obtenir des valeurs d'un tableau dans une variable locale en PL/SQL. C'est là que la confusion découle. Je ne voulais pas "SÉLECTIONNER", je voulais savoir ce que l'Accès équivalent de cette opération. DLookup est la réponse que je cherchais.

OriginalL'auteur HansUp

Vous devez vous connecter pour publier un commentaire.