Vor langer Zeit dokument, sortiert und erinnert
Verwenden Sie VB, um ASP zu verkörpern und ein Sayhello -Testprogramm einzurichten
1. Öffnen Sie VB6 und erstellen Sie eine neue ActiveXDLL
2. Fügen Sie Microsoft ActiveServerpagesObjectLibrary zur Projektreferenz hinzu
3. Füllen Sie den Code wie folgt aus:
'Codestart
'Deklarationsteil
PrivatemyScriptingContextAscriptingContext
Privatemy ApplicationAsApplication
PrivatemyRequestasRequest
PrivatemyresponseasResponse
PrivatemyServerasserver
PrivatemySessionAssession
'Die folgende definiert eine gemeinsame Funktion (Zugriff auf das ASP -Objekt in VB, dh in VB kann MyRequest in ASP äquivalent mit der Anwendung in ASP entsprechen. MyResponse entspricht der Reaktion in ASP, MyServer ist gleichwertig mit Server in ASP, MySession ist gleichbedeutend mit der Sitzung in ASP -Session.
PublicsubonStartPage (CENTOLSSCRIPTINGCONTEXTASSCRIPTINGCONTEXT)
SetMyScriptingContext = CENTENSCIPTINGCONTEXT
SetMyApplication = myScriptingContext.Application
SetMyRequest = myScriptingContext.request
SetMyResponse = myScriptingContext.response
SetMyServer = myScriptingContext.server
SetMySession = myScriptingContext.Session
Ende
PublicsubonendPage ()
SetMyScriptingContext = nichts
SetMyApplication = nichts
SetMyRequest = nichts
SetMyResponse = nichts
SetMyServer = nichts
SetMySession = nichts
Ende
'Erstellen Sie benutzerdefinierte Funktion Sayhello
Publicsubsayhello ()
MyResponse.write ("helloWorld")
Ende
'Codeend
V.
5. Generieren Sie die Datei testVbCode.dll und verwenden Sie Windows, um den RegSVR32 -Pfad/testVbCode.dll zu registrieren und zu verwenden. (Der Befehl Deinstall -Komponenten ist regsvr32/u Path/testVbCode.dll)
6. Erstellen Sie die Datei test.asp, der Code ist wie folgt
<%
'VB Selbstgebaute Funktionsaufrufformat
'Object name = server.createObject ("Projektname.Class -Name")
'Objektname. Selbstgebauter Funktionsname
SetMyTestObj = server.createObject ("testVbCode.Helloworld")
MyTestobj.sayhello
%>
7. Die Ergebnisse beim Ausführen der Test.asp -Datei werden wie folgt angezeigt:
HelloWorld
Das obige Beispiel öffnet die Tür zu Ihrer VB -Programmierwelt
Kommen wir zusammen, haha!