Question : La commande ou l'action « DeleteRecord » n'est pas disponible maintenant.

Dans l'accès 2007, j'ai une fonction dans un module qui supprime le disque actuellement choisi quand l'article de menu de disque de suppression est choisi.   Dans les versions préalables de l'accès, nous avons employé SendKeys « {SUPPRESSION} », rectifions - qui ne fait rien maintenant à moins que faire le sale record (éditer l'icône apparaît).  Ainsi, j'ai commuté à l'acCmdDeleteRecord de DoCmd.RunCommand.  Ce cause à l'erreur « la commande ou l'action DeleteRecord n'est pas disponible maintenant ». le

I ont confirmé que la forme permet des suppressions, faites un démantèlement si la forme est sale, veillé que la forme n'est pas lue seulement. Ce n'est pas un subform, c'est un état ordinateur autonome, et le problème se pose également avec forms.

I AM coincé - toutes les idées que n'importe qui obtenu serait beaucoup apprécié.  Thanks. class= > " clair " de
> de " codeSnippet " de class= de
class= " lineNumbers " de
class= de 
1 :
2 :
3 :
4 :
5 :
6 :
7 :
8 :
9 :
10 :
11 :
12 :
13 :
14 :
15 :
16 :
17 :
18 :
19 :
20 :
21 :
22 :
23 :
24 :
25 :
26 :
27 :
28 :
29 :
30 :
31 :
32 :
33 :
34 :
35 :
36 :
37 :
38 :
39 :
40 :
41 :
42 :
43 :
44 :
45 :
46 :
47 :
48 :
49 :
50 :
51 :
52 :
53 :
54 :
55 :
56 :
57 :
58 :
59 :
60 :
61 :
62 :
63 :
64 :
65 :
66 :
67 :
68 :
69 :
70 :
71 :
72 :
73 :
74 :
fonction >Public " de l'id= " codeSnippet808021 de 
 0 d'Err.Number puis
      ExitRoutine GoTo
   Finir si
   Sur l'erreur ErrorHandler GoTo
   
   'Si la forme n'a aucun RecordSource, aucun besoin de continuer.
   Si Format$ (frm.RecordSource) = "" alors
      ExitRoutine GoTo
   Finir si
   
   'Si c'est un nouveau record, aucun besoin de continuer.
   Si frm.NewRecord alors
      ExitRoutine GoTo
   Finir si
   
   'Tous si bien, faire ainsi ce que nous sommes venus ici pour faire.
   gstrActiveFormForDeleteRecord = frm. Nom
   
   'Envoyer le F2 pour s'assurer que l'utilisateur n'a pas choisi tous les disques.
   SendKeys « {F2} », vrai
   
   'Choisir l'article courant (et assurer que seulement un est choisi !)
   Sur l'erreur reprendre après
   acCmdSelectRecord de RunCommand
   Si <> 0 d'Err.Number puis
      ExitRoutine GoTo
   Finir si
   Sur l'erreur ErrorHandler GoTo
   
   'Faire l'option record de menu de « suppression régulière ».
   'Sur le résumé d'erreur après
   
   Si frm. Sale = rectifier alors
    frm. Défaire
   Finir si
   
 
   acCmdDeleteRecord de DoCmd.RunCommand
   'SendKeys « {SUPPRESSION} », vraie

   gobjLastError.Save errent, strProcedureName
   Sur l'erreur ErrorHandler GoTo
   Choisir le cas gobjLastError.Number
      Pas affaire 0 'aucunes erreurs
         'Ne faire rien
      Enfermer autrement
         'Donner une erreur système pour toute autre chose.
         gobjLastError.Raise gobjLastError.Number et « :  » et gobjLastError.Description
   Extrémité choisie
   
ExitRoutine :
   Sur le résumé d'erreur après
   gstrActiveFormForDeleteRecord = ""
   Sortir la fonction
ErrorHandler :
   gobjLastError.Save errent, strProcedureName
   Choisir le cas gobjLastError.Number
      Enfermer autrement
         gobjLastError.Show
         Reprendre ExitRoutine
   Finir choisi
Finir la fonction
class= de

Réponse : La commande ou l'action « DeleteRecord » n'est pas disponible maintenant.

Employer ceci à la place
1 :
2 :
3 :
4 :

   Obscurcir les rs comme Recordset
   Placer les rs = le frm. Recordset
   rs. Suppression
   rs. Requery
Autres solutions  
  •  MS Excel 2007 et pdf - l'exportation vers le pdf prend de longues heures !
    •
  •  Dans le Perl, comment j'ajoute une valeur à la liste, puis le contrôle pour voir si la valeur existent avant d'ajouter une nouvelle valeur
    •
  •  Comment fais j'initialiser de la HP BL460c G6 de san et de la HP XP 240000
    •
  •  Comment fais j'employer une clef de permis de volume sur un ordinateur de HP avec du CD de restauration
    •
  •  Emplacement primaire de deux SCCM dans l'annuaire actif
    •
  •  L'initiateur et la HP D2D de l'iSCSI R2 du serveur 2008 de Windows GERCENT l'issue
    •
  •  Stocker le dossier dans le mysql using connector.net et le champ de goutte
    •
  •  Carte vidéo d'USB - bit 32 sur le matériel travaillant au niveau du bit 64 ?
    •
  •  asp.net que j'essaye de convertir une forme de HTML en forme d'aspx ou ? ce qui jamais. Aide du besoin sur la façon dont à à elle.
    •
  •  Winzip 12 issues de secours du travail ?
    •
     
    programming4us programming4us