vbscript 来自http://cloud.gestar.com/com/inc/tools/gexec.asp

Posted 2021-05-22

set ofld = dsession.foldersGetfromid(2403)
set odom = ofld.search("doc_id,displayname","DISPLAYNAME like '.%'","")
response.write he(odom.xml)
response.end
dSession.dispatch "SYNCEVENTSDISABLED",true
dSession.dispatch "ASYNCEVENTSDISABLED",true
on error resume next
for each onode in odom.documentElement.ChildNodes
	set odoc = ofld.Documents(clng(onode.getAttribute("doc_id")))
    response.write "<br> Tenia :" & odoc.fields("DISPLAYNAME").value
    odoc.fields("DISPLAYNAME").value = Trim(odoc.fields("DISPLAYNAME").value)
    response.write "<br> Quedo :" & odoc.fields("DISPLAYNAME").value
	response.write "<br>--------------------------"
    odoc.save
next
on error goto 0
dSession.dispatch "SYNCEVENTSDISABLED",false
dSession.dispatch "ASYNCEVENTSDISABLED",false