idover
Jun 6th, 2001, 05:34 PM
sorry for the multiple post, but i just realized that more people view this forum than than the com/activex... thanks
This is driving me nuts... i have a component created that was working the last time that i used it... why won't this work!?!? * beats head against wall*... i have deleted a lot of code that would be useless on a forum...
asp returns:
Object variable or With block variable not set
and the problem is the sub Test... if i comment out the objResponse line, it runs fine...
I know that the component is instantiated, because it will execute an ado connection just fine, but when i try to use the asp intrinsic objects, it fails... any ideas?... thanks, in advance!
Private objApplication As Application
Private objRequest As Request
Private objResponse As Response
Private objServer As Server
Private objSession As Session
Public Sub OnStartPage(sc As Object)
Set objApplication = sc.Application
Set objRequest = sc.Request
Set objResponse = sc.Response
Set objServer = sc.Server
Set objSession = sc.Session
End Sub
Public Sub Test()
objResponse.Write "THIS IS A TEST"
End Sub
Public Sub OnEndPage()
Set objApplication = Nothing
Set objRequest = Nothing
Set objResponse = Nothing
Set objServer = Nothing
Set objSession = Nothing
End Sub
This is driving me nuts... i have a component created that was working the last time that i used it... why won't this work!?!? * beats head against wall*... i have deleted a lot of code that would be useless on a forum...
asp returns:
Object variable or With block variable not set
and the problem is the sub Test... if i comment out the objResponse line, it runs fine...
I know that the component is instantiated, because it will execute an ado connection just fine, but when i try to use the asp intrinsic objects, it fails... any ideas?... thanks, in advance!
Private objApplication As Application
Private objRequest As Request
Private objResponse As Response
Private objServer As Server
Private objSession As Session
Public Sub OnStartPage(sc As Object)
Set objApplication = sc.Application
Set objRequest = sc.Request
Set objResponse = sc.Response
Set objServer = sc.Server
Set objSession = sc.Session
End Sub
Public Sub Test()
objResponse.Write "THIS IS A TEST"
End Sub
Public Sub OnEndPage()
Set objApplication = Nothing
Set objRequest = Nothing
Set objResponse = Nothing
Set objServer = Nothing
Set objSession = Nothing
End Sub