Guidance
指路人
g.yi.org
Software / Reginald / Examples / repository / Applications / Server Applications / Indexing Server / ListFiles.rex

Register 
注册
Search 搜索
首页 
Home Home
Software
Upload

  
/* Displays a list of all the files included in the Indexing Service catalog named "Script Catalog". */
objconnection = createcomobject("ADODB.Connection")
objconnection~connectionstring = "provider=msidxs;"
oprop = objconnection~properties()
oprop~"Data Source" = "Script Catalog"
objconnection~open()

objcommand = createcomobject("ADODB.Command")
 
strquery = "Select Filename from Scope()"
objrecordset = objconnection~execute(strquery)
 
DO WHILE objrecordset~eof() = 0
    SAY objrecordset~filename
    objrecordset~movenext()
END
掌柜推荐
 
 
 
 
 
 
 
 
 
 
 
 
© Fri 2023-1-27  Guidance Laboratory Inc.
Email:webmaster1g.yi.org Hits:0 Last modified:2010-07-16 20:49:16