ASP 호출 dll 및 패키지 dll 인 스 턴 스
'Code Start
'
Private MyScriptingContext As ScriptingContext
Private MyApplication As Application
Private MyRequest As Request
Private MyResponse As Response
Private MyServer As Server
Private MySession As Session
' ( VB ASP , VB MyApplication ASP Application、MyRequest ASP Request、 MyResponse ASP Response、 MyServer ASP Server、 MySession ASP Session )
Public Sub OnStartPage(PassedScriptingContext As ScriptingContext)
Set MyScriptingContext = PassedScriptingContext
Set MyApplication = MyScriptingContext.Application
Set MyRequest = MyScriptingContext.Request
Set MyResponse = MyScriptingContext.Response
Set MyServer = MyScriptingContext.Server
Set MySession = MyScriptingContext.Session
End Sub
Public Sub OnEndPage()
Set MyScriptingContext = Nothing
Set MyApplication = Nothing
Set MyRequest = Nothing
Set MyResponse = Nothing
Set MyServer = Nothing
Set MySession = Nothing
End Sub
' SayHello
Public Sub SayHello()
MyResponse.Write ("Hello World")
End Sub
'Code End
4.클래스 이름 을 HelloWorld 로 바 꿉 니 다.프로젝트 이름 을 TestVBCode 5 로 바 꾸 고 TestVBCode.DLL 파일 을 생 성 하 며 Windows 에서 등록 구성 요소 명령 Regsvr 32 경 로 를 실행 합 니 다.\TestVBCode.DLL 을 등록 하면 사용 할 수 있 습 니 다.(구성 요소 마 운 트 해제 명령 은 Regsvr 32/u 경로\TestVBCode.DLL)6,Test.asp 파일 을 만 들 고 코드 는 다음 과 같 습 니 다
<%
'VB
'Set =Server.CreateObject(" . ")
' .
Set MyTestObj = Server.CreateObject("TestVBCode.HelloWorld")
MyTestObj.SayHello
%>
7,Test.asp 파일 을 실행 한 결과 다음 과 같 습 니 다:Hello World=================================================================이 인 스 턴 스 를 통 해 밖으로 확장 하면 됩 니 다.예 를 들 어
Public Sub connstr2()
Set conn = MyServer.CreateObject("ADODB.Connection")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & MyServer.MapPath("codata.mdb")
Set rs = conn.Execute("select * from news")
Do While Not rs.EOF
MyResponse.Write (rs("news_title") & "<br>")
rs.MoveNext
Loop
rs.Close
Set conn = Nothing
End Sub
이것 은 데이터베이스 로 연 결 된 코드 로 패키지 입 니 다.물론 ADO 참조 사항 을 추가 해 야 합 니 다.
이 내용에 흥미가 있습니까?
현재 기사가 여러분의 문제를 해결하지 못하는 경우 AI 엔진은 머신러닝 분석(스마트 모델이 방금 만들어져 부정확한 경우가 있을 수 있음)을 통해 가장 유사한 기사를 추천합니다:
ASP 호출 dll 및 패키지 dll 인 스 턴 스VB6 를 열 고 ActiveX DLL 2 를 새로 만 듭 니 다.프로젝트 참조 에 Microsoft Active Server Pages Object Library 를 추가 하여 3 을 선택 하고 코드 를 입력 하 ...
텍스트를 자유롭게 공유하거나 복사할 수 있습니다.하지만 이 문서의 URL은 참조 URL로 남겨 두십시오.
CC BY-SA 2.5, CC BY-SA 3.0 및 CC BY-SA 4.0에 따라 라이센스가 부여됩니다.