Wenn Sie sich vom Niveau der ASP-Enthusiasten lösen möchten, sollten Sie lernen, Komponenten für ASP zu schreiben. Ich habe bei Google gesucht und festgestellt, dass es nur wenige Artikel zum Schreiben von ASP-Komponenten in Delphi gibt. Deshalb habe ich heute diesen grundlegenden Artikel über das Schreiben von ASP-Komponenten in Delphi geschrieben. Ich hoffe, dass er für Anfänger hilfreich ist.
Schreiben wir zunächst ein „Hallo Welt!“-Beispiel. Ich verwende hier Delphi 7.
1.Datei->Neu->Andere->ActiveX->ActiveX-Bibliothek, dann speichern Sie es als showdll.dpr
2. Gehen Sie erneut zu Datei->Neu->Andere->ActiveX->ActiveX-Serverobjekt, geben Sie CoClassName ein: showhello, lassen Sie alles andere unverändert und klicken Sie auf OK.
3. Beginnen Sie nun mit dem Schreiben des Programms und fügen Sie zunächst eine Methode hinzu. Wählen Sie Ishowhello->Rechtsklick->Neu->Methode und geben Sie den Methodennamen ein: sayworld.
4. Beginnen Sie nun mit dem Schreiben des Programms, speichern Sie Unit1 als show.pas und fügen Sie dann den Code der Methode sayworld hinzu
Der gesamte Code von show.pas lautet wie folgt:
unit show;
{$WARN SYMBOL_PLATFORM AUS}
Schnittstelle
verwendet
ComObj, ActiveX, AspTlb, showdll_TLB, StdVcl;
type
Tshowhello = class(TASPObject, Ishowhello)
protected
procedure OnStartPage
(const
AScriptingContext: IUnknown)
;
Durchführung
verwendet ComServ;
procedure Tshowhello.OnEndPage;
begin
inherited OnEndPage
;
procedure Tshowhello.OnStartPage(const AScriptingContext: IUnknown);
begin
inherited OnStartPage(AScriptingContext)
;
//Definieren Sie die sayworld-Methode
begin
Response.Write('Hello world'); inside Es ist auf die gleiche Weise geschrieben, nur hier zusammengefasst.
Ende;
Initialisierung
TAutoObjectFactory.Create(ComServer, Tshowhello, Class_showhello,
ciMultiInstance
,
tmApartment);
Klicken Sie auf „Ausführen“, um es in eine DLL zu kompilieren und automatisch zu registrieren. Zu diesem Zeitpunkt wird Folgendes angezeigt:
Lassen Sie es auf dem Webserver ausführen. Schreiben Sie jetzt eine ASP-Datei und rufen Sie sie auf. Wir können einfach die aufrufende Methode ändern.
Der geänderte showhello.asp-Code lautet wie folgt:
<HTML>
<BODY>
<TITLE> Testing Delphi ASP </TITLE>
<CENTER>
<H3> Sie sollten die Ergebnisse Ihrer Delphi Active Server-Methode unten sehen </H3>
</ CENTER >
<HR>
<% Set DelphiASPObj = Server.CreateObject("showdll.showhello")
DelphiASPObj.sayworld
%>
<HR>
</BODY>
</HTML>
Führen Sie es auf der iis-Site aus, um den Effekt zu sehen:
5. Sonstiges:
Bei in Delphi geschriebenen Komponenten können Sie nach der Registrierung beim Win2000-Komponentendienst die Schnittstellenmethode der Komponente anzeigen.
6. Es gibt auch Parameter, die zwischen ASP-Seiten und Komponenten übergeben werden. Tatsächlich werden Parameter an die aufgerufenen Methoden (Funktionen) übergeben. Beachten Sie, dass sie bei der Definition in Delphi mit dem Datentyp von VBS übereinstimmen müssen. Es ist besser für alle, diese mehr zu üben. Der Hauptzweck hier besteht darin, jedem zu ermöglichen, den Kerncode von ASP zu kapseln, und als Ausgangspunkt zu dienen.
Es gibt nicht viele Worte, um dies zu beschreiben, aber das Erstellen von Screenshots ist etwas mühsam. Mein Level ist begrenzt. Wenn ich einen Fehler mache, geben Sie ihm bitte eine sanfte Ohrfeige! ! ! !
Ein Wind und eine
Wolke2004-10-18