Jika Anda ingin keluar dari tingkat penggemar ASP, maka Anda harus belajar menulis komponen untuk ASP. Saya mencari di Google dan menemukan bahwa hanya ada beberapa artikel di Delphi menulis komponen ASP, jadi hari ini saya menulis artikel dasar ini di Delphi menulis komponen ASP, berharap itu akan membantu bagi para pemula. Jika Anda ingin mempelajari VB untuk menulis komponen ASP, disarankan untuk memeriksa artikel dengan Tornado Big Brother (http://blog.csdn.net/online/category/9939.aspx), yang bukan sesuatu yang dapat saya bandingkan dengan. hehe :)
Mari kita mulai, mari kita tulis contoh "Hello World!" Saya menggunakan Delphi 7 di sini.
1. File-> New-> Other-> ActiveX-> ActiveX Library, lalu simpan sebagai showdll.dpr
2. Lagi, File -> Baru -> Objek lain -> ActiveX -> ActiveX Server, Isi CoclassName: Showhello, yang lain tetap tidak berubah, klik OK.
3. Sekarang mulailah menulis program dan tambahkan metode terlebih dahulu. SELECT ISHOWHELLO-> klik kanan-> metode baru->, dan isi nama metode: Sayworld.
4. Sekarang mulailah menulis program, simpan unit1 sebagai show.pas, dan kemudian tambahkan kode metode Metode SayWorld
Kode lengkap show.pas adalah sebagai berikut:
pertunjukan unit;
{$ Warnn simbol_platform off}
antarmuka
penggunaan
Comobj, ActiveX, asptlb, showdll_tlb, stdvcl;
jenis
Tshowhello = class (TaspObject, Ishowhello)
terlindung
Prosedur Onendpage;
Prosedur distartpage (const ascriptingcontext: iunknown);
Prosedur Saysworld;
akhir;
Pelaksanaan
menggunakan comserv;
Prosedur tshowhello.onendpage;
Mulai
diwarisi Onendpage;
akhir;
Prosedur tshowhello.onstartpage (const ascriptingcontext: iunknown);
Mulai
diwarisi onStartPage (ascriptingContext);
akhir;
Prosedur Tshowhello.sayworld ();
Mulai
Response.write ('Hello World'); // Sintaks di dalamnya ditulis dengan cara yang sama seperti ASP, dan dienkapsulasi di sini.
akhir;
Inisialisasi
Tautoobjectfactory.create (comserver, tshowhello, class_showhello,
cimultiinstance, tmapartment);
akhir.
4. Klik Jalankan, kompilasi menjadi DLL, dan secara otomatis mendaftarkannya. Saat ini, Anda akan meminta:
Memungkinkan Anda meletakkannya di server web untuk dijalankan.
Kode showhello.asp yang dimodifikasi adalah sebagai berikut:
<Html>
<body>
<title> menguji delphi asp </iteme>
<senter>
<h3> Anda harus melihat hasil metode server aktif delphi Anda di bawah </h3>
</penter>
<Hr>
<% Set delphiaspoBj = server.createObject ("showdll.showhello")
Delphiaspobj.sayworld
%>
<Hr>
</body>
</html>
Jalankan di bawah situs IIS untuk melihat efeknya:
5. lainnya:
Komponen yang ditulis oleh Delphi, setelah mendaftar dengan layanan komponen Win2000, Anda dapat melihat metode antarmuka komponen
6. Ada juga parameter yang lulus antara halaman ASP dan komponen, yang sebenarnya untuk meneruskan parameter ke metode yang disebut (fungsi). Tolong berlatih lebih banyak ini. Ini terutama untuk mempelajari cara merangkum kode inti ASP dan memainkan peran dalam menarik Jade.