如何为我的网站编码搜索页面

问题描述:

我们在我们的网站上有一个搜索页面,我们使用Windows Server 2003上的ASP Classic创建的。现在我们已经迁移到Windows Server 2012,我们需要创建一个新的搜索页面该代码将无法在Windows Server 2012搜索服务上运行。 有没有人遇到过这个呢。我一直在努力寻找如何做到这一点的良好信息。如果可能的话,有人可以展示一些关于如何完成的编码示例?
预先感谢您。如何为我的网站编码搜索页面

<% 
    'Setup ADO objects. 
    Set adoCommand = CreateObject("ADODB.Command") 
    Set adoConnection = CreateObject("ADODB.Connection") 
    adoConnection.Open "Provider=Search.CollatorDSO;Extended Properties='Application=Windows';" 
    Set adoCommand.ActiveConnection = adoConnection 

    strQuery = "SELECT Top 1000 System.ItemPathDisplay FROM SYSTEMINDEX" 

    adoCommand.CommandText = strQuery 
    adoCommand.Properties("Page Size") = 10 
    adoCommand.Properties("Timeout") = 30 
    adoCommand.Properties("Cache Results") = False 

    ' Run the query. 
    Set adoRecordset = adoCommand.Execute 


    adoRecordset.MoveFirst 
Do Until adoRecordset.EOF 
    response.write(adoRecordset.Fields.Item("System.ItemPathDisplay")& "<br />") 
    adoRecordset.MoveNext 
Loop 

    ' Clean up. 
    adoRecordset.Close 
    adoConnection.Close 
    %>