If IsObject(rs) then
rs.close
set rs=nothing
end if
If IsObject(rsLevel1) then
rsLevel1.close
set rsLevel1=nothing
end if
If IsObject(rsLevel2) then
rsLevel2.close
set rsLevel2=nothing
end if
If IsObject(rsLevel3) then
rsLevel3.close
set rsLevel3=nothing
end if
If IsObject(rsAboutMain) then
rsAboutMain.close
set rsAboutMain=nothing
end if
If IsObject(rsAboutSub) then
rsAboutSub.close
set rsAboutSub=nothing
end if
If IsObject(rsCustom) then
rsCustom.close
set rsCustom=nothing
end if
If IsObject(rsAbout) then
rsAbout.close
set rsAbout=nothing
end if
If IsObject(rsModules) then
rsModules.close
set rsModules=nothing
end if
If IsObject(rsArticle) then
rsArticle.close
set rsArticle=nothing
end if
If IsObject(rsCareer) then
rsCareer.close
set rsCareer=nothing
end if
If IsObject(rsCert) then
rsCert.close
set rsCert=nothing
end if
If IsObject(rsContact) then
rsContact.close
set rsContact=nothing
end if
If IsObject(rsLinks) then
rsLinks.close
set rsLinks=nothing
end if
If IsObject(rsLit) then
rsLit.close
set rsLit=nothing
end if
If IsObject(rsNews) then
rsNews.close
set rsNews=nothing
end if
If IsObject(conn) then
conn.close
set conn=nothing
end if
If IsObject(connGmap) then
connGmap.close
set connGmap=nothing
end if
%>
Site Map
ประเทศไทย
