Как скопировать страницу поиска для моего сайта

Question

У нас есть страница поиска на нашем веб-сайте, которую мы создали с помощью ASP Classic на Windows Server 2003. Теперь мы перешли на Windows Server 2012, и нам нужно создать новую страницу поиска, как код не будет работать в службе поиска Windows Server 2012. Кто-нибудь еще сталкивался с этим. Я изо всех сил пытаюсь найти хорошую информацию о том, как это сделать. Если возможно, кто-то может показать некоторые примеры кодирования того, как это делается?
Спасибо заранее.

Answer 1

<% 
    '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 
    %>