Hallo zusammen<br>
Ich habe folgendes getan (ich benutze Delphi 5 Professional):<br>
Neu->ActiveX->ActiveX-Bibliothek<br>
Neu->ActiveX->Active-Server-Object<br>
Name der CoClass: myASPObj<br>
Instantiierung: Mehrere Instanzen<br>
Threading-Modell: Apartment<br>
Active-Server-Typ: Objektkontext<br>
Für dieses Objekt ein Vorlagen-Test-Script generieren: Ja<br><br>
Im Typeditor IMyASPObj eine Methode hinzugefügt (myWrite), Methode ohne Paramater, ohne Rückgabewert. Dann "Implementierung aktualisieren gedrückt und in Unit1 folgenden Code hinzugefügt/ergänzt:
<pre>
procedure TMyASPObj.myWrite;
begin
response.Write('Ein Testaufruf');
end;
</pre><br>
Dann habe ich das von Delphi vorgenerierte asp-Skript MyASPObj.asp aktualiesiert:<br>
<pre>
<HTML>
<BODY>
<TITLE> Test von Delphi ASP </TITLE>
<CENTER>
<H3> Sie sollten das Ergebnis Ihrer Delphi Active Server-Methode unten sehen</H3>
</CENTER>
<HR>
<% Set DelphiASPObj = Server.CreateObject("ASPTest.MyASPObj")
DelphiASPObj.myWrite
%>
<HR>
</BODY>
</HTML></pre><br><br>
Dann habe ich alles gespeichert - das asp-Skript unter C:\Inetpub\wwwroot\myASPObj.asp; Unit1 unter c:\Inetpub\scripts\test.pas; Project2 unter c:\Intepub\scripts\ASPTest.dpr.<br><br>
Dann habe ich das ganze kompiliert (Strg+F9) und den ActiveX-Server erfolgreich eingetragen (Start->ActiveX-Server eintragen).<br>
Als nächstes habe ich dann den Internet Explorer gestartet und als URL myASPObj.asp eingegeben. Resultat: schwerwiegender Fehler /myASPObj.asp, line 9 (das ist der Aufruf von myWrite). Häufig habe ich auch die Meldung "Das Objekt unterstützt die Methode nicht"...<br>
Was mache ich da falsch?<br>
Auf meinem XP-Rechner läuft als Webserver übrigens der IIS V5.1<br>
Danke im voraus<br>
Patrick
Ich habe folgendes getan (ich benutze Delphi 5 Professional):<br>
Neu->ActiveX->ActiveX-Bibliothek<br>
Neu->ActiveX->Active-Server-Object<br>
Name der CoClass: myASPObj<br>
Instantiierung: Mehrere Instanzen<br>
Threading-Modell: Apartment<br>
Active-Server-Typ: Objektkontext<br>
Für dieses Objekt ein Vorlagen-Test-Script generieren: Ja<br><br>
Im Typeditor IMyASPObj eine Methode hinzugefügt (myWrite), Methode ohne Paramater, ohne Rückgabewert. Dann "Implementierung aktualisieren gedrückt und in Unit1 folgenden Code hinzugefügt/ergänzt:
<pre>
procedure TMyASPObj.myWrite;
begin
response.Write('Ein Testaufruf');
end;
</pre><br>
Dann habe ich das von Delphi vorgenerierte asp-Skript MyASPObj.asp aktualiesiert:<br>
<pre>
<HTML>
<BODY>
<TITLE> Test von Delphi ASP </TITLE>
<CENTER>
<H3> Sie sollten das Ergebnis Ihrer Delphi Active Server-Methode unten sehen</H3>
</CENTER>
<HR>
<% Set DelphiASPObj = Server.CreateObject("ASPTest.MyASPObj")
DelphiASPObj.myWrite
%>
<HR>
</BODY>
</HTML></pre><br><br>
Dann habe ich alles gespeichert - das asp-Skript unter C:\Inetpub\wwwroot\myASPObj.asp; Unit1 unter c:\Inetpub\scripts\test.pas; Project2 unter c:\Intepub\scripts\ASPTest.dpr.<br><br>
Dann habe ich das ganze kompiliert (Strg+F9) und den ActiveX-Server erfolgreich eingetragen (Start->ActiveX-Server eintragen).<br>
Als nächstes habe ich dann den Internet Explorer gestartet und als URL myASPObj.asp eingegeben. Resultat: schwerwiegender Fehler /myASPObj.asp, line 9 (das ist der Aufruf von myWrite). Häufig habe ich auch die Meldung "Das Objekt unterstützt die Methode nicht"...<br>
Was mache ich da falsch?<br>
Auf meinem XP-Rechner läuft als Webserver übrigens der IIS V5.1<br>
Danke im voraus<br>
Patrick
Comment