An intuitive utility to help find the CSS path to UI elements on a webpage. These paths are used frequently in a variety of front-end development and QA automation tasks.
One of a set of tools we're offering as a way of saying thank you for being a part of the community.
An object as a parameter in ASP function
Hi,
In ASP, I use a function which receives one parameter.
like this
--------------------------
Set Comohject = server.createobject("comob
testreveiver = testFunction(Comohject )
function testFunction(byval comobjectinfunction)
testFunction = comobjectinfunction.dosome
end function
set Comohject = nothing
--------------------------
My question is that the com object receives an object as parameter.
Is it good idea to use an object as a parameter in ASP? (If not, what other method I can use to pass an object to function.)
Do I have to destroy in function? (if yes, how to do?)
Thanks,
Andrew
In ASP, I use a function which receives one parameter.
like this
--------------------------
Set Comohject = server.createobject("comob
testreveiver = testFunction(Comohject )
function testFunction(byval comobjectinfunction)
testFunction = comobjectinfunction.dosome
end function
set Comohject = nothing
--------------------------
My question is that the com object receives an object as parameter.
Is it good idea to use an object as a parameter in ASP? (If not, what other method I can use to pass an object to function.)
Do I have to destroy in function? (if yes, how to do?)
Thanks,
Andrew
Asked:
-
6
-
4
1 Solution
A few examples:
the IsObject() inherently expects an object as a parameter.
Here are a few that I use for recordset and connection objects:
sub ClearRecordSet(ByRef strRecordSetName)
if IsObject(strRecordSetName)
if not strRecordSetName is Nothing Then
if strRecordSetName.state <> 0 then
strRecordSetName.close
end if
set strRecordSetName = Nothing
end if
end if
end sub
sub ClearConnection(ByRef strConnectionName)
if IsObject(strConnectionName
if not strConnectionName is Nothing Then
if strConnectionName.state <> 0 then
strConnectionName.close
end if
set strConnectionName = Nothing
end if
end if
end sub
So, what you are trying to do should be fine.
Fritz the Blank
the IsObject() inherently expects an object as a parameter.
Here are a few that I use for recordset and connection objects:
sub ClearRecordSet(ByRef strRecordSetName)
if IsObject(strRecordSetName)
if not strRecordSetName is Nothing Then
if strRecordSetName.state <> 0 then
strRecordSetName.close
end if
set strRecordSetName = Nothing
end if
end if
end sub
sub ClearConnection(ByRef strConnectionName)
if IsObject(strConnectionName
if not strConnectionName is Nothing Then
if strConnectionName.state <> 0 then
strConnectionName.close
end if
set strConnectionName = Nothing
end if
end if
end sub
So, what you are trying to do should be fine.
Fritz the Blank
Thanks,
I understand your code but I still have a question.
--------------------------
Set Comohject = server.createobject("comob
testreveiver = testFunction(Comohject )
function testFunction(byval comobjectinfunction)
testFunction = comobjectinfunction.dosome
end function
set Comohject = nothing
--------------------------
the scope of comobjectinfunction is only in the function.
so I think it doesn't need "set comobjectinfunction = nothing"
Do you know What the scope of the object variable in a function is?
More clearly, when the object is destroyed? just after the scope? or any time after the calling.
I am not sure that I understand. If you create an object and then pass it as a parameter, the object will stay in scope until it is explicity destroyed or until the session times out. If you had created the object within the function, that would of course be quite different--the scope would be inside the function only.
FtB
FtB
That's right.
Which one is right?
1. no set nothing - because the variable will be destroyed in automatically becasue the scope.
function testFunction(byval comobjectinfunction)
testFunction = comobjectinfunction.dosome
end function
2. use set nothing - the variable is an object so it should be destroyed manually.
function testFunction(byval comobjectinfunction)
testFunction = comobjectinfunction.dosome
set comobjectinfunction = nothing
end function
I think that it needs to be option 3:
Set Comohject = server.createobject("comob
function testFunction(byval comobjectinfunction)
testFunction = comobjectinfunction.dosome
end function
and then at the bottom of the page once you are done with the object:
set Comohject =Nothing
The reason is that since you create the object outside of the function, it has scope until you explicitly destroy it. Destroying it inside the function is not a good idea as you may need to access the object again. If nothing else, destroying it outside of the function maintains consistancy.
FtB
Set Comohject = server.createobject("comob
function testFunction(byval comobjectinfunction)
testFunction = comobjectinfunction.dosome
end function
and then at the bottom of the page once you are done with the object:
set Comohject =Nothing
The reason is that since you create the object outside of the function, it has scope until you explicitly destroy it. Destroying it inside the function is not a good idea as you may need to access the object again. If nothing else, destroying it outside of the function maintains consistancy.
FtB
But the parameter uses "Byval"
so the function copied the object whcih is a different object in the object on the page level.
I haven't tried doing this with ByVal--I always use ByRef.
However, if you would like to try it the way that you are doing, and you want to find out if the object has been destroyed, you can do this:
if isObject(Comohject) then
if not isNothing(Comohject) then
response.write("This object still needs to be destroyed!")
end if
end if
FtB
However, if you would like to try it the way that you are doing, and you want to find out if the object has been destroyed, you can do this:
if isObject(Comohject) then
if not isNothing(Comohject) then
response.write("This object still needs to be destroyed!")
end if
end if
FtB
Question has a verified solution.
Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.
Have a better answer? Share it in a comment.
Join & Write a Comment Already a member? Login.
Featured Post
The results are in! Meet the top members of our 2017 Expert Awards. Congratulations to all who qualified!
Tackle projects and never again get stuck behind a technical roadblock.
Join Now
Fritz the Blank