ACC97 : Comment faire pour créer des boutons de navigation personnalisé sur une page ASP

Traductions disponibles Traductions disponibles
Numéro d'article: 165629 - Voir les produits auxquels s'applique cet article
Cet article a été archivé. Il est proposé « en l'état » et ne sera plus mis à jour.
Modéré : Nécessite macro base, de codage et les compétences de l'interopérabilité.

Agrandir tout | Réduire tout

Résumé

Lorsque vous exportez un formulaire à partir de Microsoft Access 97 comme une page ASP et que ce formulaire contient des boutons personnalisés, déplacer d'un enregistrement à l'autre, les boutons ne fonctionnera pas sur votre formulaire de Active Server Page. Cette erreur se produit car le code Visual Basic qui exécute les actions dans Microsoft Access n'est pas exporté vers votre formulaire de Active Server Page.

Il existe deux méthodes pour que les boutons de navigation apparaissent sur votre formulaire de Page Active Server :
  • Utilisez les boutons de navigation intégrée Microsoft Access et attribuez Oui à la propriété de navigation du formulaire.
  • Modifier le code VBScript pour le formulaire de page ASP que vous exportez afin que le code rendent de se déplacer dans votre formulaire que vous cliquez sur un bouton.

Plus d'informations

Remarque : Cette section contient des informations sur la modification des fichiers ASP et suppose que vous êtes familiarisé avec la modification des fichiers HTML, ASP et Visual Basic Scripting. Professionnels du support du produit Microsoft Access ne prennent pas en charge la personnalisation de tout code HTML, HTX, fichiers IDC ou ASP.

Cet article illustre une méthode qui crée les boutons de navigation personnalisé qui vous permettent de se déplacer dans le formulaire en modifiant le code VBScript pour le fichier Active Server Pages. Pour modifier le code VBScript pour un formulaire particulier, procédez comme suit :
  1. Créer le formulaire que vous utilisez comme une page ASP et ajoutez les boutons de commande suivants au formulaire :
       Command Button:
          Name: MoveNextRecord
          Caption: MoveNextRecord
    
       Command button:
          Name: MoveFirstRecord
          Caption: MoveFirstRecord
    
       Command button:
          Name: MoveLastRecord
          Caption: MoveLastRecord
    					
  2. Attribuez la propriété navigation du formulaire.
  3. Exporter le formulaire au format de page ASP et notez le dossier vers lequel le fichier est exporté. Il doit y avoir deux fichiers dans ce dossier sont associés à votre page ASP. Un des fichiers va contenir les caractères «alx"(sans les guillemets).
  4. Utilisez le bloc-notes ou un autre éditeur de texte pour ouvrir le fichier qui contient les caractères «alx.» Vous devriez voir code semblable au suivant :
          <SCRIPT LANGUAGE=VBScript>
          <!--
          Dim rgszCtrls(6,2)
          Dim cMaxCtrls
          cMaxCtrls = 6
    
          Sub AddCtrlToList(szCtrl, szCtrlSrc)
              Dim i
              for i = 1 to cMaxCtrls
                  if rgszCtrls(i, 1) = szCtrl Then Exit Sub
                  if rgszCtrls(i, 1) = "" Then
                      rgszCtrls(i, 1) = szCtrl
                      rgszCtrls(i, 2) = szCtrlSrc
                      Exit Sub
                   End If
               next
           End Sub
    					
  5. Ajoutez les trois procédures Sub suivants au code juste avant la ligne suivante</script>.

    Remarque : Dans l'exemple de code suivant, un trait de soulignement (_) à la fin d'une ligne est utilisé comme un caractère de continuation de ligne. Supprimez le trait de soulignement de fin de la ligne lors de la reprogrammation.
          Sub FirstRecord_MoveFirstRecord_Click()
    
              Window.Location.Href =
                  "/scripts/formname.asp?nav_btn=nav_btn_MoveFirstRecord&" _
              & GetCtrlQueryString()
    
          End Sub
    
          Sub NextRecord_MoveNextRecord_Click()
    
              Window.Location.Href =
                  "/scripts/formname.asp?nav_btn=nav_btn__MoveNextRecord&" _
              & GetCtrlQueryString()
    
          End Sub
    
          Sub LastRecord_MoveLastRecord_Click()
    
              Window.Location.Href =
              "/scripts/formname.asp?nav_btn=nav_btn__MoveLastRecord&" _
              & GetCtrlQueryString()
    
          End Sub
    					
  6. Modifier les ID de OBJECT pour les contrôles ci-dessus dans la</script> de section et remplacez les noms comme suit :
           FirstRecord = FirstRecord_MoveFirstRecord.
           NextRecord = NextRecord_MoveNextRecord.
           LastRecord = LastRecord_MoveLastRecord.
    					
  7. Fermez et enregistrez le fichier.
  8. Ouvrez votre navigateur Web et votre formulaire de Active Server Page. Cliquez sur un des boutons de commande personnalisée. Les boutons doivent permettent maintenant de vous déplacer entre les pages.

Références

Pour plus d'informations sur ce que peuvent être exporté au format ASP, recherchez dans l'index de l'aide de «Fichiers ASP», puis afficher la rubrique «Using Supported et contrôles de formulaire non pris en charge pour le format ASP dynamique» ou formulez votre question au Compagnon Office de Microsoft Access 97.

Propriétés

Numéro d'article: 165629 - Dernière mise à jour: jeudi 13 février 2014 - Version: 3.3
Les informations contenues dans cet article s'appliquent au(x) produit(s) suivant(s):
  • Microsoft Access 97 Standard
Mots-clés : 
kbnosurvey kbarchive kbmt kbhowto kbinterop kbprogramming KB165629 KbMtfr
Traduction automatique
IMPORTANT : Cet article est issu du système de traduction automatique mis au point par Microsoft (http://support.microsoft.com/gp/mtdetails). Un certain nombre d?articles obtenus par traduction automatique sont en effet mis à votre disposition en complément des articles traduits en langue française par des traducteurs professionnels. Cela vous permet d?avoir accès, dans votre propre langue, à l?ensemble des articles de la base de connaissances rédigés originellement en langue anglaise. Les articles traduits automatiquement ne sont pas toujours parfaits et peuvent comporter des erreurs de vocabulaire, de syntaxe ou de grammaire (probablement semblables aux erreurs que ferait une personne étrangère s?exprimant dans votre langue !). Néanmoins, mis à part ces imperfections, ces articles devraient suffire à vous orienter et à vous aider à résoudre votre problème. Microsoft s?efforce aussi continuellement de faire évoluer son système de traduction automatique.
La version anglaise de cet article est la suivante: 165629
L'INFORMATION CONTENUE DANS CE DOCUMENT EST FOURNIE PAR MICROSOFT SANS GARANTIE D'AUCUNE SORTE, EXPLICITE OU IMPLICITE. L'UTILISATEUR ASSUME LE RISQUE DE L'UTILISATION DU CONTENU DE CE DOCUMENT. CE DOCUMENT NE PEUT ETRE REVENDU OU CEDE EN ECHANGE D'UN QUELCONQUE PROFIT.

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com