Buongiorno
Ho un grave problema su aruba ho googlato parecchio ma non trovo la soluzione, qualcuno di voi ha avuto esperienze come questa.
Praticamente ho il seguente errore sul mio portalapp 4.0

Microsoft VBScript runtime error '800a01a8'

Object required: 'labels.documentElement'

/asc/common/i_utils.asp, line 700

ma non sarebbe l'errore in se il problema. Il fratto è che quando salvo il global.asa ho le sessioni al posto e funziona tutto, quando passa la mezzanotte boh forse il server IIS di aruba riparte e ho questo errore. A me sembra molto strano, cioè lperrore non ci sarebbe nemmeno. Se salvo nuovamente il global.asa riparte tutto a modo. Il global.asa è questo
codice:
  
<object runat="server" scope="application" id="online_users" progid="scripting.dictionary">
</object> <object runat="server" scope="session" id="page_vars" progid="scripting.dictionary"></object> 
<object runat="server" scope="application" id="labels_alt" progid="scripting.dictionary">
</object> <object runat="server" scope="application" id="labels" progid="MSXML2.DOMDocument"></object>
  <SCRIPT LANGUAGE=VBScript RUNAT=Server>
  Sub Application_OnStart  	':: app database connection 
string 	application("cn_str") = 
"provider=microsoft.jet.oledb.4.0;data source=C:\inetpub\wwwroot\mdb-database
\8691.mdb" 	 	':: connection string examples 
	'application("cn_str") = 
"provider=microsoft.jet.oledb.4.0;data source=" & server.MapPath("data/8691.mdb") & "" 
	'application("cn_str") = "provider=microsoft.jet.oledb.4.0;data source=E:\homepages
\useraccount\db\8691.mdb"
 	'application("cn_str") = "provider=SQLOLEDB.1;
server=serverip_or_address;database=database_name;uid=userid;pwd=password" 	 	':: 
initilize app variables from database
 	set cn = 
Server.CreateObject("ADODB.Connection") 	on error resume next 	
cn.Open 
application("cn_str") 
	set rs = cn.Execute("SELECT * FROM AppSettings") 	for each field in 
rs.Fields 	
	application(field.Name) = field.Value 	next 	on error goto 0   	':: 
alternate scripting dict labels used when XMLDOC is not available on server 
		labels_alt("lbl_addtofavorites")="Add to Favorites" 
	
	labels_alt("lbl_admin")="ACP" 	
	labels_alt("lbl_auction")="Auction" 	
	labels_alt("lbl_affiliates")="Partners" 	
	labels_alt("lbl_avgrating")="Rating" 
		labels_alt("lbl_calendar")="Calendar" 	
	labels_alt("lbl_cart")="My Cart" 
		labels_alt("lbl_catdelim")="/" 	
	labels_alt("lbl_chat")="Chat" 	
	labels_alt("lbl_commerce")="Shop" 	
	labels_alt("lbl_contact")="Contact" 	
	labels_alt("lbl_copyright")="Copyright" 		labels_alt("lbl_dateadded")="Created" 	
	labels_alt("lbl_datealert")="Alert" 	
	labels_alt("lbl_datelastmod")="Updated" 	
	labels_alt("lbl_datejoined")="Joined" 
		labels_alt("lbl_datelast")="Last Login" 		labels_alt("lbl_download")="Download" 
		labels_alt("lbl_home")="Home" 		labels_alt("lbl_feeds")="Feeds" 
		labels_alt("lbl_forums")="Forums" 		labels_alt("lbl_friends")="Friends" 	
	labels_alt("lbl_impressions")="Impressions" 		labels_alt("lbl_inbox")="Inbox" 	
	labels_alt("lbl_location")="Location" 	
	labels_alt("lbl_login")="Login" 		
labels_alt("lbl_logout")="Logout" 	
	labels_alt("lbl_menu_home")="" 		
labels_alt("lbl_messaging")="Messaging" 
		labels_alt("lbl_more")="More" 
		labels_alt("lbl_myfavorites")="My Favorites" 		labels_alt("lbl_newest")="New Content" 		
labels_alt("lbl_newsletter")="Newsletter" 	
	labels_alt("lbl_next")="Next" 	
	labels_alt("lbl_none")="None" 	
	labels_alt("lbl_passwordlookup")="Password Lookup" 
		labels_alt("lbl_popular")="Most Popular" 	
	labels_alt("lbl_prev")="Previous" 
		labels_alt("lbl_profile")="Profile" 	
	labels_alt("lbl_rate")="Rate" 	
	labels_alt("lbl_readreviews")="Read comments" 	
	labels_alt("lbl_register")="Register" 	
	labels_alt("lbl_regcode")="Obtain a registration code" 		labels_alt("lbl_regemail")="Email Address"
 		labels_alt("lbl_relatedurl")="Website" 		labels_alt("lbl_search")="Search" 	
	labels_alt("lbl_select")="Select"
 		labels_alt("lbl_signature")="Signature" 		
labels_alt("lbl_sitemap")="Sitemap" 	
	labels_alt("lbl_sort")="Sort" 
		labels_alt("lbl_surveys")="Surveys" 
		labels_alt("lbl_toprated")="Top Rated" 		labels_alt("lbl_events")="Events" 	
	labels_alt("lbl_upload")="Upload" 	
	labels_alt("lbl_user")="Member" 	
	labels_alt("lbl_whos_online")="Online Now" 		labels_alt("lbl_form_title")="Title" 	
	labels_alt("lbl_form_cat")="Category" 	
	labels_alt("lbl_form_shortdesc")="Description" 		labels_alt("lbl_form_longdesc")="Content" 		
labels_alt("lbl_form_author")="Author" 
		labels_alt("lbl_form_user")="Username" 
		labels_alt("lbl_form_email")="Email" 		labels_alt("lbl_form_filename")="Filename" 	
	labels_alt("lbl_form_relatedurl")="Related URL" 		labels_alt("lbl_form_downloadurl")="Download URL" 
		labels_alt("lbl_form_image")="Image" 		labels_alt("lbl_form_thumbnail")="Thumbnail" 
		labels_alt("lbl_form_nextcontent")="Next" 		labels_alt("lbl_form_prevcontent")="Previous" 
		labels_alt("lbl_form_priority")="Priority" 	
	labels_alt("lbl_form_status")="Status" 		labels_alt("lbl_form_datealert")="Alert Date" 		labels_alt("lbl_form_username")="Username" 	
	labels_alt("lbl_form_password")="Password" 		
labels_alt("lbl_form_addr1")="Address" 		labels_alt("lbl_form_addr2")="Address (2)" 	
	labels_alt("lbl_form_city")="City" 	
	labels_alt("lbl_form_state")="State / Province" 		labels_alt("lbl_form_postalcode")="Postal Code" 		labels_alt("lbl_form_country")="Country" 		labels_alt("lbl_form_phone")="Phone" 
		labels_alt("lbl_form_fname")="First Name" 		labels_alt("lbl_form_lname")="Last Name" 	
	labels_alt("lbl_form_notes")="Comments" 	
	labels_alt("lbl_form_mailinglist")="Subscribe" 		labels_alt("btn_add")="Add+" 	
	labels_alt("btn_edit")="Edit.." 		labels_alt("btn_login")="Login" 		labels_alt("btn_vote")="Vote"
 		labels_alt("btn_results")="Results" 		labels_alt("lbl_rememberme")="Remember my on this computer" 
		labels_alt("lbl_newuserregister")="New user? Click here to sign-in." 		labels_alt("opt_permalink")=".html" 	
	labels_alt("lang")="en" 	
	labels_alt("charset")="windows-1252" 		labels_alt("langname")="English" 	
	labels_alt("lcid")="1033" 		labels_alt("codepage")=""   	':: load xml labels 	labels.async = False 	labels.Load(server.MapPath("common/language.xml")) 	
	 End Sub  Sub Session_OnStart  	
':: set default user session timeout 	session.timeout = 30  	':: set default LCID 
	if application("lcid")<>"" and not isNull(application("lcid")) then 	
	session.lcid = application("lcid") 
	else 
		session.lcid = 1033 	end if  	':: set default languge	 
	if application("lang")<>"" and not isNull(application("lang")) then 	
	session("lang") = application("lang") 
	else 	
	session("lang")  = "en" 	end if
  End Sub  Sub Session_OnEnd  	
if isObject(online_users) then 	
	on error resume next 	
	online_users.remove (session.sessionid) 
	end if  End Sub  </SCRIPT>