Cet article crée un fichier ActiveXDLL via VB5.0. Ce fichier simule un processus de lancement d'un sous-sous-marin et vous présente le sujet de la façon d'appeler la DLL dans ASP.
La bibliothèque Dynamic Join (DLL) est un moyen important d'accélérer l'exécution des parties clés d'une application, mais une chose n'est probablement pas connue de la plupart des gens, c'est-à-dire que le fichier ASP peut également appeler des DLL pour accélérer l'exécution du serveur. Ci-dessous, je présenterai brièvement les étapes d'appel des DLL dans un fichier ASP.
Tout d'abord, il doit y avoir un fichier DLL. Cet exemple est de créer un fichier ActiveXDLL via VB5.0. Ce fichier simule un processus de lancement d'un sous-marin de couleur.
Dans l'environnement VB5.0, créez un nouveau projet et double-cliquez sur l'icône ActiveXDLL dans la nouvelle fenêtre du projet. VB ajoutera automatiquement un module de classe au projet et définira le type de projet sur ActiveXDLL. Dans la fenêtre Propriétés, modifiez l'attribut de nom du module de classe sur CLSDice. Dans le menu du projet, sélectionnez les propriétés du projet et modifiez le nom du projet en MyDLL. Dans le menu Fichier, sélectionnez Enregistrer CLSDice pour enregistrer le module de classe sous MyDice.cls. Ajouter le code suivant:
Option Explicit
Privatemax, Pointasinteger
PublicPropertyGetResult () Asinteger
Résultats = point
Endproperty
PublicPropertyGetMaxPoint () Asinteger
Maxpoint = max
Endproperty
PublicProperTyletMaxpoint (Numasinteger)
Max = num
Endproperty
PublicSubthrow ()
Randomiser
Point = int (rnd * max) +1
Fin
PRIVATESUBCLASS_INITIALIZE ()
Max = 6
Fin
Ce module de classe définit deux propriétés et une méthode de l'objet CLSDice. Ces propriétés et méthodes simulent le processus de lancement de la pièce de couleur. La propriété Maxpoint représente le nombre de faces de la pièce de couleur. L'ajout de l'instruction PropertyLet permettra au client de modifier les faces de la pièce de couleur; La propriété du résultat représente le nombre de points du dernier lancer de la pièce de couleur; La méthode de lancer représente l'action de lancer la pièce de couleur; L'instruction PRIVÉSUBCLASS_INITIALIZE définit le nombre par défaut de faces de la pièce de couleur sur 6 faces.
Dans le menu Fichier, sélectionnez Générer Mydll.dll et enregistrez-le à l'endroit approprié. À ce stade, nous avons créé notre propre fichier DLL.
La deuxième étape consiste à se référer à la classe CLSDice dans le fichier ASP.
Tout le code d'ASP (ActiveServerPages) est exécuté sur le serveur, et les clients ne peuvent afficher que les résultats renvoyés en HTML. Il utilise les balises "<%" et "%>" pour identifier le code de script et ne le transmet pas au client et utilise des balises HTML pour identifier le contenu en dehors du code. Dans le code DICE.asp suivant, la fonction CreateObject est utilisée pour créer une instance d'objet CLSDice, qui provient du fichier activex.dll - mydll.dll créé ci-dessus. L'exemple suivant utilise le langage de script VBScript.
<! - metadatatype = "typelib" file = "path / mydll.dll" ->