Si vous souhaitez vous éloigner du niveau des passionnés d'ASP, vous devriez alors apprendre à écrire des composants pour ASP. J'ai cherché sur Google et découvert qu'il n'y avait que quelques articles sur l'écriture de composants asp dans Delphi, j'ai donc écrit aujourd'hui cet article de base sur l'écriture de composants asp dans Delphi. J'espère qu'il sera utile aux novices.
Pour commencer, écrivons un exemple « hello world ! » J'utilise Delphi 7 ici.
1.Fichier->Nouveau->Autre->ActiveX->Bibliothèque ActiveX, puis enregistrez-le sous showdll.dpr
2. Encore une fois, allez dans Fichier->Nouveau->Autres->ActiveX->Objet serveur ActiveX, remplissez CoClassName : showhello, laissez tout le reste inchangé et cliquez sur OK.
3. Commencez maintenant à écrire le programme et ajoutez d’abord une méthode. Sélectionnez Ishowhello->clic droit->Nouveau->Méthode et remplissez le nom de la méthode : sayworld.
4. Commencez maintenant à écrire le programme, enregistrez Unit1 sous show.pas, puis ajoutez le code de la méthode sayworld 
Le code complet de show.pas est le suivant :
unit show ;
{$WARN SYMBOL_PLATFORM DÉSACTIVÉ}
interface
utilise
ComObj, ActiveX, AspTlb, showdll_TLB, StdVcl ;
tapez
Tshowhello = class(TASPObject, Ishowhello)
procédureprotégée
OnEndPage ;
procédure safecall OnStartPage(const AScriptingContext : IUnknown ;
procédure sayworld
;
mise en œuvre
utilise ComServ ;
procédure Tshowhello.OnEndPage ;
début
hérité dela fin de
OnEndPage
;procédure Tshowhello.OnStartPage
(
const AScriptingContext: IUnknown);
start
héritée
OnStartPage(AScriptingContext
)
;
à l’intérieur C’est écrit de la même manière, juste encapsulé ici.
fin;
initialisation
TAutoObjectFactory.Create(ComServer, Tshowhello, Class_showhello,
ciMultiInstance, tmApartment
fin
4. Cliquez sur Exécuter pour le compiler dans une DLL et l'enregistrer automatiquement. À ce moment-là, il vous demandera :
Laissez-vous l'exécuter sur le serveur Web. D'accord, écrivez maintenant un fichier asp et appelez-le. Notez que Delphi a déjà généré un fichier asp. Nous pouvons simplement modifier la méthode d'appel.
Le code showhello.asp modifié est le suivant :
<HTML>
<BODY>
<TITLE> Test Delphi ASP </TITLE>
<CENTER>
<H3> Vous devriez voir les résultats de votre méthode Delphi Active Server ci-dessous </H3>
</ CENTER >
<HR>
<% Set DelphiASPObj = Server.CreateObject("showdll.showhello")
DelphiASPObj.sayworld
%>
<HR>
</BODY>
</HTML>
Exécutez-le sur le site iis pour voir l'effet : 
5. Autres :
pour les composants écrits en Delphi, après vous être enregistré auprès du service de composants win2000, vous pouvez afficher la méthode d'interface du composant.
6. Il existe également des paramètres transmis entre les pages asp et les composants. En fait, les paramètres sont transmis aux méthodes appelées (fonctions). Notez que lorsqu'ils sont définis dans Delphi, ils doivent être cohérents avec le type de données de vbs. Il est préférable que tout le monde les pratique davantage. L'objectif principal ici est de permettre à chacun d'apprendre à encapsuler le code principal d'asp et de servir de point de départ.
Il n'y a pas beaucoup de mots pour les écrire, mais prendre des captures d'écran est un peu gênant. Mon niveau est limité. Si je fais une erreur, giflez-la doucement ! ! ! !
Un vent et un
nuage2004-10-18